Skip to content

Commit 336ed4f

Browse files
Remove iau_offset from full_coupler_mod.F90
1 parent 219e1a9 commit 336ed4f

File tree

1 file changed

+1
-3
lines changed

1 file changed

+1
-3
lines changed

full/full_coupler_mod.F90

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -177,7 +177,6 @@ module full_coupler_mod
177177
integer, public :: atmos_nthreads=1 !< Number of OpenMP threads to use in the atmosphere
178178
integer, public :: ocean_nthreads=1 !< Number of OpenMP threads to use in the ocean
179179
integer, public :: radiation_nthreads=1 !< Number of threads to use for the radiation.
180-
integer, public :: iau_offset = 0 !< IAU window length in hours
181180

182181
!> Indicates if this component should be executed. If .FALSE., then execution is skipped.
183182
!! This is used when ALL the output fields sent by this component to the coupler have been
@@ -234,7 +233,7 @@ module full_coupler_mod
234233
check_stocks, restart_interval, do_debug, do_chksum, &
235234
use_hyper_thread, concurrent_ice, slow_ice_with_ocean, &
236235
do_endpoint_chksum, combined_ice_and_ocean, &
237-
iau_offset, restart_start, restart_first_time_step
236+
restart_start, restart_first_time_step
238237

239238
!> coupler_clock_type derived type consist of all clock ids that will be set and used
240239
!! in full coupler_main.
@@ -917,7 +916,6 @@ subroutine coupler_init(Atm, Ocean, Land, Ice, Ocean_state, Atmos_land_boundary,
917916
endif
918917

919918
call fms_mpp_clock_begin(coupler_clocks%atmos_model_init)
920-
Atm%iau_offset = iau_offset
921919
call atmos_model_init( Atm, Time_init, Time, Time_step_atmos, &
922920
do_concurrent_radiation)
923921
call fms_mpp_clock_end(coupler_clocks%atmos_model_init)

0 commit comments

Comments
 (0)