Searched refs:CoupleArea (Results 1 – 1 of 1) sorted by relevance
1247 real*8 Pini(0:MAXSURF),CoupleArea(0:MAXSURF) ! initial pressure local1259 call integrScalar(CoupleArea,POnly,srfIdList,numSrfs) !get surf area1260 Pini(1:numSrfs) = Pini(1:numSrfs)/CoupleArea(1:numSrfs)