Symbol Description Uses
areabbbar 4



File Line number Procedure Code
./pkg/ecco/cost_gencost_seaicev4.F 254 COST_GENCOST_SEAICEV4
           call ACTIVE_READ_XY( fname1, areabbbar, irec, doglobalread,
./pkg/ecco/cost_gencost_seaicev4.F 410 COST_GENCOST_SEAICEV4
                junk      = ( areabbbar(i,j,k,bi,bj) -
./pkg/ecco/cost_gencost_seaicev4.F 455 COST_GENCOST_SEAICEV4
                if ( (areabbbar(i,j,1,bi,bj) .LE. 0.).AND.
./pkg/ecco/cost_gencost_seaicev4.F 55 COST_GENCOST_SEAICEV4
      _RL areabbbar   (1-olx:snx+olx,1-oly:sny+oly,1,nsx,nsy)