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

simplified disorientation calculation. performed FEM check that "grainrotation" reflects the *active* rotation from the starting orientation to the current one with respect to the lab coord system (as expected).

This commit is contained in:
Philip Eisenlohr 2011-04-14 19:09:44 +00:00
parent 97185fb30b
commit affd383ef8
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
code/crystallite.f90
View File

@ -2936,8 +2936,8 @@ logical error
else else
orientation = math_RtoQuaternion(transpose(R)) orientation = math_RtoQuaternion(transpose(R))
endif endif
crystallite_rotation(1:4,g,i,e) = math_QuaternionDisorientation(math_qConj(orientation), & crystallite_rotation(1:4,g,i,e) = math_QuaternionDisorientation(crystallite_orientation0(1:4,g,i,e), & ! active rotation from ori0
math_qConj(crystallite_orientation0(1:4,g,i,e)), & orientation, & ! to current orientation
0_pInt ) ! we don't want symmetry here 0_pInt ) ! we don't want symmetry here
crystallite_orientation(1:4,g,i,e) = orientation crystallite_orientation(1:4,g,i,e) = orientation
enddo enddo