cross_products Module

Provides a 3D cross product function for both single and double reals


Used by

  • module~~cross_products~~UsedByGraph module~cross_products cross_products module~influence3d Influence3D module~influence3d->module~cross_products module~reflect3dmod Reflect3DMod module~reflect3dmod->module~cross_products module~step3dmod Step3DMod module~step3dmod->module~cross_products proc~step2d~2 Step2D proc~step2d~2->module~step3dmod proc~traceray3d TraceRay3D proc~traceray3d->module~reflect3dmod proc~traceray3d->module~step3dmod program~bellhop3d BELLHOP3D program~bellhop3d->module~influence3d

Interfaces

public interface cross_product

  • public function cross_product_sngl(a, b)

    Computes 3D cross product of single precision vectors

    Arguments

    Type IntentOptional Attributes Name
    real(kind=4), intent(in), DIMENSION( 3 ) :: a
    real(kind=4), intent(in), DIMENSION( 3 ) :: b

    Return Value real(kind=4), DIMENSION( 3 )

  • public function cross_product_dble(a, b)

    Computes 3D cross product of double precision vectors

    Arguments

    Type IntentOptional Attributes Name
    real(kind=8), intent(in), DIMENSION( 3 ) :: a
    real(kind=8), intent(in), DIMENSION( 3 ) :: b

    Return Value real(kind=8), DIMENSION( 3 )


Functions

public function cross_product_sngl(a, b)

Computes 3D cross product of single precision vectors

Arguments

Type IntentOptional Attributes Name
real(kind=4), intent(in), DIMENSION( 3 ) :: a
real(kind=4), intent(in), DIMENSION( 3 ) :: b

Return Value real(kind=4), DIMENSION( 3 )

public function cross_product_dble(a, b)

Computes 3D cross product of double precision vectors

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in), DIMENSION( 3 ) :: a
real(kind=8), intent(in), DIMENSION( 3 ) :: b

Return Value real(kind=8), DIMENSION( 3 )