corrected header for math_qRot
This commit is contained in:
parent
b259fbd9c6
commit
cb4b4afc88
|
@ -431,7 +431,7 @@ real(pReal), dimension(4,36), parameter :: math_symOperations = &
|
|||
|
||||
!**************************************************************************
|
||||
! matrix multiplication 33x33 = 3x3
|
||||
!**************************************************************************<EFBFBD>
|
||||
!**************************************************************************
|
||||
pure function math_mul33x33(A,B)
|
||||
|
||||
use prec, only: pReal, pInt
|
||||
|
@ -659,7 +659,7 @@ real(pReal), dimension(4,36), parameter :: math_symOperations = &
|
|||
|
||||
|
||||
!**************************************************************************
|
||||
! quaternion inversion
|
||||
! action of a quaternion on a vector (rotate vector v with Q)
|
||||
!**************************************************************************
|
||||
pure function math_qRot(Q,v)
|
||||
|
||||
|
|
Loading…
Reference in New Issue