--- trunk/Sources/phylmd/phystokenc.f	2016/03/16 15:04:46	185
+++ trunk/Sources/phylmd/phystokenc.f	2016/03/21 15:36:26	186
@@ -12,6 +12,7 @@
     ! 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