--- trunk/Sources/phylmd/phystokenc.f	2015/07/08 17:03:45	155
+++ trunk/Sources/phylmd/phystokenc.f	2016/03/21 15:36:26	186
@@ -12,9 +12,10 @@
     ! Author: Fr\'ed\'eric Hourdin
     ! Objet : \'ecriture des variables pour transport offline
 
+    use gr_fi_ecrit_m, only: gr_fi_ecrit
     USE histwrite_m, ONLY: histwrite
     USE histsync_m, ONLY: histsync
-    USE dimens_m, ONLY: iim, jjm, nqmx
+    USE dimens_m, ONLY: iim, jjm
     USE indicesol, ONLY: nbsrf
     use initphysto_m, only: initphysto
     USE dimphy, ONLY: klev, klon