Searched refs:n1m (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | sonfath.f | 9 integer inform,n1m,n2m,n3m,numpe,numpe1,numnp,maxnode, tfath, local
18 read(*,*)n1m,n2m,n3m
51 nc8=n3m*n2m*n1m+1-n3m
54 numnp = n1m*n2m*n3m
89 nsons(i) = n1m*n3m - (n1m+n3m-1)
94 do i = 1, n1m
|