From 9704eb6926f6be905128ae0552dec146fa811eb7 Mon Sep 17 00:00:00 2001 From: Philip Eisenlohr Date: Tue, 15 Mar 2016 17:23:01 -0400 Subject: [PATCH] small correction to variable declaration layout --- code/lattice.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code/lattice.f90 b/code/lattice.f90 index f5717e8e1..05a123125 100644 --- a/code/lattice.f90 +++ b/code/lattice.f90 @@ -2182,7 +2182,7 @@ pure function lattice_qDisorientation(Q1, Q2, struct) real(pReal), dimension(4) :: lattice_qDisorientation real(pReal), dimension(4), intent(in) :: & 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 struct