Dimensionless temperature
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=rp), | intent(in) | :: | Te |
function VTe(Te)
!! Dimensionless temperature
REAL(rp), INTENT(IN) :: Te
REAL(rp) :: VTe
VTe = SQRT(2.0_rp*Te)*cparams_ss%VTeo
end function VTe