WAKE_DFSN2

SUBROUTINE 7 args, 316 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/WAKE_DFSN2.f90,0000002,0000544
WAKE_DFSN2 CALLed by NUMRISE
CALLs to AMAX1 AMIN1 FLOAT MAX MIN NINT NUMGRAD SIGYPR SIGZPR SQRT WAKE_CAV0 WAKE_SIG WAKE_TURB WAKE_XA
Chng COMMON /WAKEDAT/ DRWAK NCAV NWAK SYCAV SYWAK SZCAV SZWAK VSIGY VSIGYC VSIGZ VSIGZC XCAV XWAK
Uses COMMON /WAKEDAT/ NCAV NWAK VSIGY VSIGYC VSIGZ VSIGZC XBADJ XLB XLR YBADJ
Chng MODULE **NOTHING**
Uses MODULE **NOTHING**
Uses Argument LDBHR NTR SYI SZI XI XTR ZTR
Chng Argument **NOTHING**
Uses PARAMETER IO6 MXENT MXENTP1 MXNTR MXNW MXNZ
Local Var ASIGY ASIGZ CSIGY CSIGZ DELN DIST DISTC DSZ DX DXI DZRATE HALF IN INP IR JN LCAV LREVCAV LWAK N NCS NP NPC NPW NWS ONE RN RTPIBY2 SIGYXA SIGZXA SY SYCAV0 SYCAV0R SYDUM SZ SZCAV0 SZDUM WAKIY WAKIZ X XAMN XAMX XAY XAZ XBC XCAVE XD XDC XHI XLOW XMID XNEW XOLD XRANGE YK YKC YKDUM ZDIST ZERO ZK ZKC ZKDUM ZXAY ZXAZ

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