Skip to content

Commit 64b3cf4

Browse files
committed
src/offline/cable_serial.F90: fix guarding if condition for output module finalisation
1 parent 8610ad4 commit 64b3cf4

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/offline/cable_serial.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1053,12 +1053,12 @@ SUBROUTINE serialdrv(NRRRR, dels, koffset, kend, GSWP_MID, PLUME, CRU, site, mpi
10531053
IF (cable_user%CALL_climate) &
10541054
CALL WRITE_CLIMATE_RESTART_NC ( climate, ktauday )
10551055

1056-
call cable_output_mod_end()
10571056
!--- LN ------------------------------------------[
10581057
ENDIF
10591058

1060-
call cable_netcdf_mod_end()
1059+
if (.not. casaonly) call cable_output_mod_end()
10611060

1061+
call cable_netcdf_mod_end()
10621062

10631063
IF ( TRIM(cable_user%MetType) .NE. "gswp" .AND. &
10641064
TRIM(cable_user%MetType) .NE. "gswp3" .AND. &

0 commit comments

Comments
 (0)