Home
last modified time | relevance | path

Searched refs:PdistIni (Results 1 – 1 of 1) sorted by relevance

/phasta/phSolver/incompressible/
H A Ditrdrv.f1246 real*8 PdistIni(0:MAXSURF) !initial distal pressure local
1265 call RCRint(istep,PdistIni) !get initial distal P (use istep)
1267 & - ValueListRCR(1,:)*Qini(1:numSrfs)-PdistIni(1:numSrfs)