Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=rp), | intent(in) | :: | ne | |||
real(kind=rp), | intent(in) | :: | Te |
function CLog0(ne,Te) ! Dimensionless ne and Te
REAL(rp), INTENT(IN) :: ne
REAL(rp), INTENT(IN) :: Te
REAL(rp) :: CLog0
CLog0 = 14.9_rp - LOG(ne)/2._rp + LOG(Te) + &
cparams_ss%CLog0_1 + cparams_ss%CLog0_2
end function CLog0