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