Searched refs:cgP (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_driver.f | 129 real(kind=8),dimension(amg_nshg(level)) :: cgP,cgQ,cgZ,cgR local
143 cgP = cgZ
149 call ramg_calcAv_g(level,cgQ,cgP,colm,rowp,lhsK,lhsP,
151 call ramg_dot_p(level,cgP,cgQ,1,pq)
153 sol = sol + alpha*cgP
161 cgP = beta*cgP+cgZ
189 real(kind=8),dimension(amg_nshg(1)) :: cgP,cgQ,cgZ,cgR variable
229 cgP = cgZ
239 call ramg_calcAv_g(1,cgQ,cgP,colm,rowp,lhsK,lhsP,
241 call ramg_dot_p(1,cgP,cgQ,1,pq)
[all …]
|