File |
Line number |
Procedure |
Code |
./pkg/exf/exf_getclim.F |
189 |
EXF_GETCLIM |
& vvel(i,j,1,bi,bj) = climvstr(i,j,bi,bj) |
./pkg/exf/exf_init_varia.F |
475 |
EXF_INIT_VARIA |
& vvel(i,j,1,bi,bj) = climvstr(i,j,bi,bj) |
./pkg/fizhi/fizhi_init_vars.F |
155 |
FIZHI_INIT_VARS |
call CTOA(myThid,uvel,vvel,maskW,maskS,im1,im2,jm1,jm2,Nr, |
./pkg/fizhi/fizhi_wrapper.F |
104 |
FIZHI_WRAPPER |
vdynbef(i,j,L,bi,bj) = vvel(i,j,L,bi,bj) |
./pkg/fizhi/step_fizhi_corr.F |
195 |
STEP_FIZHI_CORR |
vdyntemp(i,j,L,bi,bj)=vvel(i,j,L,bi,bj)-vdyntemp(i,j,L,bi,bj) |
./pkg/fizhi/step_fizhi_corr.F |
350 |
STEP_FIZHI_CORR |
. (vvel(i,j,L,bi,bj)-vdynbef(i,j,L,bi,bj))*dtinv - |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
133 |
GAD_PPM_ADV_Y |
& delT,vvel, |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
37 |
GAD_PPM_ADV_Y |
_RL vvel(1-OLx:sNx+OLx, |
./pkg/generic_advdiff/gad_ppm_adv_y.F |
7 |
GAD_PPM_ADV_Y |
I calc_CFL,delT,vvel,vfac,fbar, |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
105 |
GAD_PPM_FLX_Y |
vCFL = vvel(ix,iy) * delT |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
109 |
GAD_PPM_FLX_Y |
vCFL = vvel(ix,iy) |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
35 |
GAD_PPM_FLX_Y |
_RL vvel(1-OLx:sNx+OLx, |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
68 |
GAD_PPM_FLX_Y |
if (vvel(ix,iy) .eq. 0. _d 0) then |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
74 |
GAD_PPM_FLX_Y |
if (vvel(ix,iy) .gt. 0. _d 0) then |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
78 |
GAD_PPM_FLX_Y |
vCFL = vvel(ix,iy) * delT |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
7 |
GAD_PPM_FLX_Y |
& calc_CFL,delT,vvel, |
./pkg/generic_advdiff/gad_ppm_flx_y.F |
82 |
GAD_PPM_FLX_Y |
vCFL = vvel(ix,iy) |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
131 |
GAD_PQM_ADV_Y |
& delT,vvel, |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
37 |
GAD_PQM_ADV_Y |
_RL vvel(1-OLx:sNx+OLx, |
./pkg/generic_advdiff/gad_pqm_adv_y.F |
7 |
GAD_PQM_ADV_Y |
I calc_CFL,delT,vvel,vfac,fbar, |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
111 |
GAD_PQM_FLX_Y |
vCFL = vvel(ix,iy) * delT |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
115 |
GAD_PQM_FLX_Y |
vCFL = vvel(ix,iy) |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
35 |
GAD_PQM_FLX_Y |
_RL vvel(1-OLx:sNx+OLx, |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
68 |
GAD_PQM_FLX_Y |
if (vvel(ix,iy) .eq. 0. _d 0) then |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
74 |
GAD_PQM_FLX_Y |
if (vvel(ix,iy) .gt. 0. _d 0) then |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
78 |
GAD_PQM_FLX_Y |
vCFL = vvel(ix,iy) * delT |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
7 |
GAD_PQM_FLX_Y |
& calc_CFL,delT,vvel, |
./pkg/generic_advdiff/gad_pqm_flx_y.F |
82 |
GAD_PQM_FLX_Y |
vCFL = vvel(ix,iy) |
./pkg/openad/openad_dumpAdjoint.F |
112 |
OPENAD_DUMPADJOINT |
foo5=vveld |
./pkg/seaice/seaice_freedrift.F |
92 |
SEAICE_FREEDRIFT |
vvel_cntr=HALF*(vvel(i,j,kSrf,bi,bj)+vvel(i,j+1,kSrf,bi,bj)) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
135 |
FIZHI_INIT_VARS |
call CTOA(myThid,uvel,vvel,maskW,maskS,im1,im2,jm1,jm2,Nr, |
./verification/flt_example/extra/cvprofiles.F |
188 |
NO PROCEDURE |
allocate (vvel(npart,Nr,icount)) |
./verification/flt_example/extra/cvprofiles.F |
202 |
NO PROCEDURE |
if (.not. preflag) vvel(m,k,n) = spval |
./verification/flt_example/extra/cvprofiles.F |
290 |
NO PROCEDURE |
if (.not. preflag) vvel(ip,k,np) = SNGL(tmp(6+1*Nr+k)) |
./verification/flt_example/extra/cvprofiles.F |
295 |
NO PROCEDURE |
if (.not. preflag) vvel(ip,k,np) = spval |
./verification/flt_example/extra/cvprofiles.F |
638 |
NO PROCEDURE |
call NCVPT(ncid, VARid, corner, edges, vvel, iret) |
./verification/flt_example/extra/cvprofiles.F |
67 |
NO PROCEDURE |
real, dimension(:,:,:), allocatable :: uvel,vvel,temp,salt |
./pkg/autodiff/addummy_in_stepping.F |
464 |
ADDUMMY_IN_STEPPING |
foo3D = vveld |
./pkg/autodiff/addummy_in_stepping.F |
544 |
ADDUMMY_IN_STEPPING |
foo3D = vveld |
./pkg/cost/cost_accumulate_mean.F |
68 |
COST_ACCUMULATE_MEAN |
& /2.*vvel(i,j,k,bi,bj) |
./pkg/cost/cost_state_final.F |
39 |
COST_STATE_FINAL |
objf_state_final(i,j,bi,bj,3*Nr+k) = vvel(i,j,k,bi,bj) |
./pkg/ctrl/ctrl_map_ini_ecco.F |
174 |
CTRL_MAP_INI_ECCO |
& xx_vvel_dummy, boundsVec, vvel, masks, paramSmooth, |
./pkg/ctrl/ctrl_map_ini_ecco.F |
177 |
CTRL_MAP_INI_ECCO |
CALL EXCH_UV_XYZ_RS(uvel,vvel,.TRUE.,myThid) |
./pkg/ctrl/ctrl_map_ini_genarr.F |
146 |
CTRL_MAP_INI_GENARR |
call CTRL_MAP_GENARR3D(vvel,igen_vvel0,myThid) |
./pkg/ctrl/ctrl_map_ini_genarr.F |
147 |
CTRL_MAP_INI_GENARR |
CALL EXCH_UV_XYZ_RL(uvel,vvel,.TRUE.,myThid) |