Index: LMDZ6/trunk/libf/dyn3dmem/friction_loc.f90
===================================================================
--- LMDZ6/trunk/libf/dyn3dmem/friction_loc.f90	(revision 5285)
+++ LMDZ6/trunk/libf/dyn3dmem/friction_loc.f90	(revision 5292)
@@ -12,4 +12,5 @@
   USE dimensions_mod, ONLY: iim, jjm, llm, ndm
   USE paramet_mod_h
+  USE academic_mod_h, ONLY: kfrict
 IMPLICIT NONE
 
@@ -25,7 +26,4 @@
   !                   iniacademic.F)
   !=======================================================================
-
-
-  include "academic.h"
 
   ! arguments:
Index: LMDZ6/trunk/libf/dyn3dmem/iniacademic_loc.f90
===================================================================
--- LMDZ6/trunk/libf/dyn3dmem/iniacademic_loc.f90	(revision 5285)
+++ LMDZ6/trunk/libf/dyn3dmem/iniacademic_loc.f90	(revision 5292)
@@ -4,5 +4,6 @@
 SUBROUTINE iniacademic_loc(vcov,ucov,teta,q,masse,ps,phis,time_0)
 
-  USE iniprint_mod_h
+USE academic_mod_h
+    USE iniprint_mod_h
   USE comgeom_mod_h
   USE filtreg_mod, ONLY: inifilr
@@ -38,5 +39,4 @@
 
 
-  include "academic.h"
 
   !   Arguments:
Index: LMDZ6/trunk/libf/dyn3dmem/leapfrog_loc.f90
===================================================================
--- LMDZ6/trunk/libf/dyn3dmem/leapfrog_loc.f90	(revision 5285)
+++ LMDZ6/trunk/libf/dyn3dmem/leapfrog_loc.f90	(revision 5292)
@@ -45,4 +45,5 @@
    USE dimensions_mod, ONLY: iim, jjm, llm, ndm
    USE paramet_mod_h
+   USE academic_mod_h, ONLY: tetarappel, knewt_t, knewt_g, clat4
 IMPLICIT NONE
 
@@ -77,6 +78,4 @@
   !   Declarations:
   !   -------------
-  include "academic.h"
-
   REAL,INTENT(IN) :: time_0 ! not used