Lines Matching refs:ndn
439 real*8 ndn,agrdn,taudn
565 ndn = rho_in(i,2) + ETA
569 n = nup + ndn
681 inv_ndn = 1.0d0/ndn
682 ndn_13 = ndn**thrd
683 ndn_43 = ndn_13*ndn
685 ndn_83 = ndn_53*ndn
710 dt_dn = fvthrd*t/ndn
765 n_onethird = (3.0d0*ndn/pi)**thrd
768 kf = (3.0d0*pi*pi*ndn)**thrd
769 ss = agrdn/(2.0d0*kf*ndn)
780 fndnx = fndnx + pbefnx*fw + ndn*pbex*dfw_dn
782 fdtaudnx = fdtaudnx + ndn*pbex*dfw_dtau
784 ex = (eupx*nup + ednx*ndn)/n
861 rs = (0.75d0/(pi*ndn))**thrd
862 drs_dn = -thrd*rs/ndn
926 fndnc = ednc + ndn*dedd0c_drs*drs_dn*ghss*D
927 & + ndn*edd0c*dgh_dn*D
928 & + ndn*edd0c*ghss*dD_dn
929 fdndnc = ndn*edd0c*(dgh_dagr*D + ghss*dD_dagr)
930 fdtaudnc = ndn*edd0c*(dgh_dtau*D + ghss*dD_dtau)
932 ec = (eupc*nup + ednc*ndn)/n
937 zeta = (nup - ndn)/n
942 eud1c = eud0c - (euu0c*nup + edd0c*ndn)/n
949 & - ndn*dedd0c_dndn