Changeset 3242 for LMDZ6/branches/IPSLCM6.0.15/libf/phylmd/cosp/mod_cosp_constants.F90

Timestamp:

Mar 7, 2018, 10:59:04 AM (7 years ago)

Author:

idelkadi

Message:

Nettoyage du code :

• changement de nomes des routines pour avoir les memes nome des modules
• corrections
• dos2unix appliquee aux fichiers
• Rajouter "implicit none" pour les routines ne le comportant pas
• Suppression des commentaires unitils

Corrections pour tourner en mode debug :

controle par la cles ok_debug_cosp dans mod_cosp_constants.F90
la valeur par defaut etant .false.

File:

• LMDZ6/branches/IPSLCM6.0.15/libf/phylmd/cosp/mod_cosp_constants.F90 (moved) (moved from LMDZ6/branches/IPSLCM6.0.15/libf/phylmd/cosp/cosp_constants.F90) (1 diff)

LMDZ6/branches/IPSLCM6.0.15/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