--- MITgcm/pkg/mom_fluxform/mom_fluxform.F	2002/11/05 18:49:02	1.5
+++ MITgcm/pkg/mom_fluxform/mom_fluxform.F	2002/11/05 19:58:21	1.6
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/mom_fluxform/mom_fluxform.F,v 1.5 2002/11/05 18:49:02 adcroft Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/mom_fluxform/mom_fluxform.F,v 1.6 2002/11/05 19:58:21 adcroft Exp $
 C $Name:  $
 
 CBOI
@@ -567,6 +567,14 @@
        ENDDO
       ENDDO
 #endif /* INCLUDE_CD_CODE */
+      IF (nonHydrostatic) THEN
+       CALL MOM_U_CORIOLIS_NH(bi,bj,k,wVel,cf,myThid)
+       DO j=jMin,jMax
+        DO i=iMin,iMax
+         gU(i,j,k,bi,bj) = gU(i,j,k,bi,bj)+fuFac*cf(i,j)
+        ENDDO
+       ENDDO
+      ENDIF
 
       RETURN
       END