Searched refs:aux1 (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_mls.f | 387 real(kind=8) :: evmax,ddeg,aux1,aux0,auxom,rho,rho2 local
413 aux1 = 1.0/(2.0*ddeg+1.0)
418 auxom = rho/2.0*(1.0-cos(aux0*aux1))
542 real(kind=8) :: evmax,ddeg,aux1,aux0,auxom,rho variable
|