--- trunk/libf/phylmd/gr_fi_ecrit.f90 2008/08/01 15:24:12 15 +++ trunk/phylmd/gr_fi_ecrit.f 2014/03/05 14:57:53 82 @@ -1,7 +1,6 @@ SUBROUTINE gr_fi_ecrit(nfield, nlon, iim, jjmp1, fi, ecrit) ! From phylmd/physiq.F, version 1.22 2006/02/20 09:38:28 - ! This procedure is clean: no C preprocessor directive, no include line. IMPLICIT none