--- trunk/libf/dyn3d/inigrads.f90 2011/09/23 12:28:01 52 +++ trunk/libf/dyn3d/inigrads.f90 2012/01/10 19:02:02 56 @@ -7,7 +7,7 @@ subroutine inigrads(i_f, x, fx, xmin, xmax, y, ymin, ymax, fy, z, fz, dt, & file, titlel) - ! From dyn3d/inigrads.F, v 1.1.1.1 2004/05/19 12:53:07 + ! From dyn3d/inigrads.F, version 1.1.1.1 2004/05/19 12:53:07 use gradsdef, only: unit, title, ivar, fichier, firsttime, dtime, iid, & ifd, imd, xd, iid, jid, jfd, jmd, yd, lmd, zd, irec