Searched refs:ninlet (Results 1 – 2 of 2) sorted by relevance
32 call sfID2np(iI2Binlet,ninlet,inlf_tmp)33 if(ninlet.gt.0) then ! only for process including inlet nodes34 allocate(inlf(ninlet))35 inlf(1:ninlet)=inlf_tmp(1:ninlet) ! generate map mapping inlet nodes to nshg nodes36 do i=1,ninlet49 if(ninlet.gt.0) then91 if(ninlet.gt.0)then
2 integer ninlet variable