/[MITgcm]/MITgcm_contrib/jmc_script/tst_2+2_cpl
ViewVC logotype

Diff of /MITgcm_contrib/jmc_script/tst_2+2_cpl

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.3 by jmc, Wed Nov 7 01:40:47 2007 UTC revision 1.6 by jmc, Mon Sep 14 18:52:21 2009 UTC
# Line 9  rnp_loc() Line 9  rnp_loc()
9  #   rename files with prefix = 'arg_1' to files with prefix = 'arg_2'  #   rename files with prefix = 'arg_1' to files with prefix = 'arg_2'
10      echo 'rnp_loc:' $1 $2      echo 'rnp_loc:' $1 $2
11  #   rnp -s $1 $2  #   rnp -s $1 $2
12      yy=$1 ; zz=$2      listY=`ls -1 $1*`
13      listF=`ls -1 ${yy}*`      for yy in $listY
     for xx in $listF  
14      do      do
15        ff=`echo $xx | sed "s/^$yy/$zz/"`        zz=`echo $yy | sed "s/^$1/$2/"`
16        mv $xx $ff        mv $yy $zz
17      done      done
18  }  }
19    
20  dif_tiles()  dif_tiles()
21  {  {
22  #   dif_data_loc dir1 dir2 file  #   dif_data_loc dd1 dd2 file
23  #   for all tiles  ==> do diff dir1/file dir2/file'  #   for all tiles  ==> do diff dd1/file dd2/file'
24      dir1=$1 ; dir2=$2 ; zz=$3      dd1=$1 ; dd2=$2 ; zz=$3
25      chkmeta='Y'      chkmeta='Y'
26      listX=`(cd $dir1 ; ls $zz.*.data | sed "s/$zz\.//" | sed "s/\.data//")`      listY=`(cd $dd1 ; ls $zz.*.data | sed "s/$zz\.//" | sed "s/\.data//")`
27      echo '--> file=' $zz ', listX=' $listX      echo '--> file='$zz', listY='$listY
28      for xx in $listX      for yy in $listY
29      do      do
30        echo diff $dir1/$zz.$xx.data $dir2        echo diff $dd1/$zz.$yy.data $dd2
31        diff $dir1/$zz.$xx.data $dir2        diff $dd1/$zz.$yy.data $dd2
32        out=$?        out=$?
33        if test $out != 0        if test $out != 0
34        then echo 'Diff outp=' $out ' ==> stop'        then echo 'Diff outp=' $out ' ==> stop'
35         exit ; fi         exit ; fi
36        if test $chkmeta = 'Y'        if test $chkmeta = 'Y'
37        then        then
38         echo diff $dir1/$zz.$xx.meta $dir3         echo diff $dd1/$zz.$yy.meta $dd2
39         diff $dir1/$zz.$xx.meta $dir3         diff $dd1/$zz.$yy.meta $dd2
40         out=$?         out=$?
41         if test $out != 0         if test $out != 0
42         then echo 'Diff outp=' $out ' ==> stop'         then echo 'Diff outp=' $out ' ==> stop'
# Line 111  nat2c=`printf "%10.10i\n" $nat2` Line 110  nat2c=`printf "%10.10i\n" $nat2`
110  echo 'Atm (rank_2):' $nat0  $nat1  $nat2  echo 'Atm (rank_2):' $nat0  $nat1  $nat2
111  echo $nat0c $nat1c $nat2c  echo $nat0c $nat1c $nat2c
112    
113  listOc="pickup pickup_cpl"  listOc="pickup"
114  listAt="pickup pickup_cpl pickup_ic pickup_land"  listAt="pickup pickup_cpl pickup_ic pickup_land"
115    
116  #- dir where to put the results :  #- dir where to put the results :
# Line 244  then Line 243  then
243   done   done
244   echo 'move pickups to' $dir3/ocn   echo 'move pickups to' $dir3/ocn
245   mv pickup*.$noc2c.* ../$dir3/ocn   mv pickup*.$noc2c.* ../$dir3/ocn
246     rm -f pickup*.$noc1c.*
247   cd ..   cd ..
248    
249   mkdir $dir3/atm   mkdir $dir3/atm
# Line 253  then Line 253  then
253   done   done
254   echo 'move pickups to' $dir3/atm   echo 'move pickups to' $dir3/atm
255   mv pickup*.$nat2c.* ../$dir3/atm   mv pickup*.$nat2c.* ../$dir3/atm
256     rm -f pickup*.$nat1c.*
257   cd ..   cd ..
258   echo 'restore std data files'   echo 'restore std data files'
259   cp -p input_cpl/data rank_0   cp -p input_cpl/data rank_0
# Line 324  then Line 325  then
325   done   done
326   exit   exit
327  fi  fi
   
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22