Skip to content

Commit 60969bc

Browse files
some fixes
1 parent 455a12a commit 60969bc

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

src/DataWrangling/ECCO/ECCO_metadata.jl

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -127,7 +127,7 @@ ECCO4_short_names = Dict(
127127
:net_heat_flux => "oceQnet",
128128
:sensible_heat_flux => "EXFhs",
129129
:latent_heat_flux => "EXFhl",
130-
:upwelling_longwave => "EXFlwnet"
130+
:net_longwave => "EXFlwnet",
131131
:downwelling_shortwave => "oceQsw",
132132
:downwelling_longwave => "EXFlwdn",
133133
)
@@ -152,7 +152,7 @@ ECCO_location = Dict(
152152
:net_heat_flux => (Center, Center, Nothing),
153153
:sensible_heat_flux => (Center, Center, Nothing),
154154
:latent_heat_flux => (Center, Center, Nothing),
155-
:upwelling_longwave => (Center, Center, Nothing),
155+
:net_longwave => (Center, Center, Nothing),
156156
:downwelling_longwave => (Center, Center, Nothing),
157157
:downwelling_shortwave => (Center, Center, Nothing),
158158
:u_velocity => (Face, Center, Center),

src/OceanSeaIceModels/InterfaceComputations/radiation.jl

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -96,4 +96,4 @@ end
9696

9797
# Split the individual bands
9898
@inline downwelling_longwave_radiation(Qℓ, ϵ) = - ϵ * Qℓ
99-
@inline downwelling_shortwave_radiation(Qℓ, ϵ) = - (1 - α) * Qs
99+
@inline downwelling_shortwave_radiation(Qs, α) = - (1 - α) * Qs

0 commit comments

Comments
 (0)