mom_regularize_layers mom_regularize_layers::regularize_layers_cs integer integer mom_regularize_layers::id_clock_pass id_clock_pass Clock IDs. TodoShould these be global? regularize_layers regularize_layers_init integer integer mom_regularize_layers::id_clock_eos id_clock_eos Clock IDs. TodoShould these be global? regularize_layers_init regularize_surface subroutine, public subroutine, public mom_regularize_layers::regularize_layers (h, tv, dt, ea, eb, G, GV, US, CS) regularize_layers h h tv tv dt dt ea ea eb eb G G GV GV US US CS CS This subroutine partially steps the bulk mixed layer model. The following processes are executed, in the order listed. g The ocean's grid structure. gv The ocean's vertical grid structure. h Layer thicknesses [H ~> m or kg m-2]. tv A structure containing pointers to any available thermodynamic fields. Absent fields have NULL ptrs. dt Time increment [T ~> s]. ea The amount of fluid moved downward into a eb The amount of fluid moved upward into a layer us A dimensional unit scaling type cs The control structure returned by a previous call to regularize_layers_init. id_clock_pass mom_error_handler::mom_error regularize_surface mom_diabatic_driver::layered_diabatic subroutine subroutine mom_regularize_layers::regularize_surface (h, tv, dt, ea, eb, G, GV, US, CS) regularize_surface h h tv tv dt dt ea ea eb eb G G GV GV US US CS CS This subroutine ensures that there is a degree of horizontal smoothness in the depths of the near-surface interfaces. g The ocean's grid structure. gv The ocean's vertical grid structure. h Layer thicknesses [H ~> m or kg m-2]. tv A structure containing pointers to any available thermodynamic fields. Absent fields have NULL ptrs. dt Time increment [T ~> s]. ea The amount of fluid moved downward into a eb The amount of fluid moved upward into a layer us A dimensional unit scaling type cs The control structure returned by a previous call to regularize_layers_init. mom_eos::eos_domain find_deficit_ratios id_clock_eos mom_error_handler::mom_error regularize_layers subroutine subroutine mom_regularize_layers::find_deficit_ratios (e, def_rat_u, def_rat_v, G, GV, CS, def_rat_u_2lay, def_rat_v_2lay, halo, h) find_deficit_ratios e e def_rat_u def_rat_u def_rat_v def_rat_v G G GV GV CS CS def_rat_u_2lay def_rat_u_2lay def_rat_v_2lay def_rat_v_2lay halo halo h h This subroutine determines the amount by which the harmonic mean thickness at velocity points differ from the arithmetic means, relative to the the arithmetic means, after eliminating thickness variations that are solely due to topography and aggregating all interior layers into one. g The ocean's grid structure. gv The ocean's vertical grid structure. e Interface depths [H ~> m or kg m-2] def_rat_u The thickness deficit ratio at u points, def_rat_v The thickness deficit ratio at v points, cs The control structure returned by a previous call to regularize_layers_init. def_rat_u_2lay The thickness deficit ratio at u def_rat_v_2lay The thickness deficit ratio at v halo An extra-wide halo size, 0 by default. h Layer thicknesses [H ~> m or kg m-2]. regularize_surface subroutine, public subroutine, public mom_regularize_layers::regularize_layers_init (Time, G, GV, param_file, diag, CS) regularize_layers_init Time Time G G GV GV param_file param_file diag diag CS CS Initializes the regularize_layers control structure. time The current model time. g The ocean's grid structure. gv The ocean's vertical grid structure. param_file A structure to parse for run-time parameters. diag A structure that is used to regulate diagnostic output. cs A pointer that is set to point to the control structure for this module. mom_cpu_clock::cpu_clock_id id_clock_eos id_clock_pass mom_error_handler::mom_error mom_diabatic_driver::diabatic_driver_init Provides regularization of layers in isopycnal mode.