CLog0_wu Function

public function CLog0_wu(ne, Te)

With units

Arguments

Type IntentOptional AttributesName
real(kind=rp), intent(in) :: ne

ne is in m^-3 and below is converted to cm^-3

real(kind=rp), intent(in) :: Te

Return Value real(kind=rp)


Called by

proc~~clog0_wu~~CalledByGraph proc~clog0_wu CLog0_wu proc~clogee_wu CLogee_wu proc~clogee_wu->proc~clog0_wu proc~clogei_wu CLogei_wu proc~clogei_wu->proc~clog0_wu proc~load_params_ss load_params_ss proc~load_params_ss->proc~clogee_wu proc~load_params_ss->proc~clogei_wu proc~gammac_wu Gammac_wu proc~load_params_ss->proc~gammac_wu proc~gammac_wu->proc~clogee_wu proc~initialize_collision_params initialize_collision_params proc~initialize_collision_params->proc~load_params_ss proc~load_params_ms load_params_ms proc~initialize_collision_params->proc~load_params_ms proc~load_params_ms->proc~gammac_wu program~main main program~main->proc~initialize_collision_params

Contents

Source Code


Source Code

  function CLog0_wu(ne,Te)
    !! With units
    REAL(rp), INTENT(IN) 	:: ne
    !! ne is in m^-3 and below is converted to cm^-3
    REAL(rp), INTENT(IN) 	:: Te ! In Joules
    REAL(rp) 				:: CLog0_wu

    CLog0_wu = 14.9_rp - LOG(1E-20_rp*ne)/2._rp + LOG(1E-3_rp*Te/C_E)
    
  end function CLog0_wu