Searched refs:arrname (Results 1 – 2 of 2) sorted by relevance
1 subroutine tnanq (u, n, arrname) argument6 character(len=*) arrname local27 call error('tnanq ',arrname,nnanq)
1 subroutine tnanqe (u, n, arrname) argument6 character*8 arrname local27 call error('tnanqe ',arrname,nnanq)