181 |
|
|
182 |
testoutput_ad() |
testoutput_ad() |
183 |
{ |
{ |
184 |
grep $3 $1/results_ad/output.txt_adm | awk '{print NR " " $5}' > t05.txt |
grep $3 $1/results_ad/output_adm.txt | awk '{print NR " " $5}' > t05.txt |
185 |
grep $3 $1/$2/output.txt_adm | awk '{print NR " " $5}' > t15.txt |
grep $3 $1/$2/output_adm.txt | awk '{print NR " " $5}' > t15.txt |
186 |
grep $3 $1/results_ad/output.txt_adm | awk '{print NR " " $6}' > t06.txt |
grep $3 $1/results_ad/output_adm.txt | awk '{print NR " " $6}' > t06.txt |
187 |
grep $3 $1/$2/output.txt_adm | awk '{print NR " " $6}' > t16.txt |
grep $3 $1/$2/output_adm.txt | awk '{print NR " " $6}' > t16.txt |
188 |
join t05.txt t15.txt > t5.txt |
join t05.txt t15.txt > t5.txt |
189 |
join t06.txt t16.txt > t6.txt |
join t06.txt t16.txt > t6.txt |
190 |
echo "-1" >> t5.txt |
echo "-1" >> t5.txt |
304 |
command="$command --mods=../code" |
command="$command --mods=../code" |
305 |
else |
else |
306 |
command="$command --mods=../code_ad" |
command="$command --mods=../code_ad" |
|
command="$command -adof=../../../tools/adjoint_options/adjoint_staf" |
|
307 |
fi |
fi |
308 |
if test "x$OPTFILE" != xNONE ; then |
if test "x$OPTFILE" != xNONE ; then |
309 |
command="$command --optfile=$OPTFILE" |
command="$command --optfile=$OPTFILE" |
518 |
# make output.txt |
# make output.txt |
519 |
echo |
echo |
520 |
rm -f run.log |
rm -f run.log |
521 |
if test output.txt -ot mitgcmuv ; then |
if test $OUTPUTFILE -ot $EXECUTABLE ; then |
522 |
( eval $COMMAND ) > run.log 2>&1 |
( eval $COMMAND ) > run.log 2>&1 |
523 |
RETVAL=$? |
RETVAL=$? |
524 |
else |
else |
525 |
echo ' output.txt is up to date ' > run.log 2>&1 |
echo " $OUTPUTFILE is up to date " > run.log 2>&1 |
526 |
RETVAL=0 |
RETVAL=0 |
527 |
fi |
fi |
528 |
# echo "COMMAND='$COMMAND'" |
# echo "COMMAND='$COMMAND'" |
534 |
# if test "x$ADM" = x ; then |
# if test "x$ADM" = x ; then |
535 |
# cp output.txt $CDIR"/output.txt" |
# cp output.txt $CDIR"/output.txt" |
536 |
# else |
# else |
537 |
# cp output.txt_adm $CDIR"/output.txt_adm" |
# cp output_adm.txt $CDIR"/output_adm.txt" |
538 |
# fi |
# fi |
539 |
if test -s STDERR.0000 ; then cp STDERR.0000 $CDIR"/STDERR.0000" ; fi |
if test -s STDERR.0000 ; then cp STDERR.0000 $CDIR"/STDERR.0000" ; fi |
540 |
return 0 |
return 0 |
810 |
OPTFILE=$MITGCM_OF |
OPTFILE=$MITGCM_OF |
811 |
fi |
fi |
812 |
|
|
813 |
|
if test "x$ADM" = xt ; then |
814 |
|
EXECUTABLE="mitgcmuv_ad" |
815 |
|
OUTPUTFILE="output_adm.txt" |
816 |
|
else |
817 |
|
EXECUTABLE="mitgcmuv" |
818 |
|
OUTPUTFILE="output.txt" |
819 |
|
fi |
820 |
|
|
821 |
if test "x$ADM" = xt -a "x$COMMAND" = x ; then |
if test "x$ADM" = xt -a "x$COMMAND" = x ; then |
822 |
COMMAND="./mitgcmuv_ad > output.txt_adm 2>&1" |
COMMAND="./$EXECUTABLE > $OUTPUTFILE" |
823 |
fi |
fi |
824 |
|
|
825 |
if test "x$COMMAND" = x ; then |
if test "x$COMMAND" = x ; then |
826 |
COMMAND="./mitgcmuv > output.txt" |
COMMAND="./$EXECUTABLE > $OUTPUTFILE" |
827 |
fi |
fi |
828 |
|
|
829 |
echo "OK" |
#echo "OK" |
830 |
|
echo "OK (COMMAND= $COMMAND )" |
831 |
|
|
832 |
# create the FORTRAN comparison code |
# create the FORTRAN comparison code |
833 |
createcodelet |
createcodelet |
949 |
if test "x$ADM" = x ; then |
if test "x$ADM" = x ; then |
950 |
fout=$dir"/results/output.txt" |
fout=$dir"/results/output.txt" |
951 |
else |
else |
952 |
fout=$dir"/results_ad/output.txt_adm" |
fout=$dir"/results_ad/output_adm.txt" |
953 |
fi |
fi |
954 |
if test ! -r $fout ; then |
if test ! -r $fout ; then |
955 |
echo "can't read \"$fout\" -- skipping $dir" |
echo "can't read \"$fout\" -- skipping $dir" |
1087 |
echo "UNAMEA='$UNAMEA'" >> $CDIR"/summary.txt" |
echo "UNAMEA='$UNAMEA'" >> $CDIR"/summary.txt" |
1088 |
echo "DATE='$DATE'" >> $CDIR"/summary.txt" |
echo "DATE='$DATE'" >> $CDIR"/summary.txt" |
1089 |
echo "tdir='$dir'" >> $CDIR"/summary.txt" |
echo "tdir='$dir'" >> $CDIR"/summary.txt" |
1090 |
|
grep -A3 'Seconds in section "ALL' $dir/$rundir/$OUTPUTFILE \ |
1091 |
|
>> $CDIR"/summary.txt" |
1092 |
fi |
fi |
1093 |
|
|
1094 |
postclean $dir/$builddir |
postclean $dir/$builddir |