setmorphol Subroutine

public subroutine setmorphol(ntoken, token_id, pline)

Arguments

Type IntentOptional Attributes Name
integer(kind=ip) :: ntoken
character(len=1) :: token_id
type(parsed_line), pointer :: pline

Contents