--- MITgcm/verification/fizhi-gridalt-hs/code/update_ocean_exports.F	2004/10/22 14:54:03	1.3
+++ MITgcm/verification/fizhi-gridalt-hs/code/update_ocean_exports.F	2005/06/16 15:09:42	1.4
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/verification/fizhi-gridalt-hs/code/update_ocean_exports.F,v 1.3 2004/10/22 14:54:03 molod Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/verification/fizhi-gridalt-hs/code/update_ocean_exports.F,v 1.4 2005/06/16 15:09:42 molod Exp $
 C $Name:  $
 
 #include "FIZHI_OPTIONS.h"
@@ -24,7 +24,6 @@
        integer i, j, bi, bj, biglobal, bjglobal
        integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
        integer nSxglobal, nSyglobal
-       integer ksst,kice
        _RL        sstmin 
        parameter ( sstmin = 273.16 )
 
@@ -39,9 +38,6 @@
        nSxglobal = nSx*nPx
        nSyglobal = nSy*nPy
 
-       call mdsfindunit( ksst, myThid )
-       call mdsfindunit( kice, myThid )
- 
 C***********************************************************************
 
        DO BJ = myByLo(myThid),myByHi(myThid)