322 |
'AthSiG') testoutput_var $1 "thSI_Ice_Area_G" "thSIc Area Global" $2 $refoutp ; yy=$? ;; |
'AthSiG') testoutput_var $1 "thSI_Ice_Area_G" "thSIc Area Global" $2 $refoutp ; yy=$? ;; |
323 |
'AthSiS') testoutput_var $1 "thSI_Ice_Area_S" "thSIc Area South" $2 $refoutp ; yy=$? ;; |
'AthSiS') testoutput_var $1 "thSI_Ice_Area_S" "thSIc Area South" $2 $refoutp ; yy=$? ;; |
324 |
'AthSiN') testoutput_var $1 "thSI_Ice_Area_N" "thSIc Area North" $2 $refoutp ; yy=$? ;; |
'AthSiN') testoutput_var $1 "thSI_Ice_Area_N" "thSIc Area North" $2 $refoutp ; yy=$? ;; |
325 |
'HthSiG') testoutput_var $1 "thSI_IceH_ave_G" "thSIc H Global" $2 $refoutp ; yy=$? ;; |
'HthSiG') testoutput_var $1 "thSI_IceH_ave_G" "thSIc H Glob-ave" $2 $refoutp ; yy=$? ;; |
326 |
'HthSiS') testoutput_var $1 "thSI_IceH_ave_S" "thSIc H South" $2 $refoutp ; yy=$? ;; |
'HthSiS') testoutput_var $1 "thSI_IceH_ave_S" "thSIc H South-av" $2 $refoutp ; yy=$? ;; |
327 |
'HthSiN') testoutput_var $1 "thSI_IceH_ave_N" "thSIc H North" $2 $refoutp ; yy=$? ;; |
'HthSiN') testoutput_var $1 "thSI_IceH_ave_N" "thSIc H North-av" $2 $refoutp ; yy=$? ;; |
328 |
|
'HthMxS') testoutput_var $1 "thSI_IceH_max_S" "thSIc H South-max" $2 $refoutp ; yy=$? ;; |
329 |
|
'HthMxN') testoutput_var $1 "thSI_IceH_max_N" "thSIc H North-max" $2 $refoutp ; yy=$? ;; |
330 |
|
'StrmIc') testoutput_var $1 "STREAMICE_FP_ERR" "StreamIce Solver" $2 $refoutp ; yy=$? ;; |
331 |
*) yy=99; echo "WARNING: asking for var=$xx : not recognized !" 1>&2 ;; |
*) yy=99; echo "WARNING: asking for var=$xx : not recognized !" 1>&2 ;; |
332 |
esac |
esac |
333 |
if test $xx = $sVar |
if test $xx = $sVar |
470 |
rm -f $RUNLOG *.txt STD* w2_tile_topology.????.log *diagnostics.log datetime |
rm -f $RUNLOG *.txt STD* w2_tile_topology.????.log *diagnostics.log datetime |
471 |
rm -rf mnc_test_* |
rm -rf mnc_test_* |
472 |
rm -f *_MIT_CE_000.opt0000 costfunction*0000 |
rm -f *_MIT_CE_000.opt0000 costfunction*0000 |
473 |
|
rm -f oad_cp.000.[0-9][0-9][0-9][0-9][0-9] |
474 |
echo successful |
echo successful |
475 |
exit 0 |
exit 0 |
476 |
) |
) |
539 |
fi |
fi |
540 |
fi |
fi |
541 |
if test $KIND = 1 -a -f taf_ftl.log ; then |
if test $KIND = 1 -a -f taf_ftl.log ; then |
542 |
head -1 taf_ftl.log >> $CDIR"/summary.txt" |
head -1 taf_ftl.log >> $CDIR"/summary.txt" |
543 |
fi |
fi |
544 |
if test $KIND = 2 -a -f taf_ad.log ; then |
if test $KIND = 2 -a -f taf_ad.log ; then |
545 |
head -1 taf_ad.log >> $CDIR"/summary.txt" |
head -1 taf_ad.log >> $CDIR"/summary.txt" |
546 |
nerr=`grep -c 'TAF *.* ERROR ' taf_ad.log` |
nerr=`grep -c 'TAF *.* ERROR ' taf_ad.log` |
547 |
nwar=`grep -c 'TAF RECOMPUTATION *.* WARNING ' taf_ad.log` |
nwar=`grep -c 'TAF RECOMPUTATION *.* WARNING ' taf_ad.log` |
548 |
echo " TAF reports $nerr Errors and $nwar Recomputation Warnings" \ |
if test -f taf_output ; then |
549 |
|
n2er=`grep -c 'TAF *.* ERROR ' taf_output` |
550 |
|
nerr=`expr $nerr + $n2er` |
551 |
|
fi |
552 |
|
echo " TAF reports $nerr Errors and $nwar Recomputation Warnings" \ |
553 |
>> $CDIR"/summary.txt" |
>> $CDIR"/summary.txt" |
554 |
fi |
fi |
555 |
if test $mk_fail != 0 ; then return $mk_fail ; fi |
if test $mk_fail != 0 ; then return $mk_fail ; fi |
796 |
# output do not exist or is older than executable: |
# output do not exist or is older than executable: |
797 |
rm -f $OUTPUTFILE $RUNLOG ; touch $RUNLOG |
rm -f $OUTPUTFILE $RUNLOG ; touch $RUNLOG |
798 |
if test -f run.log_tmp ; then cat run.log_tmp >> $RUNLOG ; fi |
if test -f run.log_tmp ; then cat run.log_tmp >> $RUNLOG ; fi |
799 |
|
#- Divided Adjoint Run: |
800 |
|
# get the number of additional runs (add_DIVA_runs) from file "run_ADM_DIVA" |
801 |
|
if test $KIND = 2 -a -f run_ADM_DIVA ; then |
802 |
|
adm_diva_nb=`sed -n '/^ *add_DIVA_runs\>.*=/p' run_ADM_DIVA | sed 's/ //g'` |
803 |
|
echo " Divided Adjoint Run: $adm_diva_nb" >> $RUNLOG |
804 |
|
eval "let $adm_diva_nb" |
805 |
|
if [ $add_DIVA_runs -ge 1 ] ; then |
806 |
|
rm -f costf* divided.ctrl snapshot* |
807 |
|
echo -n "(add_DIVA_runs=$add_DIVA_runs) ... " |
808 |
|
for ii in `seq 1 $add_DIVA_runs` ; do |
809 |
|
( eval $COMMAND ) >> $RUNLOG 2>&1 |
810 |
|
echo " additional DIVA run # $ii : done" >> $RUNLOG |
811 |
|
mv -f $OUTPUTFILE ${OUTPUTFILE}.diva_${ii} |
812 |
|
done |
813 |
|
fi |
814 |
|
fi |
815 |
|
#- special DIVA processing ends here |
816 |
( eval $COMMAND ) >> $RUNLOG 2>&1 |
( eval $COMMAND ) >> $RUNLOG 2>&1 |
817 |
RETVAL=$? |
RETVAL=$? |
818 |
ENDVAL=`tail $OUTPUTFILE | grep -c 'PROGRAM MAIN: Execution ended Normally'` |
ENDVAL=`tail $OUTPUTFILE | grep -c 'PROGRAM MAIN: Execution ended Normally'` |
937 |
fi |
fi |
938 |
fi |
fi |
939 |
printf ' %s' $nm |
printf ' %s' $nm |
940 |
|
if test $KIND = 2 ; then |
941 |
|
#-- apppend taf repport summary: |
942 |
|
tafrep=`grep -c '^ TAF reports ' $CDIR/summary.txt` |
943 |
|
if test $tafrep = 1 ; then |
944 |
|
grep '^ TAF reports ' $CDIR/summary.txt | awk '{printf " (e=%i, w=%i)",$3,$6}' |
945 |
|
fi |
946 |
|
fi |
947 |
printf '\n' |
printf '\n' |
948 |
|
|
949 |
} |
} |
1408 |
else |
else |
1409 |
line_0=`printf '%s %2i' 'default ' $MATCH_CRIT` |
line_0=`printf '%s %2i' 'default ' $MATCH_CRIT` |
1410 |
if test $KIND = 1 ; then |
if test $KIND = 1 ; then |
1411 |
echo "TANGLIN=true" >> $SUMMARY |
#echo "TANGLIN=true" >> $SUMMARY |
1412 |
|
echo "TangLin generated by TAF" >> $SUMMARY |
1413 |
|
elif test $KIND = 3 ; then |
1414 |
|
echo "TangLin generated by OpenAD" >> $SUMMARY |
1415 |
|
elif test $KIND = 2 ; then |
1416 |
|
#echo "ADJOINT=true" >> $SUMMARY |
1417 |
|
echo "Adjoint generated by TAF" >> $SUMMARY |
1418 |
|
else |
1419 |
|
echo "Adjoint generated by OpenAD" >> $SUMMARY |
1420 |
|
fi |
1421 |
|
if test $KIND = 1 -o $KIND = 3 ; then |
1422 |
line_1="G D M C T F" |
line_1="G D M C T F" |
1423 |
line_2="e p a R o L D" |
line_2="e p a R o L D" |
1424 |
else |
else |
|
echo "ADJOINT=true" >> $SUMMARY |
|
1425 |
line_1="G D M C A F" |
line_1="G D M C A F" |
1426 |
line_2="e p a R o d D" |
line_2="e p a R o d D" |
1427 |
fi |
fi |
1545 |
# Check whether there are "extra runs" for this testdir |
# Check whether there are "extra runs" for this testdir |
1546 |
extra_runs= |
extra_runs= |
1547 |
if test "x$NORUN" = xf ; then |
if test "x$NORUN" = xf ; then |
1548 |
ex_run_dirs=`( cd $dir ; echo $inputdir.* )` |
ex_run_dirs=`( cd $dir ; ls -d $inputdir.* 2> /dev/null )` |
1549 |
fi |
fi |
1550 |
#echo "ex_run_dirs='$ex_run_dirs'" |
#echo "ex_run_dirs='$ex_run_dirs'" |
1551 |
for exd in $ex_run_dirs ; do |
for exd in $ex_run_dirs ; do |
1552 |
name=`echo $exd | sed -e "s/$inputdir\.//"` |
name=`echo $exd | sed -e "s/$inputdir\.//"` |
1553 |
refExOut=`echo $ref_outp | sed "s/\./.${name}./"` |
refExOut=`echo $ref_outp | sed "s/\./.${name}./"` |
1554 |
outf="$dir/results/$refExOut" |
outf="$dir/results/$refExOut" |
|
#if test -f $outf -a -r $outf ; then |
|
1555 |
if test -r $outf -o -r ${outf}.gz ; then |
if test -r $outf -o -r ${outf}.gz ; then |
1556 |
if test "x$MULTI_THREAD" = "xt" ; then |
if test "x$MULTI_THREAD" = "xt" ; then |
1557 |
if test -r $dir"/"$exd"/eedata.mth" ; then |
if test -r $dir"/"$exd"/eedata.mth" ; then |
1635 |
linkdata $dir/$pfxdir.$ex $inputdir.$ex $inputdir |
linkdata $dir/$pfxdir.$ex $inputdir.$ex $inputdir |
1636 |
runmodel $dir/$pfxdir.$ex && run=Y \ |
runmodel $dir/$pfxdir.$ex && run=Y \ |
1637 |
&& results=`testoutput_run $dir $pfxdir.$ex $refExOut` |
&& results=`testoutput_run $dir $pfxdir.$ex $refExOut` |
1638 |
fres=`formatresults $dir ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N} $results` |
fres=`formatresults $dir.$ex ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N} $results` |
|
fres="$fres.$ex" |
|
1639 |
echo 1>&2 |
echo 1>&2 |
1640 |
echo "$fres" | sed 's/ 99/ --/g' | sed 's/ > />/' | sed 's/ < /</' >> $SUMMARY |
echo "$fres" | sed 's/ 99/ --/g' | sed 's/ > />/' | sed 's/ < /</' >> $SUMMARY |
1641 |
echo "fresults='$fres'" | sed 's/ 99/ --/g' >> $locDIR"/summary.txt" |
echo "fresults='$fres'" | sed 's/ 99/ --/g' >> $locDIR"/summary.txt" |