29 |
|
|
30 |
# list of pickup(s) that are needed for a restart : |
# list of pickup(s) that are needed for a restart : |
31 |
#listP='pickup pickup_cd pickup_nh pickup_ic pickup_land pickup_seaice' |
#listP='pickup pickup_cd pickup_nh pickup_ic pickup_land pickup_seaice' |
|
listP='pickup' |
|
32 |
|
|
33 |
mpi=0 |
mpi=0 |
34 |
if [ $mpi -ge 1 ] |
if [ $mpi -ge 1 ] |
59 |
|
|
60 |
if test $flag = 1 ; then |
if test $flag = 1 ; then |
61 |
#------------ |
#------------ |
62 |
rm -r $dir1 $dir2 $dir3 |
if test -d $dir1 -o -d $dir2 -o -d $dir3 |
63 |
|
then echo -n 'remove dir: ' |
64 |
|
if test -d $dir1 ; then echo -n $dir1 ' , ' ; rm -r $dir1 ; fi |
65 |
|
if test -d $dir2 ; then echo -n $dir2 ' , ' ; rm -r $dir2 ; fi |
66 |
|
if test -d $dir3 ; then echo -n $dir3 ' , ' ; rm -r $dir3 ; fi |
67 |
|
echo ' ' |
68 |
|
fi |
69 |
mkdir $dir1 $dir2 $dir3 |
mkdir $dir1 $dir2 $dir3 |
70 |
|
rm -f STDERR.0000 |
71 |
|
|
72 |
cp -p data.tst data |
cp -p data.tst data |
73 |
numF=`ls temp/pickup*.${num0c}* 2> /dev/null | grep -c pickup` |
numF=`ls temp/pickup*.${num0c}* 2> /dev/null | grep -c pickup` |
75 |
echo '==> START RUN 2 x' $Nit 'it' |
echo '==> START RUN 2 x' $Nit 'it' |
76 |
if [ $mpi -ge 1 ] |
if [ $mpi -ge 1 ] |
77 |
then ./$gcmExc std_outp.2it > TTT.out.2it 2>&1 |
then ./$gcmExc std_outp.2it > TTT.out.2it 2>&1 |
78 |
else ./$gcmExc > std_outp.2it 2>&1 |
else ./$gcmExc > std_outp.2it |
79 |
fi |
fi |
80 |
|
mv STDERR.0000 std__err.2it |
81 |
if test -f pickup.ckptA.001.001.data |
if test -f pickup.ckptA.001.001.data |
82 |
then out=`egrep -c 'STOP ABNORMAL END' std_outp.2it` |
then out=`egrep -c 'STOP ABNORMAL END' std_outp.2it` |
83 |
else out=9 ; fi |
else out=9 ; fi |
84 |
if test $out != 0 ; then echo 'RUN 2it STOP before END => exit' ; exit ; fi |
if test $out != 0 ; then echo 'RUN 2it STOP before END => exit' ; exit ; fi |
85 |
echo '==> END RUN 2 x' $Nit 'it' |
echo '==> END RUN 2 x' $Nit 'it' |
86 |
|
listP=`ls pickup*.ckptA* | sed 's/\..*//g' | uniq` |
87 |
|
echo ' listP=' $listP |
88 |
for xx in $listP |
for xx in $listP |
89 |
do |
do |
90 |
rnp -s $xx.ckptA $xx.$num2c |
rnp -s $xx.ckptA $xx.$num2c |
91 |
done |
done |
92 |
mv *.0??.0??.* $dir1 |
mv *.0??.0??.* $dir1 |
93 |
mv R?.data R?.meta DR?.data DR?.meta *.txt $dir1 |
txtF=`ls -1 *.txt 2> /dev/null` |
94 |
mv $dir1/pickup*.${num0c}* . |
mv R?.data R?.meta DR?.data DR?.meta $txtF $dir1 |
95 |
|
listS=`ls $dir1/pickup*.${num0c}* 2> /dev/null | head -1` |
96 |
|
if test "x$listS" != x ; then mv $dir1/pickup*.${num0c}* . ; fi |
97 |
#-- |
#-- |
98 |
sed "s/^ nTimeSteps=$Dbl/ nTimeSteps=$Nit/g" data.tst > data |
sed "s/^ nTimeSteps=$Dbl/ nTimeSteps=$Nit/g" data.tst > data |
99 |
echo '==> START RUN 1iA' |
echo '==> START RUN 1iA' |
100 |
if [ $mpi -ge 1 ] |
if [ $mpi -ge 1 ] |
101 |
then ./$gcmExc std_outp.1iA > TTT.out.1iA 2>&1 |
then ./$gcmExc std_outp.1iA > TTT.out.1iA 2>&1 |
102 |
else ./$gcmExc > std_outp.1iA 2>&1 |
else ./$gcmExc > std_outp.1iA |
103 |
fi |
fi |
104 |
|
mv STDERR.0000 std__err.1iA |
105 |
if test -f pickup.ckptA.001.001.data |
if test -f pickup.ckptA.001.001.data |
106 |
then out=`egrep -c 'STOP ABNORMAL END' std_outp.1iA` |
then out=`egrep -c 'STOP ABNORMAL END' std_outp.1iA` |
107 |
else out=9 ; fi |
else out=9 ; fi |
112 |
rnp -s $xx.ckptA $xx.$num1c |
rnp -s $xx.ckptA $xx.$num1c |
113 |
done |
done |
114 |
mv *.0??.0??.* $dir2 |
mv *.0??.0??.* $dir2 |
115 |
mv R?.data R?.meta DR?.data DR?.meta *.txt $dir2 |
txtF=`ls -1 *.txt 2> /dev/null` |
116 |
rm $dir2/pickup*.${num0c}* |
mv R?.data R?.meta DR?.data DR?.meta $txtF $dir2 |
117 |
|
listS=`ls $dir2/pickup*.${num0c}* 2> /dev/null | head -1` |
118 |
|
if test "x$listS" != x ; then rm $dir1/pickup*.${num0c}* . ; fi |
119 |
#-- |
#-- |
120 |
ln -s $dir2/pickup*.$num1c.* . |
ln -s $dir2/pickup*.$num1c.* . |
121 |
mv data data.tmp |
mv data data.tmp |
123 |
echo '==> START RUN 1iB' |
echo '==> START RUN 1iB' |
124 |
if [ $mpi -ge 1 ] |
if [ $mpi -ge 1 ] |
125 |
then ./$gcmExc std_outp.1iB > TTT.out.1iB 2>&1 |
then ./$gcmExc std_outp.1iB > TTT.out.1iB 2>&1 |
126 |
else ./$gcmExc > std_outp.1iB 2>&1 |
else ./$gcmExc > std_outp.1iB |
127 |
fi |
fi |
128 |
|
mv STDERR.0000 std__err.1iB |
129 |
if test -f pickup.ckptA.001.001.data |
if test -f pickup.ckptA.001.001.data |
130 |
then out=`egrep -c 'STOP ABNORMAL END' std_outp.1iB` |
then out=`egrep -c 'STOP ABNORMAL END' std_outp.1iB` |
131 |
else out=9 ; fi |
else out=9 ; fi |
136 |
rnp -s $xx.ckptA $xx.$num2c |
rnp -s $xx.ckptA $xx.$num2c |
137 |
done |
done |
138 |
mv *.0??.0??.* $dir3 |
mv *.0??.0??.* $dir3 |
139 |
mv R?.data R?.meta DR?.data DR?.meta *.txt $dir3 |
txtF=`ls -1 *.txt 2> /dev/null` |
140 |
|
mv R?.data R?.meta DR?.data DR?.meta $txtF $dir3 |
141 |
rm $dir3/pickup*.$num1c.* |
rm $dir3/pickup*.$num1c.* |
142 |
exit |
exit |
143 |
#------------ |
#------------ |
162 |
if test $flag = 3 ; then |
if test $flag = 3 ; then |
163 |
#------------ |
#------------ |
164 |
difex=`ls ~jmc/bin/dif_data` |
difex=`ls ~jmc/bin/dif_data` |
165 |
|
listP=`( cd $dir1 ; ls pickup*.$num2c* | sed 's/\..*//g' | uniq )` |
166 |
for xx in $listP |
for xx in $listP |
167 |
do |
do |
168 |
$difex $dir1 $dir3 $xx.$num2c |
$difex $dir1 $dir3 $xx.$num2c |