----------------------------
Part 3:  run_cedsyn (SYNUVW)
----------------------------
EXPAND  SYNUVW
DEFINE  SYNUVW
VALUE   ON
COMMENT
        --------------------------------------------------------------
          SYNTHESIS OF RADIAL VELOCITIES WITH DIFFERENTIAL ADVECTION
        1) NUMBER OF RADARS = 2
        2) TWO EQUATION SOLUTION
              U3 = U2 + EWU*(W+Vt)
              V3 = V2 + EWV*(W+Vt)
        3) (U,V,W) STD = (5.0,5.0,5.0)
        4) DIFFERENTIAL ADVECTION WITH STORM DIR/SPD = (127,12)
        5) TRANSFER REFL AND RADIAL VELOCITY
           DTEST1 - Both |EWU| and |EWV| .LT. DTEST1
                    Little or no vertical motion contribution
           DTEST2 - Both USTD and VSTD .LT. DTEST2
           DTEST3 - WSTD .LT. DTEST3
        Note: Large DTEST1-3 ==> UV winds close to the baseline
        --------------------------------------------------------------
COMEND
*YNTHES NSNVOL  NRADS   DTEST1  DTEST2  DTEST3  ITWOEQ  ITANAL  STMDIR  STMSPD
SYNTHES SYN1250 2.0     2.0     2.0     2.0     YES   
        81.0    NEXT                    YES     VE                      YES
        INPUT   DZ      VE
        OUTPUT  DZ_2    VE_2
        82.0    NEXT                    YES     VE                      YES
        INPUT   DZ      VE
        OUTPUT  DZ_3    VE_3
END
*       HSTD - proportional to the angle between dual-Doppler radar beams
FUNCTIONNAME    1.0                                                     FULL
        Usyn    P       LINEAR  U               1.0     0.0
        Vsyn    P       LINEAR  V               1.0     0.0
        HSTD    P       SQ+SQ   USTD    VSTD
        HSTD    P       SQRT    HSTD
END
STATS   PRINT   Z       1.0     ALL     BOTH                            FULL