Searched refs:mono_dip (Results 1 – 2 of 2) sorted by relevance
| /dports/science/healpix/Healpix_3.50/src/f90/smoothing/ |
| H A D | smo_sub_inc.f90 | 130 real(kind=DP), dimension(0:3) :: mono_dip variable
431 & mono_dip(0:), zbounds, fmissval=fmissval)
445 & mono_dip(0)," "//trim(units_map(1))
447 call vec2ang( mono_dip(1:3), theta_dip, phi_dip)
449 & sqrt(sum(mono_dip(1:3)**2))," "//trim(units_map(1))
|
| /dports/science/healpix/Healpix_3.50/src/f90/anafast/ |
| H A D | ana_sub_inc.f90 | 134 real(kind=DP), dimension(0:3,1:2) :: mono_dip variable
567 & mono_dip(0:,1), zbounds, fmissval=fmissval, mask=pmask(:,1))
570 & mono_dip(0:,2), zbounds, fmissval=fmissval, mask=pmask(:,1))
587 write(unit=*,fmt=8000) " Monopole = ", mono_dip(0,i)," "//trim(units_map(1,i))
589 call vec2ang( mono_dip(1:3,i), theta_dip, phi_dip)
590 ampl_dip = sqrt(sum(mono_dip(1:3,i)**2))
|