diff --git a/src/offline/cable_mpimaster.F90 b/src/offline/cable_mpimaster.F90 index 498eeac00..03ff6df63 100644 --- a/src/offline/cable_mpimaster.F90 +++ b/src/offline/cable_mpimaster.F90 @@ -351,8 +351,6 @@ SUBROUTINE mpidrv_master (comm, trunk_sumbal) ENDIF ENDIF - CurYear = CABLE_USER%YearStart - IF ( icycle .GE. 11 ) THEN icycle = icycle - 10 CASAONLY = .TRUE. diff --git a/src/offline/cable_mpiworker.F90 b/src/offline/cable_mpiworker.F90 index 12c557ce3..83747c164 100644 --- a/src/offline/cable_mpiworker.F90 +++ b/src/offline/cable_mpiworker.F90 @@ -236,8 +236,6 @@ SUBROUTINE mpidrv_worker (comm) IF (CABLE_USER%POPLUC .AND. TRIM(CABLE_USER%POPLUC_RunType) .EQ. 'static') & CABLE_USER%POPLUC= .FALSE. - CurYear = CABLE_USER%YearStart - IF ( icycle .GE. 11 ) THEN icycle = icycle - 10 CASAONLY = .TRUE. diff --git a/src/offline/cable_serial.F90 b/src/offline/cable_serial.F90 index 939f174d9..66721bc24 100644 --- a/src/offline/cable_serial.F90 +++ b/src/offline/cable_serial.F90 @@ -286,8 +286,6 @@ SUBROUTINE serialdrv(trunk_sumbal) ENDIF ENDIF - CurYear = CABLE_USER%YearStart - IF ( icycle .GE. 11 ) THEN icycle = icycle - 10 CASAONLY = .TRUE.