--- trunk/phylmd/time_phylmdz.f 2018/02/05 10:39:38 254 +++ trunk/phylmd/time_phylmdz.f 2018/12/07 14:17:11 312 @@ -2,8 +2,8 @@ implicit none - INTEGER:: itap = 0 ! number of calls to "physiq" - integer itau_w ! pas de temps d'\'ecriture + INTEGER, protected:: itap = 0 ! number of calls to "physiq" + integer, protected:: itau_w ! pas de temps d'\'ecriture contains