Skip to content

Commit

Permalink
first commit, wip [skip ci]
Browse files Browse the repository at this point in the history
  • Loading branch information
kmdeck committed Apr 25, 2024
1 parent dc67a50 commit 7ce2a1e
Show file tree
Hide file tree
Showing 2 changed files with 7 additions and 8 deletions.
4 changes: 2 additions & 2 deletions experiments/integrated/global/global_parameters.jl
Original file line number Diff line number Diff line change
Expand Up @@ -133,8 +133,8 @@ S_s = ClimaCore.Fields.zeros(subsurface_space) .+ FT(1e-3)
ν_ss_om = ClimaCore.Fields.zeros(subsurface_space) .+ FT(0.1)
ν_ss_quartz = ClimaCore.Fields.zeros(subsurface_space) .+ FT(0.1)
ν_ss_gravel = ClimaCore.Fields.zeros(subsurface_space) .+ FT(0.1)
PAR_albedo = ClimaCore.Fields.zeros(subsurface_space) .+ FT(0.2)
NIR_albedo = ClimaCore.Fields.zeros(subsurface_space) .+ FT(0.2)
PAR_albedo = ClimaCore.Fields.zeros(surface_space) .+ FT(0.2)
NIR_albedo = ClimaCore.Fields.zeros(surface_space) .+ FT(0.2)
soil_params = Soil.EnergyHydrologyParameters(
FT;
ν,
Expand Down
11 changes: 5 additions & 6 deletions experiments/integrated/global/global_soil_canopy.jl
Original file line number Diff line number Diff line change
Expand Up @@ -184,7 +184,6 @@ radiative_transfer_args = (;
parameters = Canopy.TwoStreamParameters(
FT;
Ω,
ld,
α_PAR_leaf,
τ_PAR_leaf,
α_NIR_leaf,
Expand Down Expand Up @@ -317,17 +316,17 @@ Y.soil.ϑ_l .= hydrostatic_profile.(lat, z, ν, θ_r, vg_α, vg_n, S_s, f_max)
Y.soil.θ_i .= FT(0.0)
T = FT(276.85)
# Next line does not run on GPU
#=
ρc_s = Soil.volumetric_heat_capacity.(Y.soil.ϑ_l, Y.soil.θ_i, soil_params)

ρc_s = Soil.volumetric_heat_capacity.(Y.soil.ϑ_l, Y.soil.θ_i, soil_params.ρc_ds, soil_params.earth_param_set)
Y.soil.ρe_int .=
Soil.volumetric_internal_energy.(Y.soil.θ_i, ρc_s, T, soil_params)
Soil.volumetric_internal_energy.(Y.soil.θ_i, ρc_s, T, soil_params.earth_param_set)
@. Y.soil.ϑ_l = oceans_to_zero(Y.soil.ϑ_l, mask)
@. Y.soil.ρe_int = oceans_to_zero(Y.soil.ρe_int, mask)
@. Y.soil.θ_i = oceans_to_zero(Y.soil.θ_i, mask)


set_initial_cache! = make_set_initial_cache(land)
exp_tendency! = make_exp_tendency(land;
exp_tendency! = make_exp_tendency(land)
set_initial_cache!(p, Y, t0)
timestepper = CTS.RK4()
ode_algo = CTS.ExplicitAlgorithm(timestepper)
Expand Down Expand Up @@ -357,7 +356,7 @@ cb = SciMLBase.CallbackSet(driver_cb, saving_cb)
adaptive = false,
saveat = saveat,
)
#=
longpts = range(-180.0, 180.0, 101)
latpts = range(-90.0, 90.0, 101)
hcoords = [
Expand Down

0 comments on commit 7ce2a1e

Please sign in to comment.