Subroutine EXIT_C

subroutine EXIT_C

        ! Calls
    call DDCLOSE
    call GETENV
    call HCDIR
    call HREND
    call HROUT
    call Hrend
    call Hrout
    call KMSkim_Close
    call KMSkim_Deof
    call RITE
    call SKIM_FINISH
    call kerror2

        ! Variables
    integer :: LENSIG
    integer :: ic
    integer :: lenpro
    integer :: lenlog
    integer :: istat
    integer :: ICYCLE
    integer :: ikykle
    integer :: ierr
    integer :: lmtin
    integer :: magta
    integer, dimension (4) :: itcode
    integer :: dummy
    character (len=5) :: aPause
    logical :: ms_error
    character (len=80) :: FILENAME
    character (len=80) :: message
    character (len=80) :: RENAME
    character (len=10) :: DIRECTORY
    character (len=10) :: DIRQUES
    logical :: NAME_FLAG
    logical :: hopen
    character (len=6) :: RunNoString
    character (len=255) :: Hist_Path
    character (len=255) :: LogPath

end subroutine EXIT_C

Description of Variables

integer :: LENSIG

integer :: ic

integer :: lenpro

integer :: lenlog

integer :: istat

integer :: ICYCLE

integer :: ikykle

integer :: ierr

integer :: lmtin

integer :: magta

integer, dimension (4) :: itcode

integer :: dummy

character (len=5) :: aPause

logical :: ms_error

character (len=80) :: FILENAME

character (len=80) :: message

character (len=80) :: RENAME

character (len=10) :: DIRECTORY

character (len=10) :: DIRQUES

logical :: NAME_FLAG

logical :: hopen

character (len=6) :: RunNoString

character (len=255) :: Hist_Path

character (len=255) :: LogPath