--- trunk/libf/dyn3d/dteta1.f90 2011/04/13 12:29:18 44 +++ trunk/libf/dyn3d/dteta1.f90 2012/08/29 14:47:17 64 @@ -10,7 +10,7 @@ use dimens_m use paramet_m - use logic + use conf_gcm_m use filtreg_m, only: filtreg IMPLICIT NONE @@ -41,6 +41,6 @@ ! stockage dans dh de la convergence horizont. filtree' du flux ! d'enthalpie potentielle - CALL filtreg(dteta, jjp1, llm, 2, 2, .true., 1) + CALL filtreg(dteta, jjp1, llm, 2, 2, .true.) END SUBROUTINE dteta1