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