Searched refs:nmax (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | slpwBC.f | 15 integer nmax local
34 ii=nmax(wn1(1),wn1(2),wn1(3))
77 kk=nmax(ck1,ck2,ck3)
122 kk=nmax(ck1,ck2,ck3)
210 ii=nmax(wn1(1),wn1(2),wn1(3))
246 kk=nmax(ck1,ck2,ck3)
279 integer function nmax(nx,ny,nz) function
285 if(lnx.gt.lny.and.lnx.gt.lnz)nmax=1
286 if(lny.gt.lnx.and.lny.gt.lnz)nmax=2
287 if(lnz.gt.lnx.and.lnz.gt.lny)nmax=3
|