| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_weights.F |
281 |
ECCO_COST_WEIGHTS |
ihi = ilnblnk(data_errfile) |
|
./pkg/ecco/ecco_cost_weights.F |
286 |
ECCO_COST_WEIGHTS |
I data_errfile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_weights.F |
66 |
ECCO_COST_WEIGHTS |
integer ilo,ihi |
|
./pkg/flt/flt_exch2.F |
104 |
FLT_EXCH2 |
& .AND. ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/flt/flt_exch2.F |
107 |
FLT_EXCH2 |
ELSEIF ( ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/flt/flt_exch2.F |
49 |
FLT_EXCH2 |
_RL ilo, ihi, jlo, jhi, iNew, jNew |
|
./pkg/flt/flt_exch2.F |
92 |
FLT_EXCH2 |
ihi = 0.5 _d 0 + DFLOAT(sNx) |
|
./pkg/flt/flt_exchg.F |
101 |
FLT_EXCHG |
& .AND. ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/flt/flt_exchg.F |
104 |
FLT_EXCHG |
ELSEIF ( ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/flt/flt_exchg.F |
106 |
FLT_EXCHG |
IF ( ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/flt/flt_exchg.F |
50 |
FLT_EXCHG |
_RL ilo, ihi, jlo, jhi, iNew, jNew |
|
./pkg/flt/flt_exchg.F |
90 |
FLT_EXCHG |
ihi = 0.5 _d 0 + DFLOAT(sNx) |
|
./pkg/seaice/seaice_cost_weights.F |
54 |
SEAICE_COST_WEIGHTS |
integer ilo,ihi |
|
./pkg/ecco/cost_gencost_glbmean.F |
74 |
COST_GENCOST_GLBMEAN |
integer ilo, ihi |
|
./pkg/ecco/ecco_cost_init_fixed.F |
252 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(gencost_datafile(k)) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
255 |
ECCO_COST_INIT_FIXED |
I gencost_datafile(k)(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
309 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(costTranspDataFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
311 |
ECCO_COST_INIT_FIXED |
I costTranspDataFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
347 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(tpTimeMaskFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
349 |
ECCO_COST_INIT_FIXED |
I tpTimeMaskFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
362 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(ersTimeMaskFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
364 |
ECCO_COST_INIT_FIXED |
I ersTimeMaskFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
377 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(gfoTimeMaskFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
379 |
ECCO_COST_INIT_FIXED |
I gfoTimeMaskFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
67 |
ECCO_COST_INIT_FIXED |
integer il, ilo,ihi |