Changeset 3241 for LMDZ6/trunk/libf/phylmd/cosp/mod_cosp_constants.F90

Timestamp:

Mar 6, 2018, 10:46:13 AM (6 years ago)

Author:

idelkadi

Message:

• Corrections pour tourner en mode debug, controle par la cles ok_debug_cosp dans mod_cosp_constants.F90 la valeur par defaut etant .false.
• Rajouter "implicit none" pour les routines ne le comportant pas
• Nettoyage du code (suppression des commentaires unitils)

File:

• LMDZ6/trunk/libf/phylmd/cosp/mod_cosp_constants.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/cosp/mod_cosp_constants.F90

@@ -38 +38 @@
 
     character(len=32) :: COSP_VERSION='COSP v1.4'
+
+    ! Mode debug ou prod (AI 0302018)
+    logical :: ok_debug_cosp = .false.
 
     ! Indices to address arrays of LS and CONV hydrometeors