CB_ee Function

  1. korc_collisions.f90
  2. korc_collisions
  3. CB_ee

private function CB_ee(v)

Arguments

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

Return Value real(kind=rp)


Contents

Source Code

CB_ee

Source Code

  function CB_ee(v)
    REAL(rp), INTENT(IN) 	:: v
    REAL(rp) 				:: CB_ee
    REAL(rp) 				:: x

    x = v/cparams_ss%VTe
    CB_ee  = (0.5_rp*cparams_ss%Gammac/v)*(ERF(x) - &
         psi(x) + 0.5_rp*cparams_ss%delta**4*x**2 )
  end function CB_ee