| File |
Line number |
Procedure |
Code |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
132 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_READ_XY( fnamegenIn, xx_gen, irec, |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
145 |
CTRL_MAP_INI_GENTIM2D |
call SMOOTH_CORREL2D(xx_gen,maskC,smoothOpNb,mythid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
153 |
CTRL_MAP_INI_GENTIM2D |
xx_gen(i,j,bi,bj)=xx_gen(i,j,bi,bj) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
156 |
CTRL_MAP_INI_GENTIM2D |
xx_gen(i,j,bi,bj)=0. _d 0 |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
163 |
CTRL_MAP_INI_GENTIM2D |
CALL EXCH_XY_RL ( xx_gen , myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
168 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_WRITE_XY( fnamegenOut, xx_gen, irec, optimcycle, |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
181 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_READ_XY( fnamegenOut, xx_gen, irec, |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
184 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_WRITE_XY( fnamegenOut, xx_gen, krec, optimcycle, |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
65 |
CTRL_MAP_INI_GENTIM2D |
_RL xx_gen(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
204 |
CTRL_MAP_GENARR2D |
_RL xx_gen (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
224 |
CTRL_MAP_GENARR2D |
xx_gen(i,j,bi,bj)=0. _d 0 |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
263 |
CTRL_MAP_GENARR2D |
call ACTIVE_READ_XY( fnamegenIn, xx_gen, 1, doglobalread, |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
266 |
CTRL_MAP_GENARR2D |
CALL READ_REC_XY_RL( fnamegenIn, xx_gen, 1, 1, myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
271 |
CTRL_MAP_GENARR2D |
IF (dowc01) call SMOOTH_CORREL2D(xx_gen,maskC,numsmo,mythid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
272 |
CTRL_MAP_GENARR2D |
IF (dosmooth) call SMOOTH2D(xx_gen,maskC,numsmo,mythid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
284 |
CTRL_MAP_GENARR2D |
xx_gen(i,j,bi,bj)=xx_gen(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
287 |
CTRL_MAP_GENARR2D |
xx_gen(i,j,bi,bj)=0. |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
291 |
CTRL_MAP_GENARR2D |
fld(i,j,bi,bj)=fld(i,j,bi,bj)+xx_gen(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
357 |
CTRL_MAP_GENARR3D |
_RL xx_gen (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
381 |
CTRL_MAP_GENARR3D |
xx_gen(i,j,k,bi,bj)=0. _d 0 |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
421 |
CTRL_MAP_GENARR3D |
call ACTIVE_READ_XYZ( fnamegenIn, xx_gen, 1, doglobalread, |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
424 |
CTRL_MAP_GENARR3D |
CALL READ_REC_XYZ_RL( fnamegenIn, xx_gen, 1, 1, myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
429 |
CTRL_MAP_GENARR3D |
IF (dowc01) call SMOOTH_CORREL3D(xx_gen,numsmo,mythid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
430 |
CTRL_MAP_GENARR3D |
IF (dosmooth) call SMOOTH3D(xx_gen,numsmo,mythid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
459 |
CTRL_MAP_GENARR3D |
xx_gen(i,j,k,bi,bj)=xx_gen(i,j,k,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
462 |
CTRL_MAP_GENARR3D |
xx_gen(i,j,k,bi,bj)=0. |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
466 |
CTRL_MAP_GENARR3D |
fld(i,j,k,bi,bj)=fld(i,j,k,bi,bj)+xx_gen(i,j,k,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
174 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_READ_XY( fnamegenIn, xx_gen, irec, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
178 |
CTRL_MAP_INI_GENTIM2D |
CALL READ_REC_XY_RL( fnamegenIn, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
181 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_WRITE_XY( fnamegenOut, xx_gen, krec, optimcycle, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
184 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
221 |
CTRL_MAP_INI_GENTIM2D |
call ECCO_ZERO(xx_gen,1,zeroRL,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
236 |
CTRL_MAP_INI_GENTIM2D |
call ECCO_ADD(xx_gen_tmp,1,xx_gen,1,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
239 |
CTRL_MAP_INI_GENTIM2D |
call ECCO_DIV(xx_gen,1,nyearsRL,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
246 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_WRITE_XY( fnamegenTmp, xx_gen, iRec, optimcycle, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
249 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenTmp, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
263 |
CTRL_MAP_INI_GENTIM2D |
CALL ACTIVE_READ_XY( fnamegenOut, xx_gen, kRec, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
267 |
CTRL_MAP_INI_GENTIM2D |
CALL READ_REC_XY_RL( fnamegenOut, xx_gen, kRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
276 |
CTRL_MAP_INI_GENTIM2D |
CALL ECCO_SUBTRACT(xx_gen_tmp,1,xx_gen,1,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
278 |
CTRL_MAP_INI_GENTIM2D |
CALL ACTIVE_WRITE_XY( fnamegenOut, xx_gen, kRec, optimcycle, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
281 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, kRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
298 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_READ_XY( fnamegenOut, xx_gen, irec, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
302 |
CTRL_MAP_INI_GENTIM2D |
CALL READ_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
316 |
CTRL_MAP_INI_GENTIM2D |
IF (dowc01) call SMOOTH_CORREL2D(xx_gen,maskC,numsmo,mythid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
317 |
CTRL_MAP_INI_GENTIM2D |
IF (dosmooth) call SMOOTH2D(xx_gen,maskC,numsmo,mythid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
328 |
CTRL_MAP_INI_GENTIM2D |
xx_gen(i,j,bi,bj)=xx_gen(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
331 |
CTRL_MAP_INI_GENTIM2D |
xx_gen(i,j,bi,bj)=0. _d 0 |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
340 |
CTRL_MAP_INI_GENTIM2D |
CALL CTRL_BOUND_2D(xx_gen,maskC, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
343 |
CTRL_MAP_INI_GENTIM2D |
CALL EXCH_XY_RL ( xx_gen , myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
346 |
CTRL_MAP_INI_GENTIM2D |
call ACTIVE_WRITE_XY( fnamegenOut, xx_gen, irec, optimcycle, |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
349 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
68 |
CTRL_MAP_INI_GENTIM2D |
_RL xx_gen(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
90 |
CTRL_MAP_INI_GENTIM2D |
xx_gen(i,j,bi,bj)=0. _d 0 |