Symbol Description Uses
tmpfld3d 81


File Line number Procedure Code
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 148 CTRL_MAP_INI_GENARR 
       CALL ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 158 CTRL_MAP_INI_GENARR 
     &                             + fac*tmpfld3d(i,j,k,bi,bj)
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 161 CTRL_MAP_INI_GENARR 
     &                            + fac*tmpfld3d(i,j,k,bi,bj)
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 165 CTRL_MAP_INI_GENARR 
     &                              + tmpfld3d(i,j,k,bi,bj)
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 148 CTRL_MAP_INI_GENARR 
       CALL ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 158 CTRL_MAP_INI_GENARR 
     &                             + fac*tmpfld3d(i,j,k,bi,bj)
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 161 CTRL_MAP_INI_GENARR 
     &                            + fac*tmpfld3d(i,j,k,bi,bj)
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 165 CTRL_MAP_INI_GENARR 
     &                              + tmpfld3d(i,j,k,bi,bj)
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 129 CTRL_MAP_INI_GENARR 
       CALL ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F 129 CTRL_MAP_INI_GENARR 
       CALL ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 137 CTRL_MAP_INI_GENARR 
       CALL ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 151 CTRL_MAP_INI_GENARR 
     &         + fac*tmpfld3d(i,j,k,bi,bj)
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 134 CTRL_MAP_INI_GENARR 
       CALL ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 145 CTRL_MAP_INI_GENARR 
     &         + fac*tmpfld3d(i,j,k,bi,bj)
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 148 CTRL_MAP_INI_GENARR 
     &         + fac*tmpfld3d(i,j,k,bi,bj)
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 137 CTRL_MAP_INI_GENARR 
       CALL ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 146 CTRL_MAP_INI_GENARR 
     &         + fac*tmpfld3d(i,j,k,bi,bj)
./pkg/admtlm/admtlm_bypassad.F 116 ADMTLM_BYPASSAD 
                tmpfld3d(i,j,k,bi,bj) = tmpfld3d(i,j,k,bi,bj)
./pkg/admtlm/admtlm_bypassad.F 127 ADMTLM_BYPASSAD 
     &     optimcycle,mythid,tmpfld3d )
./pkg/admtlm/admtlm_bypassad.F 134 ADMTLM_BYPASSAD 
                tmpfld3d(i,j,k,bi,bj) = tmpfld3d(i,j,k,bi,bj)
./pkg/admtlm/admtlm_bypassad.F 145 ADMTLM_BYPASSAD 
     &     optimcycle,mythid,tmpfld3d )
./pkg/admtlm/admtlm_bypassad.F 152 ADMTLM_BYPASSAD 
                tmpfld3d(i,j,k,bi,bj) = tmpfld3d(i,j,k,bi,bj)
./pkg/admtlm/admtlm_bypassad.F 163 ADMTLM_BYPASSAD 
     &     optimcycle,mythid,tmpfld3d )
./pkg/admtlm/admtlm_bypassad.F 170 ADMTLM_BYPASSAD 
                tmpfld3d(i,j,k,bi,bj) = tmpfld3d(i,j,k,bi,bj)
./pkg/admtlm/admtlm_bypassad.F 181 ADMTLM_BYPASSAD 
     &     optimcycle,mythid,tmpfld3d )
./pkg/ctrl/ctrl.h 207 NO PROCEDURE 
      _RL tmpfld3d
./pkg/ctrl/ctrl_cost_gen.F 510 CTRL_COST_GEN3D 
      call ACTIVE_READ_XYZ( fnamefld, tmpfld3d, irec, doglobalread,
./pkg/ctrl/ctrl_cost_gen.F 514 CTRL_COST_GEN3D 
        CALL READ_REC_XYZ_RL( fnamefld, tmpfld3d, iRec, 1, myThid )
./pkg/ctrl/ctrl_cost_gen.F 528 CTRL_COST_GEN3D 
                  tmpx = tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_hfacc_ini.F 106 CTRL_HFACC_INI 
                tmpfld3d(i,j,k,bi,bj) = 0. _d 0
./pkg/ctrl/ctrl_hfacc_ini.F 122 CTRL_HFACC_INI 
      call ACTIVE_READ_XYZ( fnamehfacc, tmpfld3d, 1,
./pkg/ctrl/ctrl_hfacc_ini.F 131 CTRL_HFACC_INI 
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 112 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 122 CTRL_MAP_INI 
               IF (abs(tmpfld3d(i,j,k,bi,bj)).gt.
./pkg/ctrl/ctrl_map_ini.F 124 CTRL_MAP_INI 
     $          tmpfld3d(i,j,k,bi,bj)=
./pkg/ctrl/ctrl_map_ini.F 125 CTRL_MAP_INI 
     $          sign(2.0/sqrt(wtheta(k,bi,bj)),tmpfld3d(i,j,k,bi,bj))
./pkg/ctrl/ctrl_map_ini.F 128 CTRL_MAP_INI 
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 146 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 156 CTRL_MAP_INI 
               IF (abs(tmpfld3d(i,j,k,bi,bj)).gt.
./pkg/ctrl/ctrl_map_ini.F 158 CTRL_MAP_INI 
     $          tmpfld3d(i,j,k,bi,bj)=
./pkg/ctrl/ctrl_map_ini.F 159 CTRL_MAP_INI 
     $          sign(2.0/sqrt(wsalt(k,bi,bj)),tmpfld3d(i,j,k,bi,bj))
./pkg/ctrl/ctrl_map_ini.F 162 CTRL_MAP_INI 
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 177 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 189 CTRL_MAP_INI 
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 192 CTRL_MAP_INI 
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 250 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 259 CTRL_MAP_INI 
     &                                tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 274 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 285 CTRL_MAP_INI 
     &                               tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 288 CTRL_MAP_INI 
     &                               tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 304 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 313 CTRL_MAP_INI 
     &                               tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 327 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 337 CTRL_MAP_INI 
     &                                - fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 354 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 365 CTRL_MAP_INI 
     &                                  *fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 403 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 412 CTRL_MAP_INI 
     &            tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 422 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 431 CTRL_MAP_INI 
     &            tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 444 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 457 CTRL_MAP_INI 
     &                                  fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 471 CTRL_MAP_INI 
      call ACTIVE_READ_XYZ( fnamegeneric, tmpfld3d, 1,
./pkg/ctrl/ctrl_map_ini.F 484 CTRL_MAP_INI 
     &                                  fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini_ecco.F 125 CTRL_MAP_INI_ECCO 
                tmpfld3d(i,j,k,bi,bj)=1.
./pkg/ctrl/ctrl_map_ini_ecco.F 131 CTRL_MAP_INI_ECCO 
      _EXCH_XYZ_RL( tmpfld3d, mythid)
./pkg/ecco/ecco_cost_init_barfiles.F 149 ECCO_COST_INIT_BARFILES 
                tmpfld3d(i,j,k,bi,bj) = 0. _d 0
./pkg/ecco/ecco_cost_init_barfiles.F 204 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XYZ( adfnamesigmaRbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 225 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XYZ( adfnametbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 278 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XYZ( adfnamesbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 320 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XYZ( adfnameubar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 322 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XYZ( adfnamevbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 338 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XYZ( adfnamewbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 452 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XY( adfnamesmrsstbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 454 ECCO_COST_INIT_BARFILES 
        call ACTIVE_WRITE_XY( adfnamesmrsssbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 482 ECCO_COST_INIT_BARFILES 
     &  call ACTIVE_WRITE_XYZ( adfname_gencostbar, tmpfld3d, irec,
./pkg/ecco/ecco_cost_init_barfiles.F 75 ECCO_COST_INIT_BARFILES 
      _RL tmpfld3d (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)