--- trunk/libf/dyn3d/Dissipation/comdissnew.f90 2012/08/01 14:13:57 63 +++ trunk/libf/dyn3d/Dissipation/comdissnew.f90 2012/08/29 14:47:17 64 @@ -2,8 +2,6 @@ implicit none - LOGICAL:: lstardis = .TRUE. ! choix de l'opérateur de dissipation star - INTEGER:: nitergdiv = 1 ! nombre d'itérations de l'opérateur de dissipation gradiv @@ -31,8 +29,8 @@ use unit_nml_m, only: unit_nml - namelist /comdissnew_nml/lstardis, nitergdiv, nitergrot, niterh, & - tetagdiv, tetagrot, tetatemp, coefdis + namelist /comdissnew_nml/nitergdiv, nitergrot, niterh, tetagdiv, & + tetagrot, tetatemp, coefdis !-------------------------------------------------