@@ -607,32 +607,33 @@ function solve_coupler!(cs)
607
607
# # step in time
608
608
walltime = @elapsed for t in ((tspan[1 ] + Δt_cpl): Δt_cpl: tspan[end ])
609
609
610
- # save states every day
611
- if t % 86400 == 0
612
- date = date0 + Dates. Second (t)
613
-
614
- # atmos state
615
- atmos_ρe_tot = cs. model_sims. atmos_sim. integrator. u. c. ρe_tot
616
- atmos_ρq_tot = cs. model_sims. atmos_sim. integrator. u. c. ρq_tot
617
- atmos_ρ = cs. model_sims. atmos_sim. integrator. u. c. ρ
618
- atmos_uₕ = cs. model_sims. atmos_sim. integrator. u. c. uₕ
619
- atmos_u₃ = cs. model_sims. atmos_sim. integrator. u. f. u₃
620
- Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " atmos_ρe_tot" , date, atmos_ρe_tot, " atmos_ρe_tot" , comms_ctx)
621
- Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " atmos_ρq_tot" , date, atmos_ρq_tot, " atmos_ρq_tot" , comms_ctx)
622
-
623
- # land state
624
- land_T = cs. model_sims. land_sim. integrator. u. bucket. T
625
- land_W = cs. model_sims. land_sim. integrator. u. bucket. W
626
- land_Ws = cs. model_sims. land_sim. integrator. u. bucket. Ws
627
- land_σS = cs. model_sims. land_sim. integrator. u. bucket. σS
628
- Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " land_T" , date, land_T, " land_T" , comms_ctx)
629
- Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " land_W" , date, land_W, " land_W" , comms_ctx)
630
-
631
- # ocean state
632
- ocean_T_sfc = cs. model_sims. ocean_sim. integrator. u. T_sfc
633
- Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " ocean_T_sfc" , date, ocean_T_sfc, " ocean_T_sfc" , comms_ctx)
634
610
635
- end
611
+ # # save states every day
612
+ # if t % 86400 == 0
613
+ # save state every timestep
614
+ date = date0 + Dates. Second (t)
615
+
616
+ # atmos state
617
+ atmos_ρe_tot = cs. model_sims. atmos_sim. integrator. u. c. ρe_tot
618
+ atmos_ρq_tot = cs. model_sims. atmos_sim. integrator. u. c. ρq_tot
619
+ atmos_ρ = cs. model_sims. atmos_sim. integrator. u. c. ρ
620
+ atmos_uₕ = cs. model_sims. atmos_sim. integrator. u. c. uₕ
621
+ atmos_u₃ = cs. model_sims. atmos_sim. integrator. u. f. u₃
622
+ Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " atmos_ρe_tot" , date, atmos_ρe_tot, " atmos_ρe_tot" , comms_ctx)
623
+ Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " atmos_ρq_tot" , date, atmos_ρq_tot, " atmos_ρq_tot" , comms_ctx)
624
+
625
+ # land state
626
+ land_T = cs. model_sims. land_sim. integrator. u. bucket. T
627
+ land_W = cs. model_sims. land_sim. integrator. u. bucket. W
628
+ land_Ws = cs. model_sims. land_sim. integrator. u. bucket. Ws
629
+ land_σS = cs. model_sims. land_sim. integrator. u. bucket. σS
630
+ Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " land_T" , date, land_T, " land_T" , comms_ctx)
631
+ Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " land_W" , date, land_W, " land_W" , comms_ctx)
632
+
633
+ # ocean state
634
+ ocean_T_sfc = cs. model_sims. ocean_sim. integrator. u. T_sfc
635
+ Regridder. write_to_hdf5 (COUPLER_ARTIFACTS_DIR, " ocean_T_sfc" , date, ocean_T_sfc, " ocean_T_sfc" , comms_ctx)
636
+ # end
636
637
637
638
cs. dates. date[1 ] = current_date (cs, t) # if not global, `date` is not updated.
638
639
0 commit comments