--- trunk/Sources/dyn3d/leapfrog.f	2015/05/06 15:51:03	137
+++ trunk/Sources/dyn3d/leapfrog.f	2015/05/22 23:13:19	138
@@ -216,7 +216,7 @@
 
        IF (MOD(itau + 1, iecri * day_step) == 0) THEN
           CALL geopot(teta, pk, pks, phis, phi)
-          CALL writehist(itau, vcov, ucov, teta, phi, q, masse, ps)
+          CALL writehist(itau, vcov, ucov, teta, phi, masse, ps)
        END IF
     end do time_integration