small correction to variable declaration layout

This commit is contained in:
Philip Eisenlohr 2016-03-15 17:23:01 -04:00
parent 6197e839c9
commit 9704eb6926
1 changed files with 1 additions and 1 deletions

View File

@ -2182,7 +2182,7 @@ pure function lattice_qDisorientation(Q1, Q2, struct)
real(pReal), dimension(4) :: lattice_qDisorientation real(pReal), dimension(4) :: lattice_qDisorientation
real(pReal), dimension(4), intent(in) :: & real(pReal), dimension(4), intent(in) :: &
Q1, & ! 1st orientation Q1, & ! 1st orientation
Q2 ! 2nd orientation Q2 ! 2nd orientation
integer(kind(LATTICE_undefined_ID)), optional, intent(in) :: & ! if given, symmetries between the two orientation will be considered integer(kind(LATTICE_undefined_ID)), optional, intent(in) :: & ! if given, symmetries between the two orientation will be considered
struct struct