Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A Dgenini.f90 read (816,*) ntimeptpT
91 allocate (QHistImp(ntimeptpT+1,numImpSrfs))
92 allocate (QHistTry(ntimeptpT,numImpSrfs))
93 allocate (QHistTryF(ntimeptpT,numImpSrfs))
94 do j=1,ntimeptpT+1
99 do i=2,ntimeptpT
100 call Impint((ntimeptpT-i+1)*Delt(1),i) !return Imp values in reverse order ZN->Z0
H A Dbctint.f36 integer ntimeptpT,numDataImp variable
370 allocate (ValueListImp(ntimeptpT+1,numImpSrfs))
372 ValueListImp(ntimeptpT+1,:) = ValueImpt(1,2,:) !Z(time=0), last entry
/phasta/phSolver/incompressible/
H A Ditrdrv.f250 call calcImpConvCoef (numImpSrfs, ntimeptpT)
326 & ntimeptpT,numImpSrfs)
1084 do j=1, ntimeptpT
1087 QHistImp(ntimeptpT+1,1:numSrfs) = NewQ(1:numSrfs)
1093 do j=1, ntimeptpT
1096 call Filter(QHistTryF,QHistTry,ntimeptpT,Delt(1),cutfreq)
1103 do j=1, ntimeptpT
1113 write(816,*) ntimeptpT
1114 do j=1,ntimeptpT+1
1122 write(8166,*) ntimeptpT
[all …]
H A Delmgmr.f707 p(j)= sign*(poldImp(j) + p(j)*ImpConvCoef(ntimeptpT+2,j)) !pressure p=pold+ Qbeta
709 p(j)= sign*p(j)*ImpConvCoef(ntimeptpT+2,j)
H A DlesSparse.f86 & + tfact*ImpConvCoef(ntimeptpT+2,irankCoupled)*