Subversion Repositories lagranto.wrf

Rev

Rev 23 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 23 Rev 25
Line 281... Line 281...
281
  echo
281
  echo
282
  echo "Input files availability < 1 hour ($timeinc): switch to hires"
282
  echo "Input files availability < 1 hour ($timeinc): switch to hires"
283
  echo "mode. All input files must be of form: P{yyyymmdd_hhmm}"
283
  echo "mode. All input files must be of form: P{yyyymmdd_hhmm}"
284
  set hires = 1
284
  set hires = 1
285
  set timeinc_min = `echo "(${timeinc} * 100 + 0.5)/1" | bc`
285
  set timeinc_min = `echo "(${timeinc} * 100 + 0.5)/1" | bc`
286
  set timeinc     = `echo "scale=2; ${timeinc} * 100 / 60" | bc`
286
  set timeinc     = `echo "scale=8; ${timeinc} * 100 / 60" | bc`
287
  goto hires
287
  goto hires
288
endif
288
endif
289
 
289
 
290
# Search the first file to use: We step through all P files and see whether they are
290
# Search the first file to use: We step through all P files and see whether they are
291
# good P files. Let's first do the test for the first data file found. If it's ok, we 
291
# good P files. Let's first do the test for the first data file found. If it's ok, we 
Line 386... Line 386...
386
echo $datfiles 
386
echo $datfiles 
387
while ( $num > 1 )
387
while ( $num > 1 )
388
  if ( $hires == 0 ) then
388
  if ( $hires == 0 ) then
389
     set date=`${LAGRANTO}/goodies/newtime $date $timeinc`
389
     set date=`${LAGRANTO}/goodies/newtime $date $timeinc`
390
  else
390
  else
391
     echo ${date} ${timeinc_min}
-
 
392
     set date=`${LAGRANTO}/goodies/newtime $date $timeinc_min`
391
     set date=`${LAGRANTO}/goodies/newtime $date $timeinc_min`
393
  endif
392
  endif
394
  
393
  
395
  echo ${date}
394
  echo ${date}
396
  
395