Symbol Description Uses
wwwgfo1 4


File Line number Procedure Code
./pkg/ecco/cost_ssh_new.F 141 COST_SSH_NEW 
              wwwgfo1(i,j,bi,bj) = 0. _d 0
./pkg/ecco/cost_ssh_new.F 237 COST_SSH_NEW 
                  wwwgfo1(i,j,bi,bj) = 1. _d 0
./pkg/ecco/cost_ssh_new.F 403 COST_SSH_NEW 
                wwwgfo2(i,j,bi,bj) = wwwgfo1(i,j,bi,bj)
./pkg/ecco/cost_ssh_new.F 87 COST_SSH_NEW 
      _RL wwwgfo1 ( 1-olx:snx+olx, 1-oly:sny+oly, nsx, nsy )