Searched refs:DCt (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | e3dc.f | 471 & DCt, giju, argument
507 & giju(npro,6), DCt(npro,ngauss),
521 DCt = zero
591 DCt(:,intp)=max(zero,(fact*sqrt(raLSt*gnormt))-(rtLSt*gnormt))
613 DCt(:,intp) = two * rtLSt * gnormt
639 DCt(:,intp) = min( max(zero,fact * sqrt(raLSt * gnormt)-
659 rti ( :,1) = rti ( :,1) + DCt(:,intp) * gAgyit( :,1)
660 rmti( :,1) = rmti( :,1) + DCt(:,intp) * gAgyit( :,1)
661 rti ( :,2) = rti ( :,2) + DCt(:,intp) * gAgyit( :,2)
662 rmti( :,2) = rmti( :,2) + DCt(:,intp) * gAgyit( :,2)
[all …]
|
| H A D | e3.f | 389 & DCt(npro, ngauss)
509 & DCt, giju,
|