diff --git a/MultiSource/Applications/sgefa/driver.c b/MultiSource/Applications/sgefa/driver.c --- a/MultiSource/Applications/sgefa/driver.c +++ b/MultiSource/Applications/sgefa/driver.c @@ -47,7 +47,7 @@ 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. */ diff --git a/MultiSource/Applications/sgefa/sgefa.reference_output b/MultiSource/Applications/sgefa/sgefa.reference_output --- a/MultiSource/Applications/sgefa/sgefa.reference_output +++ b/MultiSource/Applications/sgefa/sgefa.reference_output @@ -75,7 +75,7 @@ ********************************************************************** Rank One. Test case 9 of size 200. -One-Norm(A) ---------- inf. +One-Norm(A) ---------- INF. ********************************************************************** diff --git a/MultiSource/Benchmarks/TSVC/CrossingThresholds-dbl/CrossingThresholds-dbl.reference_output b/MultiSource/Benchmarks/TSVC/CrossingThresholds-dbl/CrossingThresholds-dbl.reference_output --- a/MultiSource/Benchmarks/TSVC/CrossingThresholds-dbl/CrossingThresholds-dbl.reference_output +++ b/MultiSource/Benchmarks/TSVC/CrossingThresholds-dbl/CrossingThresholds-dbl.reference_output @@ -2,7 +2,7 @@ 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 diff --git a/MultiSource/Benchmarks/TSVC/CrossingThresholds-flt/CrossingThresholds-flt.reference_output b/MultiSource/Benchmarks/TSVC/CrossingThresholds-flt/CrossingThresholds-flt.reference_output --- a/MultiSource/Benchmarks/TSVC/CrossingThresholds-flt/CrossingThresholds-flt.reference_output +++ b/MultiSource/Benchmarks/TSVC/CrossingThresholds-flt/CrossingThresholds-flt.reference_output @@ -2,7 +2,7 @@ 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 diff --git a/MultiSource/Benchmarks/TSVC/tsc.inc b/MultiSource/Benchmarks/TSVC/tsc.inc --- a/MultiSource/Benchmarks/TSVC/tsc.inc +++ b/MultiSource/Benchmarks/TSVC/tsc.inc @@ -227,24 +227,24 @@ 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); }