#
# QSUB -s /bin/csh
# QSUB -eo
# QSUB -lT 90:00
# QSUB -lM 5.0Mw
# QSUB -q reg
# QSUB -nr
# 
# Use tgcmproc/f90 to make xyut line plots and ascii data
#   from flux coupler for Gonzalo. The ascii data will be
#   reformatted for Gonzalo by ~/usr/gonz/gonzdat idl code.
# Gonzalo needs ht-integrated E5577 and OHB-62, with doppler
#   fields.
# 30-day run uses 25+ cpu mins
#
cd $TMPDIR
setenv NCPUS 1
set job = tgcmproc_gonz_d315-366
batchname $job.$$
INCLUDE $TGCMROOT/tgcmproc/f90/get_tgcmproc
rm /tmp/foster/*
#----------------------------------------------------------------------
ja
$exec << 'EOF0'
&proc_input 
tmpdir = '/usr/tmp/foster'
histvols = '/ROBLE/flxcm3/CCMS586','to','/ROBLE/flxcm3/CCMS633','by','1'
mtimes =  315,0,0,'to', 339,4,0,'by',60
maxdiskvols = 10
isearch = 0
cfields = 'E5577','OHB-62'
iprint_fldminmax = 0
;         (o1 recomb)  (o2+ recomb)  (photoe)  (airglow)  (o2 ly-beta) 
ie5577 =      1,            0,           0,        0,         0
ibohv_watts = 0
modelhts = 1
iden = 1
ionvel = 1
icolor = 0
outplt = 'cgm','ps'
ipltxyut = 1
  xyut_locname = 'Fritz Peak','Mt.Johns'
  xyut_locs =    37.5,-105,   -42.5,170.
; xyut_zpht = 95.
  ixyut_log10 = 0
  ixyut_doppler = 1
sendcgm = 'vishnu.hao:/d/foster/usr/gonz/d315-339.cgm'
sendps  = 'vishnu.hao:/d/foster/usr/gonz/d315-339.ps'
senddat = 'vishnu.hao:/d/foster/usr/gonz/d315-339.dat'
&end
'EOF0'
ja -st
#----------------------------------------------------------------------
rm R*
rm /tmp/foster/*
ja
$exec << 'EOF1'
&proc_input 
tmpdir = '/usr/tmp/foster'
histvols = '/ROBLE/flxcm3/CCMS634','to','/ROBLE/flxcm3/CCMS684','by','1'
mtimes =  340,0,0,'to', 366,0,0,'by',60
maxdiskvols = 10
isearch = 0
cfields = 'E5577','OHB-62'
iprint_fldminmax = 0
;         (o1 recomb)  (o2+ recomb)  (photoe)  (airglow)  (o2 ly-beta) 
ie5577 =      1,            0,           0,        0,         0
ibohv_watts = 0
modelhts = 1
iden = 1
ionvel = 1
icolor = 0
outplt = 'cgm','ps'
ipltxyut = 1
  xyut_locname = 'Fritz Peak','Mt.Johns'
  xyut_locs =    37.5,-105,   -42.5,170.
; xyut_zpht = 95.
  ixyut_log10 = 0
  ixyut_doppler = 1
sendcgm = 'vishnu.hao:/d/foster/usr/gonz/d340-366.cgm'
sendps  = 'vishnu.hao:/d/foster/usr/gonz/d340-366.ps'
senddat = 'vishnu.hao:/d/foster/usr/gonz/d340-366.dat'
&end
'EOF1'
ja -st


exit



#----------------------------------------------------------------------
rm R*
rm /tmp/foster/*
ja
$exec << 'EOF2'
&proc_input 
tmpdir = '/usr/tmp/foster'
histvols = '/ROBLE/flxcm3/CCMS530','to','/ROBLE/flxcm3/CCMS586','by','1'
mtimes =  285,0,0,'to', 315,0,0,'by',60
maxdiskvols = 10
isearch = 0
cfields = 'E5577','OHB-62'
iprint_fldminmax = 0
;         (o1 recomb)  (o2+ recomb)  (photoe)  (airglow)  (o2 ly-beta) 
ie5577 =      1,            0,           0,        0,         0
ibohv_watts = 0
modelhts = 1
iden = 1
ionvel = 1
icolor = 0
outplt = 'cgm','ps'
ipltxyut = 1
  xyut_locname = 'Fritz Peak','Mt.Johns'
  xyut_locs =    37.5,-105,   -42.5,170.
; xyut_zpht = 95.
  ixyut_log10 = 0
  ixyut_doppler = 1
sendcgm = 'vishnu.hao:/d/foster/usr/gonz/d285-315.cgm'
sendps  = 'vishnu.hao:/d/foster/usr/gonz/d285-315.ps'
senddat = 'vishnu.hao:/d/foster/usr/gonz/d285-315.dat'
&end
'EOF2'
ja -st
echo "Done success\!"
exit