STAEND

SUBROUTINE 0 args, 156 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/STAEND.f90,0000002,0000229
STAEND CALLed by MECARD
CALLs to ERRHDL JULIAN NINT STONUM
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE IEDATE IEDY IEHR IEMN IENDDY IENDHOUR IENDMN IEYR ISDATE ISDY ISHR ISMN ISYR
Uses MODULE FNUM IEDY IEHR IEMN IENDHOUR IENDMN IEYR IFC IMIT ISDATE ISDY ISHR ISMN ISTRT_CENT ISTRT_WIND ISYR
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER ILEN_FLD
Local Var IDYMAX MODNAM

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