WAKE_XA

SUBROUTINE 6 args, 19 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/WAKE_XA.f90,0000003,0000091
WAKE_XA CALLed by WAKE_DFSN WAKE_DFSN2
CALLs to AMAX1 AMIN1
Chng COMMON **NOTHING**
Uses COMMON /DFSN/ AFAC DUA_UA WFY WFZ WIY0 WIZ0 XBYRMAX XDECAYI
Chng MODULE **NOTHING**
Uses MODULE DEBUG IOUNIT 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 XBYR

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