parses Subroutine

private subroutine parses(ntokens, line, first, last)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ip)				::	ntokens
character(len=*)				::	line
integer(kind=ip)				::	first(MAX_NTOKENS)
integer(kind=ip)				::	last(MAX_NTOKENS)

Contents