--- MITgcm/model/src/calc_phi_hyd.F	1998/11/06 22:44:44	1.6
+++ MITgcm/model/src/calc_phi_hyd.F	2000/06/09 02:45:04	1.7
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/calc_phi_hyd.F,v 1.6 1998/11/06 22:44:44 cnh Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/model/src/calc_phi_hyd.F,v 1.7 2000/06/09 02:45:04 heimbach Exp $
 
 #include "CPP_OPTIONS.h"
 
@@ -51,6 +51,9 @@
 C     points)
       DO j=jMin,jMax
        DO i=iMin,iMax
+#ifdef ALLOW_AUTODIFF_TAMC
+CADJ GENERAL
+#endif
         phiHyd(i,j,K)=phiHyd(i,j,Km1)-rhoConst*halfLayer
      &  *0.5 _d 0*( drF(Km1)+drF(K) )*gamma
      &  *0.5 _d 0*( buoyKM1(i,j)+buoyKP1(i,j) )