[test-suite] Change printf specifiers to capital

[amyk]

Summary

This patch changes some of the specifiers in the printf calls within:

MultiSource/Applications/sgefa/sgefa.test
MultiSource/Benchmarks/TSVC/CrossingThresholds-dbl/CrossingThresholds-dbl.test
MultiSource/Benchmarks/TSVC/CrossingThresholds-flt/CrossingThresholds-flt.test

to use the capital E/G specifiers. It also edits the reference files to account for the capital letter output.
This change was made because on AIX, inf is printed as INF, so the reference output and printf calls
are changed to print in capitals to avoid introducing a new reference output for AIX.

[hubert.reinterpretcast]

LGTM (it has been acknowledged that the AIX output is not as specified by C; see ISO/IEC JTC 1/SC 22/WG 14 document N2290); thanks!

[amyk]

Updated the revision as upon testing prior to committing, I realized that this patch originally meant to use the capital
E/G printf specifiers, rather than E/F as I originally had.

The reason being is that the pertinent parts of the CrossingThresholds reference output that needs to be capitalized is
the INF of Checksum because printing infinites on Linux is lowercase by default, whereas it is always uppercase on AIX.
The updates to the capital G printf specifier in MultiSource/Benchmarks/TSVC/tsc.inc is the actual the printf that
controls the Checksum column in the reference output (and not the F I updated in the original patch).

I must have forgotten to test Linux when I posted the patch, as I remember testing this patch and having it pass
(so it must have been on AIX). This current update passes both Linux and AIX as far as my testing goes.

@hubert.reinterpretcast If you could take another quick look at MultiSource/Benchmarks/TSVC/tsc.inc, that would be greatly appreciated.

[daltenty]

LGTM, thanks

MultiSource/Applications/sgefa/driver.c

while( !matgen( &a, &x, &b, &bt, &ipvt, ++test_case, SCALE ) ) {
     exit( 1 );
       }
       /* Calculate the 1 norm of A. */
       for( j=0, anorm=0.0; j<a.cd; j++ ) {
     for( i=0, col=a.pd[j], t=0.0; i<a.rd; i++, col++ ) 
       t += (*col<0.0 ? -*col : *col );
     anorm = ( anorm > t ? anorm : t );
       }
-      printf("One-Norm(A) ---------- %e.\n", anorm );
+      printf("One-Norm(A) ---------- %E.\n", anorm );
 
 
     /* Test SGEFA. */
     retval = sgefa( &a, ipvt );
 
     /* For a successful return from SGEFA test SGESL. */
     if( retval ) 
       ;//printf("Zero Column %d found \n", retval );

MultiSource/Applications/sgefa/sgefa.reference_output

 
 **********************************************************************
 Tridiagional.  Test case 8 of size 600.
 One-Norm(A) ---------- 1.050000e+02.
 
 
 **********************************************************************
 Rank One.  Test case 9 of size 200.
-One-Norm(A) ---------- inf.
+One-Norm(A) ---------- INF.
 
 
 **********************************************************************
 Zero Column.  Test case 10 of size 160.
 One-Norm(A) ---------- 8.879156e+02.
 
 
 **********************************************************************

MultiSource/Benchmarks/TSVC/CrossingThresholds-dbl/CrossingThresholds-dbl.reference_output

 Running each loop 5880 times...
 
 Loop   Time(Sec)   Checksum 
 S281   0.00     32000 
-S1281  0.00     inf 
+S1281  0.00     INF 
 S291   0.00     32000 
 S292   0.00     31967.999999994 
 S293   0.00     32000 
 S2101  0.00     162028.88365496 
 S2102  0.00     256 
 S2111  0.00     3 
 exit 0

MultiSource/Benchmarks/TSVC/CrossingThresholds-flt/CrossingThresholds-flt.reference_output

 Running each loop 5880 times...
 
 Loop   Time(Sec)   Checksum 
 S281   0.00     32000 
-S1281  0.00     inf 
+S1281  0.00     INF 
 S291   0.00     32000 
 S292   0.00     31954 
 S293   0.00     32000 
 S2101  0.00     1.6204e+05 
 S2102  0.00     256 
 S2111  0.00     3 
 exit 0

MultiSource/Benchmarks/TSVC/tsc.inc

for (int i = 0; i < LEN2; i++){
 
     }
   }
   TYPE sumarray = 0;
   for (int i = 0; i < LEN2*LEN2; i++){
     sumarray += array[i];
   }
 
-  if (name == 1) printf("%.*g \n",digits,suma);
-  if (name == 2) printf("%.*g \n",digits,sumb);
-  if (name == 3) printf("%.*g \n",digits,sumc);
-  if (name == 4) printf("%.*g \n",digits,sumd);
-  if (name == 5) printf("%.*g \n",digits,sume);
-  if (name == 11) printf("%.*g \n",digits,sumaa);
-  if (name == 22) printf("%.*g \n",digits,sumbb);
-  if (name == 33) printf("%.*g \n",digits,sumcc);
-  if (name == 0) printf("%.*g \n",digits,sumarray);
-  if (name == 12) printf("%.*g \n",digits,suma+sumb);
-  if (name == 25) printf("%.*g \n",digits,sumb+sume);
-  if (name == 13) printf("%.*g \n",digits,suma+sumc);
-  if (name == 123) printf("%.*g \n",digits,suma+sumb+sumc);
-  if (name == 1122) printf("%.*g \n",digits,sumaa+sumbb);
-  if (name == 112233) printf("%.*g \n",digits,sumaa+sumbb+sumcc);
-  if (name == 111) printf("%.*g \n",digits,sumaa+suma);
-  if (name == -1) printf("%.*g \n",digits,temp);
-  if (name == -12) printf("%.*g \n",digits,temp+sumb);
+  if (name == 1) printf("%.*G \n",digits,suma);
+  if (name == 2) printf("%.*G \n",digits,sumb);
+  if (name == 3) printf("%.*G \n",digits,sumc);
+  if (name == 4) printf("%.*G \n",digits,sumd);
+  if (name == 5) printf("%.*G \n",digits,sume);
+  if (name == 11) printf("%.*G \n",digits,sumaa);
+  if (name == 22) printf("%.*G \n",digits,sumbb);
+  if (name == 33) printf("%.*G \n",digits,sumcc);
+  if (name == 0) printf("%.*G \n",digits,sumarray);
+  if (name == 12) printf("%.*G \n",digits,suma+sumb);
+  if (name == 25) printf("%.*G \n",digits,sumb+sume);
+  if (name == 13) printf("%.*G \n",digits,suma+sumc);
+  if (name == 123) printf("%.*G \n",digits,suma+sumb+sumc);
+  if (name == 1122) printf("%.*G \n",digits,sumaa+sumbb);
+  if (name == 112233) printf("%.*G \n",digits,sumaa+sumbb+sumcc);
+  if (name == 111) printf("%.*G \n",digits,sumaa+suma);
+  if (name == -1) printf("%.*G \n",digits,temp);
+  if (name == -12) printf("%.*G \n",digits,temp+sumb);
 
 }
 
 int init(char* name)
 {
   TYPE any=0.;
   TYPE zero=0.;
   TYPE half=.5;