| 135 |
fi |
fi |
| 136 |
|
|
| 137 |
# EXTRA = non-standard list of experiment |
# EXTRA = non-standard list of experiment |
| 138 |
ADJOINT= |
ADJOINT=0 |
| 139 |
TANGLIN= |
TANGLIN=0 |
| 140 |
|
OPENAD=0 |
| 141 |
RESTART=0 |
RESTART=0 |
| 142 |
EXTRA= |
EXTRA= |
| 143 |
FAST=0 |
FAST=0 |
| 146 |
MTH=0 |
MTH=0 |
| 147 |
UR4=0 |
UR4=0 |
| 148 |
if test -r $dir/summary.txt ; then |
if test -r $dir/summary.txt ; then |
| 149 |
comm=`grep 'ADJOINT=true' $dir/summary.txt 2>/dev/null` |
ADJOINT=`grep -c -i '^ADJOINT' $dir/summary.txt` |
| 150 |
eval $comm |
if test "x$ADJOINT" = x1 ; then |
| 151 |
comm=`grep 'TANGLIN=true' $dir/summary.txt 2>/dev/null` |
OPENAD=`grep -c '^Adjoint .* OpenAD' $dir/summary.txt` |
| 152 |
eval $comm |
fi |
| 153 |
|
TANGLIN=`grep -c -i '^TANGLIN' $dir/summary.txt` |
| 154 |
|
if test "x$TANGLIN" = x1 ; then |
| 155 |
|
OPENAD=`grep -c '^TangLin .* OpenAD' $dir/summary.txt` |
| 156 |
|
fi |
| 157 |
RESTART=`grep -c 'test 2+2=4 summary' $dir/summary.txt` |
RESTART=`grep -c 'test 2+2=4 summary' $dir/summary.txt` |
| 158 |
comm=`grep '^run: .*testreport.* ' $dir/summary.txt` |
comm=`grep '^run: .*testreport.* ' $dir/summary.txt` |
| 159 |
EXTRA=`echo "$comm" | grep " -*-tdir\>" | sed -e "s/^.* -*-tdir\>//" -e "s/ -.*$//"` |
EXTRA=`echo "$comm" | grep " -*-tdir\>" | sed -e "s/^.* -*-tdir\>//" -e "s/ -.*$//"` |
| 185 |
UR4=`echo "$comm" | grep -c " -*-ur4\>"` |
UR4=`echo "$comm" | grep -c " -*-ur4\>"` |
| 186 |
fi |
fi |
| 187 |
fi |
fi |
| 188 |
if test "x$ADJOINT" = xtrue ; then |
if test "x$ADJOINT" = x1 ; then |
| 189 |
kind="adjoint" ; order=0 |
kind="adjoint-taf" ; order=0 |
| 190 |
elif test "x$TANGLIN" = xtrue ; then |
if test "x$OPENAD" = x1 ; then |
| 191 |
kind="tanglin" ; order=1 |
kind="adjoint-oad" ; order=2 |
| 192 |
|
fi |
| 193 |
|
elif test "x$TANGLIN" = x1 ; then |
| 194 |
|
kind="tanglin-taf" ; order=1 |
| 195 |
|
if test "x$OPENAD" = x1 ; then |
| 196 |
|
kind="tanglin-oad" ; order=3 |
| 197 |
|
fi |
| 198 |
elif test "x$RESTART" = x0 ; then |
elif test "x$RESTART" = x0 ; then |
| 199 |
kind="forward" ; order=2 |
kind="forward" ; order=4 |
| 200 |
else |
else |
| 201 |
kind="restart" ; order=3 |
kind="restart" ; order=5 |
| 202 |
fi |
fi |
| 203 |
order=`expr $order + 10 \* $EXTRA` |
order=`expr $order + 10 \* $EXTRA` |
| 204 |
order=`printf '%3.3i' $order` |
order=`printf '%3.3i' $order` |