spatpr Subroutine

public subroutine spatpr(a, b, c, v)

Computes the triple product between three vectors to calculate a volume

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in), dimension(*) :: a

Input vector

real(kind=dp), intent(in), dimension(*) :: b

Input vector

real(kind=dp), intent(in), dimension(*) :: c

Input vector

real(kind=dp), intent(out) :: v

volumne