Symbol Description Uses
etan 8


File Line number Procedure Code
./pkg/ecco/ecco_phys.F 133 ECCO_PHYS 
     &                 etan(i,j,bi,bj)
./pkg/openad/openad_dumpAdjoint.F 116 OPENAD_DUMPADJOINT 
         foo4=etand
./pkg/openad/the_model_main.F 550 THE_MODEL_MAIN 
      foo2D=etand
./pkg/autodiff/addummy_in_stepping.F 550 ADDUMMY_IN_STEPPING 
          foo2D = etand
./pkg/cost/cost_state_final.F 41 COST_STATE_FINAL 
          objf_state_final(i,j,bi,bj,4*Nr+1) = etan(i,j,bi,bj)
./pkg/ctrl/ctrl_map_ini_ecco.F 189 CTRL_MAP_INI_ECCO 
     & xx_etan_dummy, boundsVec, etan, maskc, paramSmooth,
./pkg/ctrl/ctrl_map_ini_ecco.F 191 CTRL_MAP_INI_ECCO 
      _EXCH_XY_RL( etan, mythid)
./pkg/ecco/cost_averagesfields.F 226 COST_AVERAGESFIELDS 
                etanLeads(i,j,bi,bj)=etan(i,j,bi,bj)