Searched refs:auxom (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
418 auxom = rho/2.0*(1.0-cos(aux0*aux1))
419 omloc(i) = 1.0/auxom
542 real(kind=8) :: evmax,ddeg,aux1,aux0,auxom,rho variable
|