From 3e0e187b14bb1b2a144a6492248586bd6c50e47d Mon Sep 17 00:00:00 2001 From: Philip Eisenlohr Date: Fri, 19 Jun 2015 07:29:01 +0000 Subject: [PATCH] clarified meaning of symEulers function in help --- code/math.f90 | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/code/math.f90 b/code/math.f90 index 79ed86b8e..d71fb348f 100644 --- a/code/math.f90 +++ b/code/math.f90 @@ -1465,10 +1465,10 @@ pure function math_EulerToR(Euler) real(pReal) c1, c, c2, s1, s, s2 C1 = cos(Euler(1)) - C = cos(Euler(2)) + C = cos(Euler(2)) C2 = cos(Euler(3)) S1 = sin(Euler(1)) - S = sin(Euler(2)) + S = sin(Euler(2)) S2 = sin(Euler(3)) math_EulerToR(1,1)=C1*C2-S1*S2*C @@ -1936,7 +1936,7 @@ end function math_sampleGaussVar !-------------------------------------------------------------------------------------------------- -!> @brief symmetric Euler angles for given symmetry 1:triclinic, 2:monoclinic, 4:orthotropic +!> @brief symmetrically equivalent Euler angles for given sample symmetry 1:triclinic, 2:monoclinic, 4:orthotropic !-------------------------------------------------------------------------------------------------- pure function math_symmetricEulers(sym,Euler)