File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_gencost_seaicev4.F |
178 |
COST_GENCOST_SEAICEV4 |
preproc(k2)=gencost_preproc(k2,igen_conc) |
./pkg/ecco/cost_gencost_seaicev4.F |
182 |
COST_GENCOST_SEAICEV4 |
if (preproc(k2).EQ.'variaweight') dovarwei=.TRUE. |
./pkg/ecco/cost_gencost_seaicev4.F |
183 |
COST_GENCOST_SEAICEV4 |
if (preproc(k2).EQ.'nosumsq') dosumsq=.FALSE. |
./pkg/ecco/cost_gencost_seaicev4.F |
238 |
COST_GENCOST_SEAICEV4 |
& nrecloc,preproc,preproc_c,preproc_i,preproc_r, |
./pkg/ecco/cost_gencost_seaicev4.F |
248 |
COST_GENCOST_SEAICEV4 |
& nrecloc,preproc,preproc_c,preproc_i,preproc_r, |
./pkg/ecco/cost_gencost_seaicev4.F |
259 |
COST_GENCOST_SEAICEV4 |
& nrecloc,preproc,preproc_c,preproc_i,preproc_r, |
./pkg/ecco/cost_gencost_seaicev4.F |
86 |
COST_GENCOST_SEAICEV4 |
character*(MAX_LEN_FNAM) preproc(NGENPPROC) |
./pkg/ecco/cost_gencost_transp.F |
162 |
COST_GENCOST_TRANSP |
preproc(k2)=gencost_preproc(k2,kgen(icount)) |
./pkg/ecco/cost_gencost_transp.F |
166 |
COST_GENCOST_TRANSP |
if (preproc(k2).EQ.'variaweight') dovarwei=.TRUE. |
./pkg/ecco/cost_gencost_transp.F |
167 |
COST_GENCOST_TRANSP |
if (preproc(k2)(1:7).EQ.'dosumsq') dosumsq=.TRUE. |
./pkg/ecco/cost_gencost_transp.F |
174 |
COST_GENCOST_TRANSP |
& ' dosumsq: ',dosumsq,' preproc(1): ',preproc(1)(1:7) |
./pkg/ecco/cost_gencost_transp.F |
217 |
COST_GENCOST_TRANSP |
& nrecloc,preproc,preproc_c,preproc_i,preproc_r, |
./pkg/ecco/cost_gencost_transp.F |
76 |
COST_GENCOST_TRANSP |
character*(MAX_LEN_FNAM) preproc(NGENPPROC) |
./pkg/ecco/cost_generic.F |
113 |
COST_GENERIC |
if (preproc(k2).EQ.'mean') domean=.TRUE. |
./pkg/ecco/cost_generic.F |
114 |
COST_GENERIC |
if (preproc(k2).EQ.'anom') doanom=.TRUE. |
./pkg/ecco/cost_generic.F |
127 |
COST_GENERIC |
& preproc, preproc_c, preproc_i, preproc_r, |
./pkg/ecco/cost_generic.F |
144 |
COST_GENERIC |
& preproc, preproc_c, preproc_i, preproc_r, |
./pkg/ecco/cost_generic.F |
165 |
COST_GENLOOP |
& preproc, preproc_c, preproc_i, preproc_r, |
./pkg/ecco/cost_generic.F |
16 |
COST_GENERIC |
& preproc, preproc_c, preproc_i, preproc_r, |
./pkg/ecco/cost_generic.F |
222 |
COST_GENLOOP |
character*(MAX_LEN_FNAM) preproc(NGENPPROC) |
./pkg/ecco/cost_generic.F |
296 |
COST_GENLOOP |
if (preproc(k2).EQ.'mean') domean=.TRUE. |
./pkg/ecco/cost_generic.F |
297 |
COST_GENLOOP |
if (preproc(k2).EQ.'anom') doanom=.TRUE. |
./pkg/ecco/cost_generic.F |
298 |
COST_GENLOOP |
if (preproc(k2).EQ.'variaweight') dovarwei=.TRUE. |
./pkg/ecco/cost_generic.F |
299 |
COST_GENLOOP |
if (preproc(k2).EQ.'nosumsq') dosumsq=.FALSE. |
./pkg/ecco/cost_generic.F |
304 |
COST_GENLOOP |
if (preproc(k2).EQ.'clim') then |
./pkg/ecco/cost_generic.F |
308 |
COST_GENLOOP |
if (preproc(k2).EQ.'factor') then |
./pkg/ecco/cost_generic.F |
353 |
COST_GENLOOP |
& nrecloc, preproc, preproc_c, preproc_i, preproc_r, |
./pkg/ecco/cost_generic.F |
73 |
COST_GENERIC |
character*(MAX_LEN_FNAM) preproc(NGENPPROC) |
./pkg/ecco/cost_genread.F |
17 |
COST_GENREAD |
I preproc, |
./pkg/ecco/cost_genread.F |
49 |
COST_GENREAD |
character*(MAX_LEN_FNAM) preproc(NGENPPROC) |
./pkg/ecco/cost_genread.F |
63 |
COST_GENREAD |
if ( preproc(1) .EQ. 'clim') then |