529 |
abave = 0.5*(fabs(a)+fabs(b)); |
abave = 0.5*(fabs(a)+fabs(b)); |
530 |
if (abave > 0.0) { |
if (abave > 0.0) { |
531 |
relerr=fabs(a-b)/abave; |
relerr=fabs(a-b)/abave; |
532 |
if (relerr > 0.0) { linnum = (int)lrint(log10(relerr)); } |
if (relerr > 0.0) { linnum = (int)rint(log10(relerr)); } |
533 |
else { linnum = -16 ; } |
else { linnum = -16 ; } |
534 |
best = (best > linnum) ? best : linnum; |
best = (best > linnum) ? best : linnum; |
535 |
} |
} |
995 |
ldir=build |
ldir=build |
996 |
( |
( |
997 |
cd "$dir/$ldir" > /dev/null 2>&1 |
cd "$dir/$ldir" > /dev/null 2>&1 |
998 |
ls -1 Makefile *.[fFhco]* mitgcmuv 2>/dev/null \ |
ls -1 Makefile *.[fFhco] mitgcmuv 2>/dev/null \ |
999 |
| sed -e 's|^CVS$||g' | sed -e 's|^output.txt$||g' |
| sed -e 's|^CVS$||g' | sed -e 's|^output.txt$||g' |
1000 |
) > tr_exrun_links |
) > tr_exrun_links |
1001 |
( |
( |