esat Function

public pure elemental function esat(T)

Arguments

Type IntentOptional Attributes Name
real(kind=r_2), intent(in) :: T

Return Value real(kind=r_2)