--- MITgcm/pkg/timeave/timeave_statv_write.F	2002/01/03 16:25:44	1.3
+++ MITgcm/pkg/timeave/timeave_statv_write.F	2002/09/18 16:38:02	1.4
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/timeave/timeave_statv_write.F,v 1.3 2002/01/03 16:25:44 jmc Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/timeave/timeave_statv_write.F,v 1.4 2002/09/18 16:38:02 mlosch Exp $
 C $Name:  $
 #include "CPP_OPTIONS.h"
 
@@ -79,6 +79,10 @@
           CALL TIMEAVE_NORMALIZ(WTtave,   TimeAve_full,Nr,bi,bj,myThid)
           CALL TIMEAVE_NORMALIZ(phiHydtave,TimeAve_full,Nr,
      &                            bi,bj,myThid)
+          CALL TIMEAVE_NORMALIZ(phiHydLowtave,TimeAve_full,1,
+     &                            bi,bj,myThid)
+          CALL TIMEAVE_NORMALIZ(phiHydLow2Tave,TimeAve_full,1,
+     &                            bi,bj,myThid)
           CALL TIMEAVE_NORMALIZ(ConvectCountTave,TimeAve_full,Nr,
      &                            bi,bj,myThid)
         ENDDO
@@ -99,6 +103,10 @@
 c      writeBinaryPrec = precFloat32
        CALL WRITE_FLD_XY_RL('ETAtave.',suff,etatave,myIter,myThid)
        CALL WRITE_FLD_XY_RL('Eta2tave.',suff,Eta2tave,myIter,myThid)
+       CALL WRITE_FLD_XY_RL('PHLtave.',suff,phiHydLowtave,
+     &      myIter,myThid)
+       CALL WRITE_FLD_XY_RL('PHL2tave.',suff,phiHydLow2tave,
+     &      myIter,myThid)
 
        CALL WRITE_FLD_XYZ_RL('Ttave.',suff,thetatave,myIter,myThid)
        CALL WRITE_FLD_XYZ_RL('Stave.',suff,salttave,myIter,myThid)