From fe03fe49dd1bac237b32abfa09b74c44aa65a566 Mon Sep 17 00:00:00 2001 From: Brian Eaton Date: Wed, 6 Nov 2024 10:32:26 -0500 Subject: [PATCH] only do modal aerosol calcs when modal aerosols are used --- src/physics/cam7/physpkg.F90 | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/physics/cam7/physpkg.F90 b/src/physics/cam7/physpkg.F90 index 83d03c46d1..91dc3311df 100644 --- a/src/physics/cam7/physpkg.F90 +++ b/src/physics/cam7/physpkg.F90 @@ -2882,8 +2882,10 @@ subroutine tphysbc (ztodt, state, & ! Run wet deposition routines to intialize aerosols !=================================================== - call modal_aero_calcsize_diag(state, pbuf) - call modal_aero_wateruptake_dr(state, pbuf) + if (clim_modal_aero) then + call modal_aero_calcsize_diag(state, pbuf) + call modal_aero_wateruptake_dr(state, pbuf) + end if !=================================================== ! Radiation computations