AERMOD.f90#845
         OPEN (UNIT=IERWRT,FILE=MSGFIL,STATUS='REPLACE',                &
#848
         CLOSE (IERWRT)
MAIN1.f90#158
      INTEGER :: INUNIT , IOUNIT , MFUNIT , MPUNIT , IERUNT , IERWRT ,  &
#889
     &     IERUNT/10/ , IERWRT/11/ , IDPUNT/12/ , IZUNIT/13/ ,          &
MSGWRT.f90#32
      WRITE (IERWRT,*) ' '
#33
      WRITE (IERWRT,*)                                                  &
#35
      WRITE (IERWRT,*) ' '
#36
      WRITE (IERWRT,*)                                                  &
#38
      WRITE (IERWRT,*)                                                  &
#40
      WRITE (IERWRT,*)                                                  &
#42
      WRITE (IERWRT,*)                                                  &
#44
      WRITE (IERWRT,*)                                                  &
#46
      WRITE (IERWRT,*)                                                  &
#48
      WRITE (IERWRT,*) ' '
#49
      WRITE (IERWRT,1114)
#51
      WRITE (IERWRT,1115)
#53
      WRITE (IERWRT,*) ' '
#62
         WRITE (IERWRT,1117) PATH , ERRTP , ERRCD , IERRLN , MODNAM(1:6)&

HyperKWIC - Version 1.00DD executed at 20:00 on  1 Mar 2018  | Personal or Academic or Evaluation User | Free for Non-Commercial, Non-Government Use