Changeset 3411 for LMDZ6/branches/DYNAMICO-conv/libf/phylmd/surf_ocean_mod.F90

Timestamp:

Nov 5, 2018, 3:24:59 PM (6 years ago)

Author:

Laurent Fairhead

Message:

Undoing merge with trunk (r3356) to properly register Yann's latest modifications

Location:

LMDZ6/branches/DYNAMICO-conv

Files:

• . (modified) (1 prop)
• libf/phylmd/surf_ocean_mod.F90 (modified) (1 diff, 1 prop)

LMDZ6/branches/DYNAMICO-conv/libf/phylmd/surf_ocean_mod.F90

@@ -185 +185 @@
 !--old parametrizations of ocean surface albedo
 !
-    IF (iflag_cycle_diurne.GE.1) THEN
+    IF (cycle_diurne) THEN
 !
        CALL alboc_cd(rmu0,alb_eau)