File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_toolbox.F |
1101 |
ECCO_READBAR |
I nnzbar, |
./pkg/ecco/ecco_toolbox.F |
1126 |
ECCO_READBAR |
_RL active_var(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nnzbar,nSx,nSy) |
./pkg/ecco/ecco_toolbox.F |
1129 |
ECCO_READBAR |
INTEGER nnzbar |
./pkg/ecco/ecco_toolbox.F |
1145 |
ECCO_READBAR |
if ( nnzbar .EQ. 1 ) then |
./pkg/ecco/ecco_toolbox.F |
1157 |
ECCO_READBAR |
if ( nnzbar .EQ. 1 ) then |
./pkg/ecco/ecco_toolbox.F |
1179 |
ECCO_READWEI |
I nnzbar, |
./pkg/ecco/ecco_toolbox.F |
119 |
ECCO_DIFFMSK |
INTEGER nnzobs, nnzbar |
./pkg/ecco/ecco_toolbox.F |
1203 |
ECCO_READWEI |
_RL localweight(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nnzbar,nSx,nSy) |
./pkg/ecco/ecco_toolbox.F |
1206 |
ECCO_READWEI |
INTEGER nnzbar |
./pkg/ecco/ecco_toolbox.F |
121 |
ECCO_DIFFMSK |
_RL localbar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/ecco/ecco_toolbox.F |
1231 |
ECCO_READWEI |
& cost_yftype, nnzbar, localweight, iRec, mythid ) |
./pkg/ecco/ecco_toolbox.F |
1237 |
ECCO_READWEI |
DO k = 1,nnzbar |
./pkg/ecco/ecco_toolbox.F |
187 |
ECCO_DIFFANOMMSK |
I localbar, localbarmean, nnzbar, |
./pkg/ecco/ecco_toolbox.F |
213 |
ECCO_DIFFANOMMSK |
INTEGER nnzobs, nnzbar |
./pkg/ecco/ecco_toolbox.F |
215 |
ECCO_DIFFANOMMSK |
_RL localbar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/ecco/ecco_toolbox.F |
216 |
ECCO_DIFFANOMMSK |
_RL localbarmean (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/ecco/ecco_toolbox.F |
284 |
ECCO_OBSMSK |
I localbar, nnzbar, localobs, nnzobs, localmask, |
./pkg/ecco/ecco_toolbox.F |
308 |
ECCO_OBSMSK |
INTEGER nnzobs, nnzbar |
./pkg/ecco/ecco_toolbox.F |
310 |
ECCO_OBSMSK |
_RL localbar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/ecco/ecco_toolbox.F |
95 |
ECCO_DIFFMSK |
I localbar, nnzbar, localobs, nnzobs, localmask, |
./pkg/seaice/seaice_cost_areasst.F |
19 |
SEAICE_COST_AREASST |
& nnzbar, localbarfile, localbar, xx_localbar_mean_dummy, |
./pkg/seaice/seaice_cost_areasst.F |
65 |
SEAICE_COST_AREASST |
integer nnzbar |
./pkg/seaice/seaice_cost_concentration.F |
169 |
SEAICE_COST_CONCENTRATION |
if ( nnzbar .EQ. 1 ) then |
./pkg/seaice/seaice_cost_concentration.F |
19 |
SEAICE_COST_CONCENTRATION |
& nnzbar, localbarfile, localbar, xx_localbar_mean_dummy, |
./pkg/seaice/seaice_cost_concentration.F |
54 |
SEAICE_COST_CONCENTRATION |
integer nnzbar |
./pkg/seaice/seaice_cost_concentration.F |
61 |
SEAICE_COST_CONCENTRATION |
_RL localbar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/seaice/seaice_cost_driver.F |
110 |
SEAICE_COST_DRIVER |
& nnzbar, smrsssbarfile, smrsssbar, xx_smrsssbar_mean_dummy, |
./pkg/seaice/seaice_cost_driver.F |
64 |
SEAICE_COST_DRIVER |
integer nnzbar |
./pkg/seaice/seaice_cost_driver.F |
79 |
SEAICE_COST_DRIVER |
nnzbar = 1 |
./pkg/seaice/seaice_cost_driver.F |
89 |
SEAICE_COST_DRIVER |
& nnzbar, smrareabarfile, smrareabar, xx_smrareabar_mean_dummy, |
./pkg/seaice/seaice_cost_driver.F |
99 |
SEAICE_COST_DRIVER |
& nnzbar, smrsstbarfile, smrsstbar, xx_smrsstbar_mean_dummy, |
./pkg/seaice/seaice_cost_sss.F |
173 |
SEAICE_COST_SSS |
if ( nnzbar .EQ. 1 ) then |
./pkg/seaice/seaice_cost_sss.F |
184 |
SEAICE_COST_SSS |
if ( nnzbar .EQ. 1 ) then |
./pkg/seaice/seaice_cost_sss.F |
18 |
SEAICE_COST_SSS |
& nnzbar, localbarfile, localbar, xx_localbar_mean_dummy, |
./pkg/seaice/seaice_cost_sss.F |
54 |
SEAICE_COST_SSS |
integer nnzbar |
./pkg/seaice/seaice_cost_sss.F |
61 |
SEAICE_COST_SSS |
_RL localbar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/seaice/seaice_cost_sss.F |
62 |
SEAICE_COST_SSS |
_RL areabar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/seaice/seaice_cost_sst.F |
16 |
SEAICE_COST_SST |
& nnzbar, localbarfile, localbar, xx_localbar_mean_dummy, |
./pkg/seaice/seaice_cost_sst.F |
174 |
SEAICE_COST_SST |
if ( nnzbar .EQ. 1 ) then |
./pkg/seaice/seaice_cost_sst.F |
184 |
SEAICE_COST_SST |
if ( nnzbar .EQ. 1 ) then |
./pkg/seaice/seaice_cost_sst.F |
52 |
SEAICE_COST_SST |
integer nnzbar |
./pkg/seaice/seaice_cost_sst.F |
59 |
SEAICE_COST_SST |
_RL localbar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/seaice/seaice_cost_sst.F |
60 |
SEAICE_COST_SST |
_RL areabar (1-olx:snx+olx,1-oly:sny+oly,nnzbar,nsx,nsy) |
./pkg/ecco/cost_gencost_all.F |
43 |
COST_GENCOST_ALL |
integer nnzbar |
./pkg/ecco/cost_gencost_all.F |
67 |
COST_GENCOST_ALL |
nnzbar = 1 |
./pkg/ecco/cost_gencost_all.F |
70 |
COST_GENCOST_ALL |
nnzbar = nr |
./pkg/ecco/cost_gencost_all.F |
78 |
COST_GENCOST_ALL |
& nnzbar, gencost_barfile(k), gencost_dummy(k), |
./pkg/ecco/cost_gencost_seaicev4.F |
228 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(areabar,nnzbar,zeroRL,myThid) |
./pkg/ecco/cost_gencost_seaicev4.F |
229 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(deconcbar,nnzbar,zeroRL,myThid) |
./pkg/ecco/cost_gencost_seaicev4.F |
230 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(exconcbar,nnzbar,zeroRL,myThid) |
./pkg/ecco/cost_gencost_seaicev4.F |
237 |
COST_GENCOST_SEAICEV4 |
call COST_GENREAD(fname1,areabar,localtmp,irec,nnzbar, |
./pkg/ecco/cost_gencost_seaicev4.F |
247 |
COST_GENCOST_SEAICEV4 |
call COST_GENREAD(fname1,deconcbar,localtmp,irec,nnzbar, |
./pkg/ecco/cost_gencost_seaicev4.F |
258 |
COST_GENCOST_SEAICEV4 |
call COST_GENREAD(fname1,exconcbar,localtmp,irec,nnzbar, |
./pkg/ecco/cost_gencost_seaicev4.F |
285 |
COST_GENCOST_SEAICEV4 |
I areabar, nnzbar, localobs, nnzsiv4, localmask, |
./pkg/ecco/cost_gencost_seaicev4.F |
304 |
COST_GENCOST_SEAICEV4 |
I localobs,nnzsiv4,areabar,exconcbar,deconcbar,nnzbar, |
./pkg/ecco/cost_gencost_seaicev4.F |
326 |
COST_GENCOST_SEAICEV4 |
I localobs,nnzsiv4,areabar,exconcbar,deconcbar,nnzbar, |
./pkg/ecco/cost_gencost_seaicev4.F |
356 |
GET_EXCONC_DECONC |
I localobs,nnzobs,concbar,exconcbar,deconcbar,nnzbar, |
./pkg/ecco/cost_gencost_seaicev4.F |
385 |
GET_EXCONC_DECONC |
integer mythid, nnzbar, nnzobs |
./pkg/ecco/cost_gencost_seaicev4.F |
46 |
COST_GENCOST_SEAICEV4 |
integer nnzsiv4, nnzbar |
./pkg/ecco/cost_gencost_seaicev4.F |
47 |
COST_GENCOST_SEAICEV4 |
parameter (nnzsiv4 = 1 , nnzbar = 1) |
./pkg/ecco/cost_gencost_transp.F |
216 |
COST_GENCOST_TRANSP |
call COST_GENREAD(fname1,mybar,localtmp,irec,nnzbar, |
./pkg/ecco/cost_gencost_transp.F |
250 |
COST_GENCOST_TRANSP |
I mybar, nnzbar, myobs, nnzobs, localtmp, |
./pkg/ecco/cost_gencost_transp.F |
40 |
COST_GENCOST_TRANSP |
integer nnzobs, nnzbar |
./pkg/ecco/cost_gencost_transp.F |
41 |
COST_GENCOST_TRANSP |
parameter (nnzbar = Nr, nnzobs = Nr) |
./pkg/ecco/cost_generic.F |
11 |
COST_GENERIC |
& nnzbar, localbarfile, dummy, |
./pkg/ecco/cost_generic.F |
122 |
COST_GENERIC |
& nnzbar, localbarfile, dummy, |
./pkg/ecco/cost_generic.F |
139 |
COST_GENERIC |
& nnzbar, localbarfile, dummy, |
./pkg/ecco/cost_generic.F |
160 |
COST_GENLOOP |
& nnzbar, localbarfile, dummy, |
./pkg/ecco/cost_generic.F |
199 |
COST_GENLOOP |
integer nnzbar, nnzobs |
./pkg/ecco/cost_generic.F |
351 |
COST_GENLOOP |
call ECCO_ZERO(localbar,nnzbar,zeroRL,myThid) |
./pkg/ecco/cost_generic.F |
352 |
COST_GENLOOP |
call COST_GENREAD( fname1, localbar, localtmp, irec, nnzbar, |
./pkg/ecco/cost_generic.F |
355 |
COST_GENLOOP |
call ECCO_MULT(localbar,nnzbar,fac,myThid) |
./pkg/ecco/cost_generic.F |
363 |
COST_GENLOOP |
call ECCO_DIFFMSK( localbar, nnzbar, localobs, nnzobs, |
./pkg/ecco/cost_generic.F |
378 |
COST_GENLOOP |
& (nnzbar.EQ.1).AND.(nnzobs.EQ.1) ) |
./pkg/ecco/cost_generic.F |
50 |
COST_GENERIC |
integer nnzbar, nnzobs |
./pkg/ecco/cost_genread.F |
15 |
COST_GENREAD |
I nnzbar, |
./pkg/ecco/cost_genread.F |
43 |
COST_GENREAD |
_RL active_var(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nnzbar,nSx,nSy) |
./pkg/ecco/cost_genread.F |
44 |
COST_GENREAD |
_RL active_tmp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nnzbar,nSx,nSy) |
./pkg/ecco/cost_genread.F |
47 |
COST_GENREAD |
INTEGER nnzbar, nrecloc |
./pkg/ecco/cost_genread.F |
69 |
COST_GENREAD |
call ECCO_ZERO(active_tmp,nnzbar,zeroRL,myThid) |
./pkg/ecco/cost_genread.F |
74 |
COST_GENREAD |
& imon, nnzbar, dummy, mythid ) |
./pkg/ecco/cost_genread.F |
75 |
COST_GENREAD |
call ECCO_ADD(active_var,nnzbar,active_tmp,nnzbar,myThid) |
./pkg/ecco/cost_genread.F |
78 |
COST_GENREAD |
call ECCO_DIV(active_tmp,nnzbar,nyearsRL,myThid) |
./pkg/ecco/cost_genread.F |
79 |
COST_GENREAD |
call ECCO_CP(active_tmp,nnzbar,active_var,nnzbar,myThid) |
./pkg/ecco/cost_genread.F |
82 |
COST_GENREAD |
& irec, nnzbar, dummy, mythid ) |
./pkg/ecco/cost_hyd.F |
101 |
COST_HYD |
nnzbar = 1 |
./pkg/ecco/cost_hyd.F |
110 |
COST_HYD |
& nnzbar, sstbarfile, xx_sstbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
126 |
COST_HYD |
nnzbar = Nr |
./pkg/ecco/cost_hyd.F |
134 |
COST_HYD |
& nnzbar, tbarfile, xx_tbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
148 |
COST_HYD |
nnzbar = Nr |
./pkg/ecco/cost_hyd.F |
156 |
COST_HYD |
& nnzbar, tbarfile, xx_tbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
170 |
COST_HYD |
nnzbar = Nr |
./pkg/ecco/cost_hyd.F |
178 |
COST_HYD |
& nnzbar, tbarfile, xx_tbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
193 |
COST_HYD |
nnzbar = nnztbar |
./pkg/ecco/cost_hyd.F |
201 |
COST_HYD |
& nnzbar, tbarfile, xx_tbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
217 |
COST_HYD |
nnzbar = nnzsbar |
./pkg/ecco/cost_hyd.F |
225 |
COST_HYD |
& nnzbar, sbarfile, xx_sbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
240 |
COST_HYD |
nnzbar = Nr |
./pkg/ecco/cost_hyd.F |
248 |
COST_HYD |
& nnzbar, sbarfile, xx_sbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
262 |
COST_HYD |
nnzbar = Nr |
./pkg/ecco/cost_hyd.F |
270 |
COST_HYD |
& nnzbar, sbarfile, xx_sbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
306 |
COST_HYD |
nnzbar = Nr |
./pkg/ecco/cost_hyd.F |
314 |
COST_HYD |
& nnzbar, tbarfile, xx_tbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
328 |
COST_HYD |
nnzbar = Nr |
./pkg/ecco/cost_hyd.F |
336 |
COST_HYD |
& nnzbar, sbarfile, xx_sbar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
400 |
COST_HYD |
nnzbar = 1 |
./pkg/ecco/cost_hyd.F |
408 |
COST_HYD |
& nnzbar, smrareabarfile, smrareabar, xx_smrareabar_mean_dummy, |
./pkg/ecco/cost_hyd.F |
58 |
COST_HYD |
integer nnzbar |
./pkg/ecco/cost_hyd.F |
79 |
COST_HYD |
nnzbar = nnztbar |
./pkg/ecco/cost_hyd.F |
87 |
COST_HYD |
& nnzbar, tbarfile, xx_tbar_mean_dummy, |