diff --git a/ext/CreateParametersExt.jl b/ext/CreateParametersExt.jl index cb0288a8..38b05024 100644 --- a/ext/CreateParametersExt.jl +++ b/ext/CreateParametersExt.jl @@ -3,7 +3,7 @@ module CreateParametersExt import Thermodynamics.Parameters.ThermodynamicsParameters import CLIMAParameters as CP -ThermodynamicsParameters(::Type{FT}) where {FT <: AbstractFloat} = +ThermodynamicsParameters(::Type{FT}) where {FT <: Real} = ThermodynamicsParameters(CP.create_toml_dict(FT)) function ThermodynamicsParameters(toml_dict::CP.AbstractTOMLDict) diff --git a/src/TemperatureProfiles.jl b/src/TemperatureProfiles.jl index f4d13463..951dd279 100644 --- a/src/TemperatureProfiles.jl +++ b/src/TemperatureProfiles.jl @@ -25,7 +25,7 @@ abstract type TemperatureProfile{FT} end """ IsothermalProfile(param_set, T_virt) - IsothermalProfile(param_set, ::Type{FT<:AbstractFloat}) + IsothermalProfile(param_set, ::Type{FT<:Real}) A uniform virtual temperature profile, which is implemented as a special case of [`DecayingTemperatureProfile`](@ref). diff --git a/src/isentropic.jl b/src/isentropic.jl index 723281b3..0701efa3 100644 --- a/src/isentropic.jl +++ b/src/isentropic.jl @@ -27,7 +27,7 @@ The air pressure for an isentropic process, where θ::FT, Φ::FT, ::DryAdiabaticProcess, -) where {FT <: AbstractFloat} +) where {FT <: Real} p0::FT = TP.p_ref_theta(param_set) _R_d::FT = TP.R_d(param_set) _cp_d::FT = TP.cp_d(param_set) @@ -50,7 +50,7 @@ The air pressure for an isentropic process, where T∞::FT, p∞::FT, ::DryAdiabaticProcess, -) where {FT <: AbstractFloat} +) where {FT <: Real} _kappa_d::FT = TP.kappa_d(param_set) return p∞ * (T / T∞)^(FT(1) / _kappa_d) end @@ -69,7 +69,7 @@ The air temperature for an isentropic process, where p::FT, θ::FT, ::DryAdiabaticProcess, -) where {FT <: AbstractFloat} +) where {FT <: Real} _R_d::FT = TP.R_d(param_set) _cp_d::FT = TP.cp_d(param_set) p0::FT = TP.p_ref_theta(param_set) diff --git a/src/relations.jl b/src/relations.jl index a1aa188b..34d6cf3e 100644 --- a/src/relations.jl +++ b/src/relations.jl @@ -2342,7 +2342,7 @@ The dry potential temperature, given a thermodynamic state `ts`. ρ::FT, RH::FT, ::Type{phase_type}, -) where {FT <: AbstractFloat, phase_type <: ThermodynamicState} +) where {FT <: Real, phase_type <: ThermodynamicState} q_tot = RH * q_vap_saturation(param_set, T, ρ, phase_type) q_pt = PhasePartition_equil(param_set, T, ρ, q_tot, phase_type) return virtual_temperature(param_set, T, q_pt) @@ -2366,7 +2366,7 @@ The air temperature and `q_tot` where ::Type{phase_type}, maxiter::Int = 100, tol::RS.AbstractTolerance = RS.ResidualTolerance{FT}(sqrt(eps(FT))), -) where {FT <: AbstractFloat, phase_type <: ThermodynamicState} +) where {FT <: Real, phase_type <: ThermodynamicState} _T_min::FT = TP.T_min(param_set) _T_max = T_virt