Searched refs:QHist (Results 1 – 1 of 1) sorted by relevance
516 subroutine pHist(pressHist,QHist,betas,nTimePoint,nSrfs) argument522 real*8 QHist(nTimePoint+1,nSrfs),betas(nTimePoint+2,nSrfs) local528 pressHist(k) = pressHist(k) + QHist(j,k)*betas(j,k)