diff --git a/src/OCE/LDF/ldfslp.F90 b/src/OCE/LDF/ldfslp.F90 index dacc75fc0fae325933e745d80ef679fc01b8c266..cfed0ff8fc904931124e9e22238c0f327fa25868 100644 --- a/src/OCE/LDF/ldfslp.F90 +++ b/src/OCE/LDF/ldfslp.F90 @@ -589,9 +589,6 @@ CONTAINS zm1_2g = -0.5_wp / grav z1_slpmax = 1._wp / rn_slpmax ! - uslpml (1,:) = 0._wp ; uslpml (jpi,:) = 0._wp - vslpml (1,:) = 0._wp ; vslpml (jpi,:) = 0._wp - ! ! !== surface mixed layer mask ! DO_3D( 1, 1, 1, 1, 1, jpk ) ! =1 inside the mixed layer, =0 otherwise ik = nmln(ji,jj) - 1