--- trunk/libf/dyn3d/dteta1.f90 2011/04/13 12:29:18 44 +++ trunk/dyn3d/dteta1.f 2014/03/05 14:57:53 82 @@ -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