From 4e48fcce252289ffc8ab25066fa1261b8d790ba7 Mon Sep 17 00:00:00 2001 From: sebastien masson <smasson@amphitrite.locean-ipsl.upmc.fr> Date: Thu, 25 Aug 2022 17:55:06 +0200 Subject: [PATCH] correct previous merge, #68 --- src/OCE/IOM/iom.F90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/src/OCE/IOM/iom.F90 b/src/OCE/IOM/iom.F90 index 7a102477c..49433e40e 100644 --- a/src/OCE/IOM/iom.F90 +++ b/src/OCE/IOM/iom.F90 @@ -1207,8 +1207,6 @@ CONTAINS !--------------------------------------------------------------------- CHARACTER(LEN=lc) :: context ! - ! CE : llok must be initialised otherwise the model crash in debug mode - llok = .TRUE. CALL set_xios_context(kiomid, context) inlev = -1 IF( PRESENT(pv_r3d) ) inlev = SIZE(pv_r3d, 3) -- GitLab