Modify external_sst (#297)

* sst fix * reorganizing external_sst so use statement is before variable declaration
NOAA-GFDL · Oct 20, 2023 · 5084f57 · 5084f57
1 parent ecb953a
commit 5084f57
Showing 1 changed file with 2 additions and 10 deletions.
diff --git a/tools/external_sst.F90 b/tools/external_sst.F90
@@ -21,17 +21,9 @@
 
 module external_sst_mod
 
-#ifdef NO_GFDL_SHARED
-!----------------- Public Data -----------------------------------
-integer :: i_sst = -1
-integer :: j_sst = -1
-logical :: forecast_mode = .false.
-logical :: use_ncep_sst  = .false.
+use amip_interp_mod, only: i_sst, j_sst, forecast_mode, use_ncep_sst
+
 real, allocatable, dimension(:,:) ::  sst_ncep, sst_anom
-#else
-use amip_interp_mod, only: i_sst, j_sst, sst_ncep, sst_anom, &
-                           forecast_mode, use_ncep_sst
-#endif
 
 public i_sst, j_sst, sst_ncep, sst_anom, forecast_mode, use_ncep_sst