Symbol Description Uses
sice 35



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 197 DO_FIZHI
       sea_ice(i,j) = sice(i,j,bi,bj)
./pkg/fizhi/do_fizhi.F 53 DO_FIZHI
      _RL sice(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 9 DO_FIZHI
     & tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf,
./pkg/fizhi/fizhi_init_fixed.F 118 FIZHI_INIT_FIXED
         if(sice(i,j,bi,bj).ne.0.0)landtype(i,j,bi,bj) = 101
./pkg/fizhi/fizhi_ocean_coms.h 12 NO PROCEDURE
      common /ocean_exports/ sst, sice
./pkg/fizhi/fizhi_ocean_coms.h 14 NO PROCEDURE
      _RL sice(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nsx,Nsy)
./pkg/fizhi/fizhi_wrapper.F 267 FIZHI_WRAPPER
     &  tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf,
./pkg/fizhi/update_earth_exports.F 149 UPDATE_EARTH_EXPORTS
        if(fracl(i,j).lt.0.3.and.sice(i,j,bi,bj).eq.0.0)
./pkg/fizhi/update_earth_exports.F 87 UPDATE_EARTH_EXPORTS
        if(sice(i,j,bi,bj).gt.0.) then
./pkg/fizhi/update_ocean_exports.F 104 UPDATE_OCEAN_EXPORTS
       if(sice(i,j,bi,bj).eq.0.0 .and. sst(i,j,bi,bj).lt.sstmin)
./pkg/fizhi/update_ocean_exports.F 112 UPDATE_OCEAN_EXPORTS
       _EXCH_XY_RL(sice,myThid)
./pkg/fizhi/update_ocean_exports.F 120 GETSICE
     .   nymdbc,nhmsbc,sice,mythid)
./pkg/fizhi/update_ocean_exports.F 170 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./pkg/fizhi/update_ocean_exports.F 354 GETSICE
       sice(i,j,bi,bj) = sicebc1(i+bislot,j+bjslot)*fac1
./pkg/fizhi/update_ocean_exports.F 358 GETSICE
       if (sice(i,j,bi,bj) .ge. 0.5) then
./pkg/fizhi/update_ocean_exports.F 359 GETSICE
        sice(i,j,bi,bj) = 1.
./pkg/fizhi/update_ocean_exports.F 361 GETSICE
        sice(i,j,bi,bj) = 0.
./pkg/fizhi/update_ocean_exports.F 369 GETSICE
       if (sice(i,j,bi,bj) .eq. 1.) then
./pkg/fizhi/update_ocean_exports.F 370 GETSICE
        sice(i,j,bi,bj) = 3.
./pkg/fizhi/update_ocean_exports.F 98 UPDATE_OCEAN_EXPORTS
     .  sicetimes(1,bi,bj),sice,myThid)
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F 97 FIZHI_INIT_FIXED
         if(sice(i,j,bi,bj).ne.0.0)landtype(i,j,bi,bj) = 101
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 104 UPDATE_OCEAN_EXPORTS
       if(sice(i,j,bi,bj).eq.0.0 .and. sst(i,j,bi,bj).lt.sstmin)
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 112 UPDATE_OCEAN_EXPORTS
       _EXCH_XY_RL(sice,myThid)
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 120 GETSICE
     .   nymdbc,nhmsbc,sice,mythid)
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 170 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 184 GETSICE
       sice(i,j,bi,bj) = 0.
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 98 UPDATE_OCEAN_EXPORTS
     .  sicetimes(1,bi,bj),sice,myThid)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 53 DO_FIZHI
      _RL sice(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 9 DO_FIZHI
     & tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf,
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F 97 FIZHI_INIT_FIXED
         if(sice(i,j,bi,bj).ne.0.0)landtype(i,j,bi,bj) = 101
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 117 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 123 GETSICE
       sice(i,j,bi,bj) = 0.
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 52 UPDATE_OCEAN_EXPORTS
     .  nSy,nSxglobal,nSyglobal,bi,bj,biglobal,bjglobal,nymd,nhms,sice)
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 58 UPDATE_OCEAN_EXPORTS
       if(sice(i,j,bi,bj).eq.0.0 .and. sst(i,j,bi,bj).lt.sstmin)
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 70 GETSICE
     .     nSumx,nSumy,nPgx,nPgy,bi,bj,biglobal,bjglobal,nymd,nhms,sice)