---------------------------
Part 7: run_cedsyn (FINISH)
---------------------------
DELETE  CT      EWU     EWV
PATCHER DZ_max  DZ_max  FILLCON 5       4       4
COMMENT
        ------------------------------------------------------------------------
FUNCTIONNAME    1.0
        SUM     T       +       DZDOW2  DZDOW3  1.0     1.0
        TWO     T       CON                     2.0
        AVGDZ   P       /       SUM     TWO     1.0
        TEMPDZ  T       ORELSE  DZDOW2  DZDOW3
        AVGDZ   P       ORELSE  TEMPDZ  AVGDZ  
END
        ------------------------------------------------------------------------
COMEND
DELETE  USTD    VSTD
*-------*-------*-------*-------*-------*-------*-------*-------*-------*-------
*RITVOL LUNIT   NAMTAP  NAMVOL  IPOS    NFSKIP  FEET    FORMAT
WRITVOL 90.0    SYNTHES synDOWs BEG
DEFEND  SYNUVW
QUIT
cedsyn.inp
#
# Cleanup after massaging input radial velocities 
# and doing the dual-Doppler wind synthesis.  
# Make a directory and move all files for this
# synthesis time ($1) into that directory.
# 
set syn_dir=06Aug.$1
mkdir   ./$syn_dir
/bin/mv gmeta      ./$syn_dir/$1-cedsyn.plt
/bin/mv cedsyn.log ./$syn_dir/$1-cedsyn.log
/bin/mv fort.81    ./$syn_dir/$1-DOW2_cedsyn.ced
/bin/mv fort.82    ./$syn_dir/$1-DOW3_cedsyn.ced
/bin/mv fort.90    ./$syn_dir/$1-DUAL_cedsyn.ced
/bin/mv fort.99    ./$syn_dir/$1-DUAL_cedsyn.log
/bin/rm .cededit .cedremap .sync .async
#