WAKE_XA2

SUBROUTINE 6 args, 12 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/WAKE_XA2.f90,0000002,0000079
WAKE_XA2 CALLed by GAMCALC
CALLs to AMAX1 AMIN1
Chng COMMON **NOTHING**
Uses COMMON /DFSN/ AFAC DUA_UA WFY WFZ WIY0 WIZ0 XDECAYI
Chng MODULE **NOTHING**
Uses MODULE SVEFF SWEFF UEFF
Uses Argument L RINP XAY XAZ
Chng Argument XAY XAZ
Uses PARAMETER **NOTHING**
Local Var AMBIY AMBIZ FARIY FARIYT FARIZ FARIZT ONE X0BYR

GXCHK Version 7.50ME executed at 21:26 on 17 Mar 2021