@@ -75,7 +75,7 @@ ocean = ocean_simulation(grid; momentum_advection, tracer_advection, free_surfac
7575# EVP rheology and a zero-layer thermodynamic model that advances thickness
7676# and concentration.
7777
78- seaice = sea_ice_simulation (grid, ocean; advection= tracer_advection)
78+ sea_ice = sea_ice_simulation (grid, ocean; advection= tracer_advection)
7979
8080# ### Initial condition
8181
@@ -89,7 +89,7 @@ ecco_sea_ice_thickness = Metadatum(:sea_ice_thickness; date, dataset)
8989ecco_sea_ice_concentration = Metadatum (:sea_ice_concentration ; date, dataset)
9090
9191set! (ocean. model, T= ecco_temperature, S= ecco_salinity)
92- set! (seaice . model, h= ecco_sea_ice_thickness, ℵ= ecco_sea_ice_concentration)
92+ set! (sea_ice . model, h= ecco_sea_ice_thickness, ℵ= ecco_sea_ice_concentration)
9393
9494# ### Atmospheric forcing
9595
@@ -107,7 +107,7 @@ atmosphere = JRA55PrescribedAtmosphere(arch; backend=JRA55NetCDFBackend(80),
107107# avoid numerical instabilities from the initial "shock" of the adjustment of the
108108# flow fields.
109109
110- coupled_model = OceanSeaIceModel (ocean, seaice ; atmosphere, radiation)
110+ coupled_model = OceanSeaIceModel (ocean, sea_ice ; atmosphere, radiation)
111111simulation = Simulation (coupled_model; Δt= 8 minutes, stop_time= 20 days)
112112
113113# ### A progress messenger
@@ -151,21 +151,21 @@ add_callback!(simulation, progress, IterationInterval(1000))
151151# also uses a prognostic turbulent kinetic energy, `e`, to diagnose the vertical mixing length.
152152
153153ocean_outputs = merge (ocean. model. tracers, ocean. model. velocities)
154- seaice_outputs = merge ((h = seaice . model. ice_thickness,
155- ℵ = seaice . model. ice_concentration,
156- T = seaice . model. ice_thermodynamics. top_surface_temperature),
157- seaice . model. velocities)
154+ sea_ice_outputs = merge ((h = sea_ice . model. ice_thickness,
155+ ℵ = sea_ice . model. ice_concentration,
156+ T = sea_ice . model. ice_thermodynamics. top_surface_temperature),
157+ sea_ice . model. velocities)
158158
159159ocean. output_writers[:surface ] = JLD2Writer (ocean. model, ocean_outputs;
160160 schedule = TimeInterval (5 days),
161161 filename = " ocean_one_degree_surface_fields" ,
162162 indices = (:, :, grid. Nz),
163163 overwrite_existing = true )
164164
165- seaice . output_writers[:surface ] = JLD2Writer (ocean. model, seaice_outputs ;
166- schedule = TimeInterval (5 days),
167- filename = " seaice_one_degree_surface_fields " ,
168- overwrite_existing = true )
165+ sea_ice . output_writers[:surface ] = JLD2Writer (ocean. model, sea_ice_outputs ;
166+ schedule = TimeInterval (5 days),
167+ filename = " sea_ice_one_degree_surface_fields " ,
168+ overwrite_existing = true )
169169
170170# ### Ready to run
171171
@@ -192,11 +192,11 @@ To = FieldTimeSeries("ocean_one_degree_surface_fields.jld2", "T"; backend = OnD
192192eo = FieldTimeSeries (" ocean_one_degree_surface_fields.jld2" , " e" ; backend = OnDisk ())
193193
194194# and sea ice fields with "i":
195- ui = FieldTimeSeries (" seaice_one_degree_surface_fields .jld2" , " u" ; backend = OnDisk ())
196- vi = FieldTimeSeries (" seaice_one_degree_surface_fields .jld2" , " v" ; backend = OnDisk ())
197- hi = FieldTimeSeries (" seaice_one_degree_surface_fields .jld2" , " h" ; backend = OnDisk ())
198- ℵi = FieldTimeSeries (" seaice_one_degree_surface_fields .jld2" , " ℵ" ; backend = OnDisk ())
199- Ti = FieldTimeSeries (" seaice_one_degree_surface_fields .jld2" , " T" ; backend = OnDisk ())
195+ ui = FieldTimeSeries (" sea_ice_one_degree_surface_fields .jld2" , " u" ; backend = OnDisk ())
196+ vi = FieldTimeSeries (" sea_ice_one_degree_surface_fields .jld2" , " v" ; backend = OnDisk ())
197+ hi = FieldTimeSeries (" sea_ice_one_degree_surface_fields .jld2" , " h" ; backend = OnDisk ())
198+ ℵi = FieldTimeSeries (" sea_ice_one_degree_surface_fields .jld2" , " ℵ" ; backend = OnDisk ())
199+ Ti = FieldTimeSeries (" sea_ice_one_degree_surface_fields .jld2" , " T" ; backend = OnDisk ())
200200
201201times = uo. times
202202Nt = length (times)
0 commit comments