Symbol Description Uses
doanom 9



File Line number Procedure Code
./pkg/ecco/cost_generic.F 111 COST_GENERIC
      doanom=.FALSE.
./pkg/ecco/cost_generic.F 114 COST_GENERIC
          if (preproc(k2).EQ.'anom') doanom=.TRUE.
./pkg/ecco/cost_generic.F 119 COST_GENERIC
     &   .AND. ( domean .OR. doanom ) ) then
./pkg/ecco/cost_generic.F 243 COST_GENLOOP
      logical domean, doanom, dovarwei, doclim, dosmooth, dosumsq
./pkg/ecco/cost_generic.F 287 COST_GENLOOP
      doanom=.FALSE.
./pkg/ecco/cost_generic.F 297 COST_GENLOOP
          if (preproc(k2).EQ.'anom') doanom=.TRUE.
./pkg/ecco/cost_generic.F 367 COST_GENLOOP
        if ( doanom ) call ECCO_SUBTRACT( localdifmeanIn,
./pkg/ecco/cost_generic.F 370 COST_GENLOOP
        if ( domean.OR.doanom )
./pkg/ecco/cost_generic.F 86 COST_GENERIC
      logical domean, doanom