Searched refs:tfath (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | sonfath.f | 1 subroutine sonfath (ncorp, vnumnpl, ifath, nsons, tfath, argument
9 integer inform,n1m,n2m,n3m,numpe,numpe1,numnp,maxnode, tfath, local
12 & nsons(tfath),dummy(numnp),iper(numnp), vnumnpl(numpe)
60 do i = 1, tfath
88 do i = 1, tfath
138 nsons(tfath) = itmp
|