small polishing
This commit is contained in:
parent
7370c68936
commit
c5b28a22d4
|
@ -1109,6 +1109,7 @@ real(pReal), dimension(4,36), parameter, private :: &
|
||||||
0.7071067811865476_pReal, 0.0_pReal, 0.0_pReal, 0.7071067811865476_pReal, &
|
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.0_pReal, 0.0_pReal, 0.0_pReal, 1.0_pReal, &
|
||||||
-0.7071067811865476_pReal, 0.0_pReal, 0.0_pReal, 0.7071067811865476_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
|
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, 1.0_pReal, 0.0_pReal, 0.0_pReal, & ! 2-fold symmetry
|
||||||
0.0_pReal, 0.0_pReal, 1.0_pReal, 0.0_pReal, &
|
0.0_pReal, 0.0_pReal, 1.0_pReal, 0.0_pReal, &
|
||||||
|
|
Loading…
Reference in New Issue