Subroutine comfile

subroutine comfile

        ! Calls
    call GETENV
    call interpret
    call kerror
    call kerror2
    call rite
    call unixfi

        ! Variables
    integer :: maxnest
    character (len=*) :: prompt
    character (len=*) :: filename
    character (len=255) :: file
    character (len=255), dimension (maxnest) :: kcmfile
    character (len=255) :: Argument
    character (len=255) :: command
    character (len=255) :: cline
    character (len=255) :: mofiakcm
    integer :: clevel
    integer :: lfile
    integer :: lin_old
    integer, dimension (maxnest) :: lzunit
    integer :: Lensig
    integer :: narg
    integer :: nqual
    integer :: iunused
    integer :: kparse
    logical :: end

end subroutine comfile

Description of Variables

integer :: maxnest

character (len=*) :: prompt

character (len=*) :: filename

character (len=255) :: file

character (len=255), dimension (maxnest) :: kcmfile

character (len=255) :: Argument

character (len=255) :: command

character (len=255) :: cline

character (len=255) :: mofiakcm

integer :: clevel

integer :: lfile

integer :: lin_old

integer, dimension (maxnest) :: lzunit

integer :: Lensig

integer :: narg

integer :: nqual

integer :: iunused

integer :: kparse

logical :: end