getwrd Subroutine

public subroutine getwrd(iret, word)

Arguments

Type IntentOptional Attributes Name
integer :: iret
character(len=*) :: word