small polishing

This commit is contained in:
Philip Eisenlohr 2015-11-10 21:18:13 +00:00
parent 7370c68936
commit c5b28a22d4
1 changed files with 2 additions and 1 deletions

View File

@ -1109,6 +1109,7 @@ real(pReal), dimension(4,36), parameter, private :: &
0.7071067811865476_pReal, 0.0_pReal, 0.0_pReal, 0.7071067811865476_pReal, &
0.0_pReal, 0.0_pReal, 0.0_pReal, 1.0_pReal, &
-0.7071067811865476_pReal, 0.0_pReal, 0.0_pReal, 0.7071067811865476_pReal, &
!
1.0_pReal, 0.0_pReal, 0.0_pReal, 0.0_pReal, & ! hexagonal symmetry operations
0.0_pReal, 1.0_pReal, 0.0_pReal, 0.0_pReal, & ! 2-fold symmetry
0.0_pReal, 0.0_pReal, 1.0_pReal, 0.0_pReal, &