Searched refs:rho_o34 (Results 1 – 1 of 1) sorted by relevance
344 REAL(DP) :: r3q2, r3pi, gr, rho_o3, rho_o34, xa, xa2, ra, rab, & local388 rho_o34 = rho**(o34)389 xa = 1.25992105d0*gr/rho_o34393 dra_drho = -0.260530881d0/rho_o34401 ex = -0.75d0*r3pi*rho_o34