VTe_wu Function

private function VTe_wu(Te)

Arguments

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

In Joules

Return Value real(kind=rp)


Called by

proc~~vte_wu~~CalledByGraph proc~vte_wu VTe_wu proc~clogee_wu CLogee_wu proc~clogee_wu->proc~vte_wu proc~clogei_wu CLogei_wu proc~clogei_wu->proc~vte_wu proc~load_params_ss load_params_ss proc~load_params_ss->proc~vte_wu 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~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~gammac_wu->proc~clogee_wu program~main main program~main->proc~initialize_collision_params proc~load_params_ms->proc~gammac_wu

Contents

Source Code


Source Code

  function VTe_wu(Te)
    REAL(rp), INTENT(IN) 	:: Te
    !! In Joules
    REAL(rp) 			:: VTe_wu

    VTe_wu = SQRT(2.0_rp*Te/C_ME)
  end function VTe_wu