Searched refs:phm2 (Results 1 – 1 of 1) sorted by relevance
/dports/science/healpix/Healpix_3.50/src/f90/mod/ |
H A D | alm_map_template.F90 | 2677 complex(DPC) :: php1, phm1, php2, phm2 local 2860 phm2 = phas_n2(m,ithl) - phas_s2(m,ithl) ! diff (if (l+m) odd) 2863 … phas_sd2(-1:2) = (/ real(phm2, kind=dp), aimag(phm2), real(php2, kind=dp), aimag(php2) /)
|