Symbol Description Uses
etaN free-surface r-anomaly (r unit) at current time level 84


File Line number Procedure Code
./pkg/flt/flt_traj.F 139 FLT_TRAJ 
              CALL FLT_BILINEAR2D(ix,jy,pp,etaN,     0,bi,bj,myThid)
./pkg/flt/flt_up.F 133 FLT_UP 
             CALL FLT_BILINEAR2D(ix,jy,pp,etaN,0,bi,bj,myThid)
./pkg/monitor/mon_ke.F 138 MON_KE 
     &                      *etaN(i,j,bi,bj)*etaN(i,j,bi,bj)
./pkg/monitor/mon_ke.F 142 MON_KE 
     &            + phi0surf(i,j,bi,bj)*etaN(i,j,bi,bj)
./pkg/monitor/mon_ke.F 274 MON_KE 
            tmpFld(i,j) = etaN(i,j,bi,bj)
./pkg/monitor/mon_vort3.F 86 MON_VORT3 
     &          + tmpFac*(etaN(i,j,bi,bj)-etaH(i,j,bi,bj))
./pkg/monitor/monitor.F 109 MONITOR 
         CALL MON_WRITESTATS_RL(  1, etaN, '_eta',
./pkg/obcs/obcs_calc_stevens.F 228 OBCS_CALC_STEVENS 
            OBEeta(J,bi,bj) = etaN(I-1,J,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 355 OBCS_CALC_STEVENS 
            OBWeta(J,bi,bj) = etaN(I+1,J,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 466 OBCS_CALC_STEVENS 
            OBNeta(I,bi,bj) = etaN(I,J-1,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 578 OBCS_CALC_STEVENS 
            OBSeta(I,bi,bj) = etaN(I,J+1,bi,bj)
./model/src/diags_phi_hyd.F 66 DIAGS_PHI_HYD 
     &            + Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj)
./model/src/diags_phi_rlow.F 189 DIAGS_PHI_RLOW 
     &            + Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj)
./model/src/do_the_model_io.F 119 DO_THE_MODEL_IO 
          CALL PLOT_FIELD_XYRL( etaN  , 'Current etaN  ',
./model/src/dynamics.F 352 DYNAMICS 
     I         etaN,
./pkg/sbo/sbo_calc.F 233 SBO_CALC 
     &           rhoConst*etaN(i,j,bi,bj)*darea +
./pkg/sbo/sbo_calc.F 255 SBO_CALC 
            Mload(i,j,bi,bj) =  rhoConst*etaN(i,j,bi,bj) +
./pkg/seaice/dynsolver.F 170 DYNSOLVER 
            phiSurf(i,j) = Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj)
./pkg/seaice/seaice_dynsolver.F 209 SEAICE_DYNSOLVER 
            phiSurf(i,j) = Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj)
./model/src/ini_dynvars.F 95 INI_DYNVARS 
          etaN(i,j,bi,bj) = 0. _d 0
./pkg/timeave/timeave_statvars.F 114 TIMEAVE_STATVARS 
      CALL TIMEAVE_CUMULATE(etatave,  etaN,  1 , DDTT, bi, bj, myThid)
./pkg/timeave/timeave_statvars.F 122 TIMEAVE_STATVARS 
      CALL TIMEAVE_CUMUL_2V(Eta2tave, etaN,etaN, 1,  0,
./model/src/ini_psurf.F 58 INI_PSURF 
          etaN(I,J,bi,bj) = 0. _d 0
./model/src/ini_psurf.F 65 INI_PSURF 
       CALL READ_FLD_XY_RL( pSurfInitFile, ' ', etaN, 0, myThid )
./model/src/ini_psurf.F 67 INI_PSURF 
       _EXCH_XY_RL(etaN, myThid)
./model/src/ini_psurf.F 76 INI_PSURF 
          etaNm1(I,J,bi,bj) = etaN(I,J,bi,bj)
./model/src/ini_psurf.F 90 INI_PSURF 
          etaH(i,j,bi,bj) = etaN(i,j,bi,bj)
./model/src/ini_psurf.F 91 INI_PSURF 
          etaHnm1(i,j,bi,bj) = etaN(i,j,bi,bj)
./model/src/integr_continuity.F 144 INTEGR_CONTINUITY 
            dEtaHdt(i,j,bi,bj) = (etaN(i,j,bi,bj)-etaH(i,j,bi,bj))
./model/src/integr_continuity.F 209 INTEGR_CONTINUITY 
           etaN(i,j,bi,bj) = etaH(i,j,bi,bj)
./model/src/integr_continuity.F 215 INTEGR_CONTINUITY 
           etaN(i,j,bi,bj) = etaH(i,j,bi,bj)
./model/src/integr_continuity.F 303 INTEGR_CONTINUITY 
     &    _EXCH_XY_RL( etaN , myThid )
./model/src/momentum_correction_step.F 85 MOMENTUM_CORRECTION_STEP 
     I         etaN,
./model/src/post_cg3d.F 128 POST_CG3D 
            etaN(i,j,bi,bj) = etaN(i,j,bi,bj)
./model/src/pre_cg3d.F 160 PRE_CG3D 
     &              +freeSurfFac*etaN(i,j,bi,bj)/deltaTFreeSurf
./model/src/pre_cg3d.F 202 PRE_CG3D 
     &       +( surfFac*etaN(i,j,bi,bj)/deltaTFreeSurf
./model/src/pre_cg3d.F 85 PRE_CG3D 
               wSurfP2d(i,j) = ( etaN(i,j,bi,bj)-etaH(i,j,bi,bj) )
./model/src/read_pickup.F 181 READ_PICKUP 
          CALL READ_REC_3D_RL( fn, fp,  1, etaN,
./model/src/read_pickup.F 229 READ_PICKUP 
          CALL READ_REC_3D_RL( fn,fp,1, etaN, nj*Nr+1, myIter,myThid )
./model/src/read_pickup.F 416 READ_PICKUP 
          CALL READ_MFLDS_3D_RL( 'EtaN    ', etaN,
./model/src/read_pickup.F 473 READ_PICKUP 
        CALL MNC_CW_RL_R('D',fn,0,0,'Eta',etaN, myThid)
./model/src/read_pickup.F 532 READ_PICKUP 
      CALL EXCH_XY_RL( etaN, myThid )
./verification/solid-body.cs-32x32x1/code/ini_psurf.F 45 INI_PSURF 
          etaN(I,J,bi,bj) = 0. +fac*(fCori(i,j,bi,bj)**2)
./verification/solid-body.cs-32x32x1/code/ini_psurf.F 53 INI_PSURF 
       CALL READ_FLD_XY_RL( pSurfInitFile, ' ', etaN, 0, myThid )
./verification/solid-body.cs-32x32x1/code/ini_psurf.F 57 INI_PSURF 
      _EXCH_XY_RL(etaN, myThid)
./verification/solid-body.cs-32x32x1/code/ini_psurf.F 65 INI_PSURF 
          etaNm1(I,J,bi,bj) = etaN(I,J,bi,bj)
./model/src/solve_for_pressure.F 130 SOLVE_FOR_PRESSURE 
          etaNm1(i,j,bi,bj) = etaN(i,j,bi,bj)
./model/src/solve_for_pressure.F 132 SOLVE_FOR_PRESSURE 
          cg2d_x(i,j,bi,bj) = Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj)
./model/src/solve_for_pressure.F 198 SOLVE_FOR_PRESSURE 
     &         *( etaN(i,j,bi,bj)
./model/src/solve_for_pressure.F 203 SOLVE_FOR_PRESSURE 
     &         *( etaN(i,j,bi,bj)
./model/src/solve_for_pressure.F 229 SOLVE_FOR_PRESSURE 
     &         * etaN(i,j,bi,bj)
./model/src/solve_for_pressure.F 354 SOLVE_FOR_PRESSURE 
     &                                     * etaN(i,j,bi,bj)
./model/src/solve_for_pressure.F 371 SOLVE_FOR_PRESSURE 
          etaN(i,j,bi,bj) = recip_Bo(i,j,bi,bj)*cg2d_x(i,j,bi,bj)
./model/src/update_etah.F 65 UPDATE_ETAH 
            etaH(i,j,bi,bj) = etaN(i,j,bi,bj)
./model/src/update_etah.F 72 UPDATE_ETAH 
            etaH(i,j,bi,bj) = etaN(i,j,bi,bj)
./model/src/write_pickup.F 297 WRITE_PICKUP 
        CALL WRITE_REC_3D_RL( fn, fp, 1 , etaN,   nj, myIter, myThid )
./model/src/write_pickup.F 378 WRITE_PICKUP 
        CALL MNC_CW_RL_W('D',fn,0,0,'Eta', etaN, myThid)
./model/src/write_state.F 108 WRITE_STATE 
          CALL WRITE_REC_XY_RL('Eta',etaN,iRec,myIter,myThid)
./model/src/write_state.F 138 WRITE_STATE 
          CALL WRITE_FLD_XY_RL('Eta.',suff,etaNv,myIter,myThid)
./model/src/write_state.F 149 WRITE_STATE 
          CALL WRITE_FLD_XY_RL('Eta.',suff,etaN,myIter,myThid)
./model/src/write_state.F 196 WRITE_STATE 
          CALL MNC_CW_RL_W(pf,'state',0,0,'Eta', etaN, myThid)
./pkg/atm_compon_interf/atm_store_dynvars.F 61 ATM_STORE_DYNVARS 
          atmSLPr(i,j,bi,bj) = etaN(i,j,bi,bj)
./pkg/atm_phys/atm_phys_dyn2phys.F 129 ATM_PHYS_DYN2PHYS 
     &                     *etaN(1:sNx,1:sNy,bi,bj)
./pkg/atm_phys/atm_phys_dyn2phys.F 158 ATM_PHYS_DYN2PHYS 
     &                     *etaN(1:sNx,1:sNy,bi,bj)
./pkg/autodiff/addummy_in_stepping.F 470 ADDUMMY_IN_STEPPING 
          foo2D = etaNd
./pkg/autodiff/autodiff_restore.F 98 AUTODIFF_RESTORE 
          etaN(I,J,bi,bj)               = StoreDynVars2D(I,J,bi,bj,1)
./pkg/autodiff/autodiff_store.F 98 AUTODIFF_STORE 
          StoreDynVars2D(I,J,bi,bj,1) = etaN(I,J,bi,bj)
./pkg/cd_code/cd_code_scheme.F 103 CD_CODE_SCHEME 
     &   ab15*(  etaN(i,j,bi,bj)*Bo_surf(i,j,bi,bj) )
./pkg/cd_code/cd_code_scheme.F 107 CD_CODE_SCHEME 
     &          *( ab15*etaN(i,j,bi,bj) + ab05*etaNm1(i,j,bi,bj) )
./pkg/ctrl/ctrl_map_ini.F 506 CTRL_MAP_INI 
              etaN(i,j,bi,bj) = etaN(i,j,bi,bj) +
./pkg/ctrl/ctrl_map_ini.F 509 CTRL_MAP_INI 
              etaN(i,j,bi,bj) = etaN(i,j,bi,bj) +
./pkg/ctrl/ctrl_map_ini.F 611 CTRL_MAP_INI 
      _EXCH_XY_RL( etaN, mythid )
./pkg/ctrl/ctrl_map_ini_genarr.F 84 CTRL_MAP_INI_GENARR 
            call CTRL_MAP_GENARR2D(etaN,igen_etan,myThid)
./pkg/diagnostics/diagnostics_fill_state.F 67 DIAGNOSTICS_FILL_STATE 
        CALL DIAGNOSTICS_FILL(etaN, 'ETAN    ',0, 1,0,1,1,myThid)
./pkg/diagnostics/diagnostics_fill_state.F 82 DIAGNOSTICS_FILL_STATE 
        CALL DIAGNOSTICS_SCALE_FILL( etaN, oneRL, 2,
./pkg/ecco/cost_averagesfields.F 668 COST_AVERAGESFIELDS 
     &                   + 2*etaN(i,j,bi,j)
./model/inc/DYNVARS.h 37 NO PROCEDURE 
     &                   etaN,
./model/inc/DYNVARS.h 43 NO PROCEDURE 
     &                   etaN,
./model/inc/DYNVARS.h 48 NO PROCEDURE 
      _RL  etaN  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)