Switch Butcher table to 'e' format

LLNL · Jun 29, 2024 · 7cd0509 · 7cd0509
1 parent e9c9a71
commit 7cd0509
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/src/arkode/arkode_butcher.c b/src/arkode/arkode_butcher.c
@@ -392,22 +392,22 @@ void ARKodeButcherTable_Write(ARKodeButcherTable B, FILE* outfile)
     fprintf(outfile, "      ");
     for (j = 0; j < B->stages; j++)
     {
-      fprintf(outfile, SUN_FORMAT_G "  ", B->A[i][j]);
+      fprintf(outfile, SUN_FORMAT_E "  ", B->A[i][j]);
     }
     fprintf(outfile, "\n");
   }
 
   fprintf(outfile, "  c = ");
   for (i = 0; i < B->stages; i++)
   {
-    fprintf(outfile, SUN_FORMAT_G "  ", B->c[i]);
+    fprintf(outfile, SUN_FORMAT_E "  ", B->c[i]);
   }
   fprintf(outfile, "\n");
 
   fprintf(outfile, "  b = ");
   for (i = 0; i < B->stages; i++)
   {
-    fprintf(outfile, SUN_FORMAT_G "  ", B->b[i]);
+    fprintf(outfile, SUN_FORMAT_E "  ", B->b[i]);
   }
   fprintf(outfile, "\n");
 
@@ -416,7 +416,7 @@ void ARKodeButcherTable_Write(ARKodeButcherTable B, FILE* outfile)
     fprintf(outfile, "  d = ");
     for (i = 0; i < B->stages; i++)
     {
-      fprintf(outfile, SUN_FORMAT_G "  ", B->d[i]);
+      fprintf(outfile, SUN_FORMAT_E "  ", B->d[i]);
     }
     fprintf(outfile, "\n");
   }