Searched refs:PdistCur (Results 1 – 1 of 1) sorted by relevance
1226 real*8 PdistCur(0:MAXSURF), timestepRCR local1229 call RCRint(timestepRCR*(stepn + alfi),PdistCur)1231 & *exp(-dtRCR(1:numSrfs)*(stepn + alfi)) + PdistCur(1:numSrfs)