From 4343656a098516517257c0913689f70a81579e74 Mon Sep 17 00:00:00 2001 From: Tseganeh Gichamo <1621305073113305@mil> Date: Fri, 15 Nov 2024 12:40:29 -0500 Subject: [PATCH] combine use lnd_iau_mod lines --- physics/SFC_Models/Land/Noahmp/noahmpdrv.F90 | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/physics/SFC_Models/Land/Noahmp/noahmpdrv.F90 b/physics/SFC_Models/Land/Noahmp/noahmpdrv.F90 index a33da9c8f..d4971efd9 100644 --- a/physics/SFC_Models/Land/Noahmp/noahmpdrv.F90 +++ b/physics/SFC_Models/Land/Noahmp/noahmpdrv.F90 @@ -15,11 +15,9 @@ module noahmpdrv ! These hold and apply Land IAU increments for soil temperature ! (possibly will extend to soil moisture increments) - use land_iau_mod, only: land_iau_control_type, land_iau_external_data_type, & - land_iau_state_type - - use land_iau_mod, only: land_iau_mod_init, land_iau_mod_getiauforcing, land_iau_mod_finalize, & - calculate_landinc_mask + use land_iau_mod, only: land_iau_control_type, land_iau_external_data_type, land_iau_state_type, & + land_iau_mod_init, land_iau_mod_getiauforcing, land_iau_mod_finalize, calculate_landinc_mask + implicit none integer, parameter :: psi_opt = 0 ! 0: MYNN or 1:GFS