223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

corrected header for math_qRot

This commit is contained in:
Christoph Kords 2010-09-30 08:46:58 +00:00
parent b259fbd9c6
commit cb4b4afc88
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
code/math.f90
View File

@ -431,7 +431,7 @@ real(pReal), dimension(4,36), parameter :: math_symOperations = &
!************************************************************************** !**************************************************************************
! matrix multiplication 33x33 = 3x3 ! matrix multiplication 33x33 = 3x3
!**************************************************************************<EFBFBD> !**************************************************************************
pure function math_mul33x33(A,B) pure function math_mul33x33(A,B)
use prec, only: pReal, pInt 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) pure function math_qRot(Q,v)