Symbol Description Uses
frame 65



File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 196 ECCO_COST_WEIGHTS
            frame(i,j) = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 198 ECCO_COST_WEIGHTS
            frame(i,j) = 1. _d 0
./pkg/ecco/ecco_cost_weights.F 216 ECCO_COST_WEIGHTS
              cosphi(i,j,bi,bj) = frame(i,j)
./pkg/ecco/ecco_cost_weights.F 332 ECCO_COST_WEIGHTS
                 wsalt2(i,j,k,bi,bj)=frame(i,j)/
./pkg/ecco/ecco_cost_weights.F 347 ECCO_COST_WEIGHTS
     $               *wsalt(k,bi,bj)) *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 374 ECCO_COST_WEIGHTS
                 wtheta2(i,j,k,bi,bj)= frame(i,j)/
./pkg/ecco/ecco_cost_weights.F 392 ECCO_COST_WEIGHTS
     $                *wtheta(k,bi,bj))*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 414 ECCO_COST_WEIGHTS
                wsst(i,j,bi,bj) = wtheta(k,bi,bj)*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 415 ECCO_COST_WEIGHTS
                wsss(i,j,bi,bj) = wsalt(k,bi,bj)*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 432 ECCO_COST_WEIGHTS
              wp(i,j,bi,bj) = wp(i,j,bi,bj)*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 450 ECCO_COST_WEIGHTS
              wp(i,j,bi,bj) = frame(i,j)
./pkg/ecco/ecco_cost_weights.F 476 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 478 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 517 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 524 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 551 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 557 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 585 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 587 ECCO_COST_WEIGHTS
              wtauu2(i,j,bi,bj) = wtau0*maskW(i,j,k,bi,bj)*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 618 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 647 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 649 ECCO_COST_WEIGHTS
              wtauv2(i,j,bi,bj) = wtau0*maskS(i,j,k,bi,bj)*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 680 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 710 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 712 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 714 ECCO_COST_WEIGHTS
              whflux2(i,j,bi,bj) = whflux0*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 745 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 777 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 779 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/ecco_cost_weights.F 781 ECCO_COST_WEIGHTS
              wsflux2(i,j,bi,bj) = wsflux0*frame(i,j)
./pkg/ecco/ecco_cost_weights.F 812 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./pkg/ecco/cost_readtopex.F 159 COST_READTOPEX
              tpmask(i,j,bi,bj) = tpmask(i,j,bi,bj)*frame(i,j)
./pkg/ecco/cost_readers.F 161 COST_READERS
              ersmask(i,j,bi,bj) = ersmask(i,j,bi,bj)*frame(i,j)
./pkg/ecco/cost_readscatyfields.F 137 COST_READSCATYFIELDS
              scatymask(i,j,bi,bj) = scatymask(i,j,bi,bj)*frame(i,j)
./pkg/ecco/cost_readtopexmean.F 101 COST_READTOPEXMEAN
              tpmeanmask(i,j,bi,bj) = tpmeanmask(i,j,bi,bj)*frame(i,j)
./pkg/ecco/ecco_cost.h 698 NO PROCEDURE
     &                      frame,
./pkg/ecco/ecco_cost.h 714 NO PROCEDURE
      _RL frame   (1-olx:snx+olx,1-oly:sny+oly           )
./pkg/ecco/cost_readscatxfields.F 139 COST_READSCATXFIELDS
              scatxmask(i,j,bi,bj) = scatxmask(i,j,bi,bj)*frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 196 ECCO_COST_WEIGHTS
            frame(i,j) = 0. _d 0
./verification/global1x1_tot/code/ecco_cost_weights.F 198 ECCO_COST_WEIGHTS
            frame(i,j) = 1. _d 0
./verification/global1x1_tot/code/ecco_cost_weights.F 216 ECCO_COST_WEIGHTS
              cosphi(i,j,bi,bj) = frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 336 ECCO_COST_WEIGHTS
                 wsalt2(i,j,k,bi,bj)=ratio*frame(i,j)/MAX(
./verification/global1x1_tot/code/ecco_cost_weights.F 352 ECCO_COST_WEIGHTS
     $               *wsalt(k,bi,bj)) *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 379 ECCO_COST_WEIGHTS
                 wtheta2(i,j,k,bi,bj)=ratio*frame(i,j)/MAX(
./verification/global1x1_tot/code/ecco_cost_weights.F 398 ECCO_COST_WEIGHTS
     $                *wtheta(k,bi,bj))*frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 420 ECCO_COST_WEIGHTS
                wsst(i,j,bi,bj) = wtheta(k,bi,bj)*frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 421 ECCO_COST_WEIGHTS
                wsss(i,j,bi,bj) = wsalt(k,bi,bj)*frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 438 ECCO_COST_WEIGHTS
              wp(i,j,bi,bj) = wp(i,j,bi,bj)*frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 457 ECCO_COST_WEIGHTS
              wp(i,j,bi,bj) = frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 483 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 486 ECCO_COST_WEIGHTS
     &                               *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 536 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 553 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 580 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 586 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 625 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 659 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 699 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 733 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 765 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 767 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 801 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 833 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 835 ECCO_COST_WEIGHTS
     &                            *frame(i,j)
./verification/global1x1_tot/code/ecco_cost_weights.F 869 ECCO_COST_WEIGHTS
     &                            *frame(i,j)