Subroutine MOFIA

subroutine MOFIA

        ! Calls
    call comfile
    call getarg
    call getcmdline
    call getenv
    call interpret
    call kerror
    call kparse
    call tinit

        ! Variables
    integer (kind=4) :: narg
    integer (kind=4) :: nqual
    integer (kind=4) :: clen
    integer (kind=4) :: iargc
    logical (kind=4) :: end
    logical (kind=4) :: eof
    character (len=80) :: Argument
    character (len=132) :: comline
    integer (kind=4) :: iins
    integer :: iarg
    character (len=255) :: arg

end subroutine MOFIA

Description of Variables

narg

integer (kind=4) :: narg

nqual

integer (kind=4) :: nqual

clen

integer (kind=4) :: clen

iargc

integer (kind=4) :: iargc

end

logical (kind=4) :: end

eof

logical (kind=4) :: eof

Argument

character (len=80) :: Argument

comline

character (len=132) :: comline

iins

integer (kind=4) :: iins

iarg

integer :: iarg

arg

character (len=255) :: arg