294 |
if test "x$IEEE" != x ; then |
if test "x$IEEE" != x ; then |
295 |
command="$command -ieee" |
command="$command -ieee" |
296 |
fi |
fi |
297 |
|
if test "x$MPI" = xt ; then |
298 |
|
command="$command -mpi" |
299 |
|
fi |
300 |
printf 'genmake ... ' 1>&2 |
printf 'genmake ... ' 1>&2 |
301 |
$command > make.log 2>&1 |
$command > make.log 2>&1 |
302 |
RETVAL=$? |
RETVAL=$? |
532 |
abave = 0.5*(fabs(a)+fabs(b)); |
abave = 0.5*(fabs(a)+fabs(b)); |
533 |
if (abave > 0.0) { |
if (abave > 0.0) { |
534 |
relerr=fabs(a-b)/abave; |
relerr=fabs(a-b)/abave; |
535 |
if (relerr > 0.0) { linnum = (int)lrint(log10(relerr)); } |
if (relerr > 0.0) { linnum = (int)rint(log10(relerr)); } |
536 |
else { linnum = -16 ; } |
else { linnum = -16 ; } |
537 |
best = (best > linnum) ? best : linnum; |
best = (best > linnum) ? best : linnum; |
538 |
} |
} |
1075 |
rm -f tmp_cmpnum.c tmp_cmpnum |
rm -f tmp_cmpnum.c tmp_cmpnum |
1076 |
|
|
1077 |
if test "x$CLEANUP" != xt ; then |
if test "x$CLEANUP" != xt ; then |
1078 |
cat $SUMMARY |
cat $SUMMARY | sed 's/ -- -- -- --//g' |
1079 |
if test -e tr_out.txt ; then |
if test -e tr_out.txt ; then |
1080 |
mv tr_out.txt tr_out.txt.old |
mv tr_out.txt tr_out.txt.old |
1081 |
fi |
fi |
1082 |
cat $SUMMARY > tr_out.txt |
cat $SUMMARY | sed 's/ -- -- -- --//g' > tr_out.txt |
1083 |
fi |
fi |
1084 |
|
|
1085 |
if test "x$DELDIR" = xt ; then |
if test "x$DELDIR" = xt ; then |