Merge pull request #6 from clfnd/develop

correct Rodrigues vector output format
EMsoft-org · Jun 20, 2024 · f1c6f5c · f1c6f5c
2 parents 59206df + 1010fdd
commit f1c6f5c
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Source/EMsoftOOLib/mod_so3.f90 b/Source/EMsoftOOLib/mod_so3.f90
@@ -2342,9 +2342,9 @@ recursive subroutine writeOrientationstoFile_(self, filename, mode, list)
     case('ro')
       io_real(1:4) = FZtmp%rod%r_copyd()
       if (io_real(4).eq.inftyd()) then
-        call Message%WriteValue('', io_real, 3, frm="(2(F17.9,' '),'infinity')",redirect=53)
+        call Message%WriteValue('', io_real, 3, frm="(3(F17.9,' '),'infinity')",redirect=53)
       else
-        call Message%WriteValue('', io_real, 4, frm="(2(F17.9,' '),F17.9)",redirect=53)
+        call Message%WriteValue('', io_real, 4, frm="(3(F17.9,' '),F17.9)",redirect=53)
       end if
     case('om')
       o = FZtmp%qu%qo()