--- MITgcm/pkg/cost/cost_vector.F	2002/09/25 19:36:50	1.2
+++ MITgcm/pkg/cost/cost_vector.F	2003/10/02 21:34:45	1.3
@@ -76,6 +76,11 @@
          end if
         end do
 
+        do i = 1,sNx
+           print*,' --> objf_vector(i,bi,bj)  = ',
+     &          objf_vector(i,bi,bj)
+        end do
+
        END DO
       END DO