--- trunk/phylmd/clesphys2.f 2019/03/13 15:53:40 325 +++ trunk/phylmd/clesphys2.f 2019/06/10 00:29:10 326 @@ -4,21 +4,22 @@ implicit none - LOGICAL:: new_oliq = .TRUE. + LOGICAL, protected:: new_oliq = .TRUE. ! Permet de mettre en route la nouvelle parametrisation de l'eau liquide ! Pour l'orographie: - LOGICAL:: ok_orodr = .TRUE. - LOGICAL:: ok_orolf = .TRUE. + LOGICAL, protected:: ok_orodr = .TRUE. + LOGICAL, protected:: ok_orolf = .TRUE. - LOGICAL:: ok_limitvrai = .FALSE. + LOGICAL, protected:: ok_limitvrai = .FALSE. ! On peut forcer le modele a lire le fichier SST de la bonne ! annee. - INTEGER:: nbapp_rad = 12 + INTEGER, protected:: nbapp_rad = 12 ! nombre d'appels des routines de rayonnements par jour - logical:: conv_emanuel = .true. ! convection scheme of Emanuel, else Tiedtke + logical, protected:: conv_emanuel = .true. + ! convection scheme of Emanuel, else Tiedtke contains