From 79a150436e3d6c377d7d44a06cd01571fc1924b6 Mon Sep 17 00:00:00 2001 From: Steve Goldhaber Date: Thu, 19 Sep 2024 18:49:15 +0200 Subject: [PATCH] Remove dms_from_ocn from phys_control --- src/physics/cam/phys_control.F90 | 7 ------- 1 file changed, 7 deletions(-) diff --git a/src/physics/cam/phys_control.F90 b/src/physics/cam/phys_control.F90 index 6283e32294..bd723cacf2 100644 --- a/src/physics/cam/phys_control.F90 +++ b/src/physics/cam/phys_control.F90 @@ -14,7 +14,6 @@ module phys_control use cam_logfile, only: iulog use cam_abortutils, only: endrun use shr_kind_mod, only: r8 => shr_kind_r8, cl=>shr_kind_cl -use atm_import_export, only: drv_dms_from_ocn => dms_from_ocn implicit none private @@ -106,9 +105,6 @@ module phys_control ! Option for Harmonized Emissions Component (HEMCO) logical, public, protected :: use_hemco = .false. -! Take DMS from ocean? -logical, public, protected :: dms_from_ocn = .false. - ! CAM snapshot before/after file numbers and control character(len=32) :: cam_take_snapshot_before = '' ! Physics routine to take a snopshot "before" character(len=32) :: cam_take_snapshot_after = '' ! Physics routine to take a snopshot "after" @@ -281,9 +277,6 @@ subroutine phys_ctl_readnl(nlfile) ! prog_modal_aero determines whether prognostic modal aerosols are present in the run. prog_modal_aero = index(cam_chempkg,'_mam')>0 - ! Set this from the driver namelist (always read first) - dms_from_ocn = drv_dms_from_ocn - end subroutine phys_ctl_readnl !===============================================================================