File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_readparms.F |
181 |
ECCO_READPARMS |
& gencost_preproc, |
./pkg/ecco/ecco_readparms.F |
589 |
ECCO_READPARMS |
gencost_preproc(k2,k) = ' ' |
./pkg/ecco/ecco_summary.F |
828 |
ECCO_SUMMARY |
if (gencost_preproc(k2,k).NE.' ') then |
./pkg/ecco/ecco_summary.F |
829 |
ECCO_SUMMARY |
il = ilnblnk(gencost_preproc(k2,k)) |
./pkg/ecco/ecco_summary.F |
831 |
ECCO_SUMMARY |
& gencost_preproc(k2,k)(1:il) |
./pkg/ecco/cost_gencost_all.F |
83 |
COST_GENCOST_ALL |
& gencost_preproc(1,k), gencost_preproc_c(1,k), |
./pkg/ecco/cost_gencost_seaicev4.F |
178 |
COST_GENCOST_SEAICEV4 |
preproc(k2)=gencost_preproc(k2,igen_conc) |
./pkg/ecco/cost_gencost_transp.F |
162 |
COST_GENCOST_TRANSP |
preproc(k2)=gencost_preproc(k2,kgen(icount)) |
./pkg/ecco/ecco.h |
326 |
NO PROCEDURE |
& gencost_preproc, |
./pkg/ecco/ecco.h |
337 |
NO PROCEDURE |
character*(MAX_LEN_FNAM) gencost_preproc(NGENPPROC,NGENCOST) |
./pkg/ecco/ecco_check.F |
349 |
ECCO_CHECK |
if ( (gencost_preproc(1,k).EQ.'variaweight').AND. |