Searched refs:gama_ro_2 (Results 1 – 1 of 1) sorted by relevance
/dports/graphics/gmt/gmt-6.3.0/src/potential/ |
H A D | grdredpol.c | 135 double ro, ro2, ro3, ro4, ro5, alfa_u, beta_v, gama_ro, gama_ro_2; in grdgravmag3d_rtp_filt_colinear() local 141 gama_ro = gama * ro; gama_ro_2 = gama_ro * gama_ro; in grdgravmag3d_rtp_filt_colinear() 145 t2 = 1 / ((alfa_u_beta_v_2 + gama_ro_2) * (alfa_u_beta_v_2 + gama_ro_2)); in grdgravmag3d_rtp_filt_colinear() 146 t3 = t2 / (alfa_u_beta_v_2 + gama_ro_2); in grdgravmag3d_rtp_filt_colinear() 148 rnr = (gama_ro_2 - alfa_u_beta_v_2) * ro2; in grdgravmag3d_rtp_filt_colinear() 155 gxar[ij] = -2*alfa_u_beta_v*u*ro2 * t2 - 4*(gama_ro_2-alfa_u_beta_v_2)*ro2*alfa_u_beta_v*u * t3; in grdgravmag3d_rtp_filt_colinear() 159 gxgr[ij] = 2*gama*ro4 * t2 - 4*(gama_ro_2-alfa_u_beta_v_2)*ro4*gama * t3; in grdgravmag3d_rtp_filt_colinear() 171 double ro, ro2, ro3, ro4, ro5, alfa_u, beta_v, gama_ro, gama_ro_2; in grdgravmag3d_rtp_filt_not_colinear() local 180 gama_ro = gama * ro; gama_ro_2 = gama_ro * gama_ro; in grdgravmag3d_rtp_filt_not_colinear() 196 den_r = (alfa_u_beta_v_2 + gama_ro_2)*(tau_u_mu_v_2 + nu_ro_2); in grdgravmag3d_rtp_filt_not_colinear() [all …]
|