Searched refs:lfathe (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | aveprep.f | 40 lfathe = 0 75 subroutine getnu (ien, strl, xmudmi, cdelsq, lfathe) argument 81 & lfathe(npro,ngauss) 86 xmudmi(iel,intp) = cdelsq( lfathe(iel,intp) )* 208 subroutine getylist (ylist, lfathe, shp, x, ien) argument 212 dimension lfathe(npro,maxsh), shp(nshl,maxsh), 240 lfathe(nel,intp) = nlist 247 lfathe(nel,intp) = imatch 254 lfathe(nel,intp) = nlist 448 subroutine smagcoeff (fres, xden, xnum, ien, shp, lfathe) argument [all …]
|