Add warning message for deprecated zsalinity

CICE-Consortium · Aug 21, 2023 · 4576b9b · 4576b9b
1 parent 14a1bef
commit 4576b9b
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git a/cicecore/cicedyn/analysis/ice_history_bgc.F90 b/cicecore/cicedyn/analysis/ice_history_bgc.F90
@@ -150,9 +150,6 @@ module ice_history_bgc
       ! field indices
       !---------------------------------------------------------------
 
-      integer (kind=int_kind), dimension(max_nstrm), public :: &
-           n_zsal
-
       integer(kind=int_kind), dimension(icepack_max_iso,max_nstrm) :: &
            n_fiso_atm    , &
            n_fiso_ocn    , &

diff --git a/cicecore/shared/ice_init_column.F90 b/cicecore/shared/ice_init_column.F90
@@ -1605,6 +1605,8 @@ subroutine input_zbgc
          write(nu_diag,1005) ' phi_snow                  = ', phi_snow
          endif
          write(nu_diag,1010) ' solve_zsal (deprecated)   = ', solve_zsal
+         write(nu_diag,*   ) '     WARNING: zsalinity has been deprecated.  Namelists and interfaces'
+         write(nu_diag,*   ) '              will be removed in a future version'
 
          write(nu_diag,1010) ' skl_bgc                   = ', skl_bgc
          write(nu_diag,1010) ' restart_bgc               = ', restart_bgc