Searched defs:subr_1 (Results 1 – 1 of 1) sorted by relevance
16 subroutine subr_1(parg_1) subroutine18 procedure(character(*)), pointer :: parg_1