Searched refs:vnumnpl (Results 1 – 1 of 1) sorted by relevance
1 subroutine sonfath (ncorp, vnumnpl, ifath, nsons, tfath, argument12 & nsons(tfath),dummy(numnp),iper(numnp), vnumnpl(numpe) local149 do j=1,vnumnpl(i)