CLogee_wu Function

  1. korc_collisions.f90
  2. korc_collisions
  3. CLogee_wu

public function CLogee_wu(params, ne, Te)

With units

Arguments

Type IntentOptional AttributesName
type(KORC_PARAMS), intent(in) :: params
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)


Contents

Source Code

CLogee_wu

Source Code

  function CLogee_wu(params,ne,Te)
    
    !! With units
    TYPE(KORC_PARAMS), INTENT(IN) 	:: params
    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) 				:: CLogee_wu
    REAL(rp)  :: k=5._rp
    
    CLogee_wu = CLog0_wu(ne,Te)+ &
         log(1+(2*(params%minimum_particle_g-1)/ &
         (VTe_wu(Te)/C_C)**2)**(k/2._rp))/k
  end function CLogee_wu