Searched refs:ifathe (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | aveprep.f | 4 integer, allocatable :: ifathe(:,:) variable
18 allocate ( ifathe(numel,maxsh) )
52 call getylist( ylist, ifathe(iel:inum,:), shp(lcsyst,1:nshl,:),
377 & shp(lcsyst,1:nshl,:), ifathe(iel:inum,:))
439 & mxmudmi(iblk)%p,cdelsq,ifathe(iel:inum,:))
|