/[MITgcm]/MITgcm_contrib/high_res_cube/input/modpickup
ViewVC logotype

Contents of /MITgcm_contrib/high_res_cube/input/modpickup

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


Revision 1.1 - (show annotations) (download)
Wed Feb 11 06:33:58 2004 UTC (21 years, 5 months ago) by dimitri
Branch: MAIN
CVS Tags: hrcube4, hrcube5, hrcube_3
added high_res_cube/input/modpickup

1 #! /bin/csh
2 set N = $1
3 set filesize=7515849600
4 set last_pickup=`ls -lt pickup.ckpt*.data | awk '$5~/'${filesize}'/{print $NF}'|head -1 `
5 if (-e ${last_pickup}) then
6 set last_meta=`echo $last_pickup | sed 's/data/meta/'`
7 set timestep=`awk '$1~/timeStepNumber/{printf("%010d",$4)}' $last_meta`
8 mv ${last_pickup} pickup.${timestep}.data
9 endif
10
11 set filesize=187272000
12 set last_pickup_seaice=`ls -lt pickup_seaice.ckpt*.data | awk '$5~/'${filesize}'/{print $NF}'|head -1 `
13 if (-e ${last_pickup_seaice}) then
14 set last_meta=`echo $last_pickup_seaice | sed 's/data/meta/'`
15 set timestep=`awk '$1~/timeStepNumber/{printf("%010d",$4)}' $last_meta`
16 mv ${last_pickup_seaice} pickup_seaice.${timestep}.data
17
18 set newiter0=`expr $timestep \* 1`
19 ex - data_hr$N >> /dev/null <<EOF
20 /niter0=
21 c
22 niter0=${newiter0},
23 .
24 w
25 q
26 EOF
27 endif

  ViewVC Help
Powered by ViewVC 1.1.22