Skip to content

Commit

Permalink
Rename lateral_boundary_diffusion_CS to lbd_CS
Browse files Browse the repository at this point in the history
  • Loading branch information
gustavo-marques committed Sep 4, 2020
1 parent aa8ce21 commit d8ae09f
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/tracer/MOM_tracer_hor_diff.F90
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,7 @@ module MOM_tracer_hor_diff
use MOM_neutral_diffusion, only : neutral_diffusion_init, neutral_diffusion_end
use MOM_neutral_diffusion, only : neutral_diffusion_CS
use MOM_neutral_diffusion, only : neutral_diffusion_calc_coeffs, neutral_diffusion
use MOM_lateral_boundary_diffusion, only : lateral_boundary_diffusion_CS, lateral_boundary_diffusion_init
use MOM_lateral_boundary_diffusion, only : lbd_CS, lateral_boundary_diffusion_init
use MOM_lateral_boundary_diffusion, only : lateral_boundary_diffusion
use MOM_tracer_registry, only : tracer_registry_type, tracer_type, MOM_tracer_chksum
use MOM_unit_scaling, only : unit_scale_type
Expand Down Expand Up @@ -64,7 +64,7 @@ module MOM_tracer_hor_diff
logical :: recalc_neutral_surf !< If true, recalculate the neutral surfaces if CFL has been
!! exceeded
type(neutral_diffusion_CS), pointer :: neutral_diffusion_CSp => NULL() !< Control structure for neutral diffusion.
type(lateral_boundary_diffusion_CS), pointer :: lateral_boundary_diffusion_CSp => NULL() !< Control structure for
type(lbd_CS), pointer :: lateral_boundary_diffusion_CSp => NULL() !< Control structure for
!! lateral boundary mixing.
type(diag_ctrl), pointer :: diag => NULL() !< A structure that is used to
!! regulate the timing of diagnostic output.
Expand Down

0 comments on commit d8ae09f

Please sign in to comment.