Subversion Repositories lagranto.um

Rev

Rev 3 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3 Rev 12
1 
#!/bin/csh
 1 
#!/bin/csh
2 
 
 2 
 
3 
set USAGE = "Usage: changet startdate (form: yyyymmdd_tt) (file)"
 3 
set USAGE = "Usage: changet startdate (form: yyyymmdd_tt) (file)"
4 
 
 4 
 
5 
if ( $#argv < 1 ) then
 5 
if ( $#argv < 1 ) then
6 
  echo "$USAGE"
 6 
  echo "$USAGE"
7 
  exit 1
 7 
  exit 1
8 
endif
 8 
endif
9 
 
 9 
 
10 
set stdate=$1
 10 
set stdate=$1
11 
set fort=fort.9
 11 
set fort=fort.9
12 
 
 12 
 
13 
if ( $#argv == 2 ) then
 13 
if ( $#argv == 2 ) then
14 
  set string=$2
 14 
  set string=$2
15 
else
 15 
else
16 
  set string='P[_0-9]*[0-9] S[_0-9]*[0-9]'
 16 
  set string='P[_0-9]*[0-9] S[_0-9]*[0-9]'
17 
endif
 17 
endif
18 
 
 18 
 
19 
foreach i ( $string )
 19 
foreach i ( $string )
20 
 
 20 
 
21 
  \rm -f $fort
 21 
  \rm -f $fort
22 
  touch $fort
 22 
  touch $fort
23 
 
 23 
 
24 
# set date = `echo $i | sed -e 's/[A-Za-z_]*//' | cut -c 1-9`
 24 
# set date = `echo $i | sed -e 's/[A-Za-z_]*//' | cut -c 1-9`
25 
  set date = `echo $i | sed -e 's/[A-Za-z_]*//'`
 25 
  set date = `echo $i | sed -e 's/[A-Za-z_]*//'`
26 
  echo $i >> $fort
 26 
  echo $i >> $fort
27 
 
 27 
 
28 
  set date=`echo ${date}00 | cut -c 1-13`
28 
  set date=`echo ${date}00 | cut -c 1-13`
29 
  set stdate=`echo ${stdate}00 | cut -c 1-13`
 29 
  set stdate=`echo ${stdate}00 | cut -c 1-13`
30 
 
 30 
 
31 
  set tim = `${LAGRANTO}/goodies/gettidiff $date $stdate`
 31 
  set tim = `${LAGRANTO}/goodies/gettidiff $date $stdate`
32 
  echo ${tim} >> $fort
 32 
  echo ${tim} >> $fort
33 
 
 33 
 
34 
  ${LAGRANTO}/goodies/changet
 34 
  ${LAGRANTO}/goodies/changet
35 
 
 35 
 
36 
end
 36 
end
37 
 
 37 
 
38 
#\rm -f $fort
 38 
#\rm -f $fort