return 180° disorientation about 100 for neighbors with different phases

This commit is contained in:
Christoph Kords 2010-04-29 12:28:51 +00:00
parent 8ab101da50
commit ea718573ef
1 changed files with 1 additions and 1 deletions

View File

@ -1634,7 +1634,7 @@ logical error
crystallite_symmetryID(1,i,e)) ! calculate disorientation
else ! for neighbor with different phase
crystallite_disorientation(:,n,1,i,e) = (/1.0_pReal, 0.0_pReal, 0.0_pReal, 0.0_pReal/) ! identity "rotation"
crystallite_disorientation(:,n,1,i,e) = (/0.0_pReal, 1.0_pReal, 0.0_pReal, 0.0_pReal/) ! 180 degree rotation about 100 axis
endif
else ! no existing neighbor