| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_exch2.F |
100 |
FLT_EXCH2 |
ihi = 0.5 _d 0 + DFLOAT(sNx) |
|
./pkg/flt/flt_exch2.F |
110 |
FLT_EXCH2 |
& .AND. ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/flt/flt_exch2.F |
113 |
FLT_EXCH2 |
ELSEIF ( ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/flt/flt_exch2.F |
51 |
FLT_EXCH2 |
_RL ilo, ihi, jlo, jhi, iNew, jNew |
|
./pkg/flt/flt_exchg.F |
38 |
FLT_EXCHG |
_RL ilo, ihi, jlo, jhi, iNew, jNew |
|
./pkg/flt/flt_exchg.F |
75 |
FLT_EXCHG |
ihi = 0.5 _d 0 + DFLOAT(sNx) |
|
./pkg/flt/flt_exchg.F |
79 |
FLT_EXCHG |
IF ( ipart(ip,bi,bj).GE.ihi ) THEN |
|
./pkg/seaice/seaice_cost_weights.F |
49 |
SEAICE_COST_WEIGHTS |
integer ilo,ihi |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
221 |
ECCO_COST_WEIGHTS |
ihi = ilnblnk(data_errfile) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
223 |
ECCO_COST_WEIGHTS |
I data_errfile(ilo:ihi), |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
57 |
ECCO_COST_WEIGHTS |
integer ilo,ihi |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
219 |
ECCO_COST_WEIGHTS |
ihi = ilnblnk(data_errfile) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
221 |
ECCO_COST_WEIGHTS |
I data_errfile(ilo:ihi), |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
56 |
ECCO_COST_WEIGHTS |
integer ilo,ihi |
|
./pkg/aim_v23/aim_do_co2.F |
108 |
AIM_DO_CO2 |
ihi = ILNBLNK(fn) |
|
./pkg/aim_v23/aim_do_co2.F |
111 |
AIM_DO_CO2 |
OPEN(UNIT=iUnit,FILE=fn(ilo:ihi),STATUS='old', |
|
./pkg/aim_v23/aim_do_co2.F |
128 |
AIM_DO_CO2 |
WRITE(msgBuf,'(2A)') '// AIM_DO_CO2: Read pickup ',fn(ilo:ihi) |
|
./pkg/aim_v23/aim_do_co2.F |
58 |
AIM_DO_CO2 |
INTEGER ilo,ihi |
|
./pkg/ecco/cost_geoid.F |
63 |
COST_GEOID |
integer ilo,ihi |
|
./pkg/ecco/cost_readgeoid.F |
62 |
COST_READGEOID |
integer ilo,ihi |
|
./pkg/ecco/cost_readgeoid.F |
89 |
COST_READGEOID |
ihi = ilnblnk(geoid_covariancefile) |
|
./pkg/ecco/cost_readgeoid.F |
93 |
COST_READGEOID |
& geoid_covariancefile(ilo:ihi) |
|
./pkg/ecco/cost_readgeoid.F |
97 |
COST_READGEOID |
open(egmunit, file = geoid_covariancefile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
191 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(costTranspDataFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
193 |
ECCO_COST_INIT_FIXED |
I costTranspDataFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
229 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(tpTimeMaskFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
231 |
ECCO_COST_INIT_FIXED |
I tpTimeMaskFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
244 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(ersTimeMaskFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
246 |
ECCO_COST_INIT_FIXED |
I ersTimeMaskFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
259 |
ECCO_COST_INIT_FIXED |
ihi = ilnblnk(gfoTimeMaskFile) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
261 |
ECCO_COST_INIT_FIXED |
I gfoTimeMaskFile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_init_fixed.F |
56 |
ECCO_COST_INIT_FIXED |
integer ilo,ihi |
|
./pkg/ecco/ecco_cost_weights.F |
256 |
ECCO_COST_WEIGHTS |
ihi = ilnblnk(data_errfile) |
|
./pkg/ecco/ecco_cost_weights.F |
258 |
ECCO_COST_WEIGHTS |
I data_errfile(ilo:ihi), |
|
./pkg/ecco/ecco_cost_weights.F |
57 |
ECCO_COST_WEIGHTS |
integer ilo,ihi |