File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_readparms.F |
174 |
ECCO_READPARMS |
& using_gencost, |
./pkg/ecco/ecco_readparms.F |
579 |
ECCO_READPARMS |
using_gencost(k) = .FALSE. |
./pkg/ecco/ecco_readparms.F |
665 |
ECCO_READPARMS |
using_gencost(k)=.TRUE. |
./pkg/ecco/ecco_readparms.F |
673 |
ECCO_READPARMS |
using_gencost(k)=.TRUE. |
./pkg/ecco/ecco_readparms.F |
676 |
ECCO_READPARMS |
& k,' ',gencost_name(k)(1:il),': ',using_gencost(k) |
./pkg/ecco/ecco_readparms.F |
688 |
ECCO_READPARMS |
using_gencost(k)=.TRUE. |
./pkg/ecco/ecco_readparms.F |
691 |
ECCO_READPARMS |
& k,' ',gencost_name(k)(1:il),': ',using_gencost(k) |
./pkg/ecco/ecco_readparms.F |
701 |
ECCO_READPARMS |
using_gencost(k)=.TRUE. |
./pkg/ecco/ecco_readparms.F |
705 |
ECCO_READPARMS |
using_gencost(k)=.TRUE. |
./pkg/ecco/ecco_readparms.F |
811 |
ECCO_READPARMS |
if ( using_gencost(k)) then |
./pkg/ecco/ecco_summary.F |
784 |
ECCO_SUMMARY |
if (using_gencost(k)) then |
./pkg/ecco/cost_averagesfields.F |
690 |
COST_AVERAGESFIELDS |
if ( (using_gencost(k)).AND.(.NOT.gencost_barskip(k)) ) then |
./pkg/ecco/cost_gencost_all.F |
54 |
COST_GENCOST_ALL |
if ( (using_gencost(k)).AND.( gencost_flag(k).EQ.1 ) |
./pkg/ecco/cost_gencost_assignperiod.F |
56 |
COST_GENCOST_ASSIGNPERIOD |
if ( (using_gencost(k)).AND.( (gencost_flag(k).GE.1).OR. |
./pkg/ecco/cost_gencost_boxmean.F |
76 |
COST_GENCOST_BOXMEAN |
if ( (gencost_flag(kgen).EQ.-3).AND.(using_gencost(kgen)) ) then |
./pkg/ecco/cost_gencost_bpv4.F |
95 |
COST_GENCOST_BPV4 |
& (using_gencost(k)) ) kgen=k |
./pkg/ecco/cost_gencost_glbmean.F |
102 |
COST_GENCOST_GLBMEAN |
& .AND.(using_gencost(k)) ) kgen=k |
./pkg/ecco/cost_gencost_transp.F |
114 |
COST_GENCOST_TRANSP |
& (using_gencost(k)) ) then |
./pkg/ecco/ecco.h |
310 |
NO PROCEDURE |
& using_gencost, gencost_is3d, gencost_msk_is3d, |
./pkg/ecco/ecco.h |
312 |
NO PROCEDURE |
LOGICAL using_gencost(NGENCOST) |
./pkg/ecco/ecco_check.F |
345 |
ECCO_CHECK |
CALL ECCO_CHECK_FILES( using_gencost(k), 'gencost', |
./pkg/ecco/ecco_check.F |
351 |
ECCO_CHECK |
CALL ECCO_CHECK_FILES( using_gencost(k), 'gencost', |
./pkg/ecco/ecco_check.F |
357 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
369 |
ECCO_CHECK |
if (gencost_name(k).EQ.'sshv4-tp') using_tpj=using_gencost(k) |
./pkg/ecco/ecco_check.F |
370 |
ECCO_CHECK |
if (gencost_name(k).EQ.'sshv4-ers') using_ers=using_gencost(k) |
./pkg/ecco/ecco_check.F |
371 |
ECCO_CHECK |
if (gencost_name(k).EQ.'sshv4-gfo') using_gfo=using_gencost(k) |
./pkg/ecco/ecco_check.F |
372 |
ECCO_CHECK |
if (gencost_name(k).EQ.'sshv4-mdt') using_mdt=using_gencost(k) |
./pkg/ecco/ecco_check.F |
376 |
ECCO_CHECK |
& using_cost_seaice=using_gencost(k) |
./pkg/ecco/ecco_check.F |
378 |
ECCO_CHECK |
& using_cost_seaice=using_gencost(k) |
./pkg/ecco/ecco_check.F |
380 |
ECCO_CHECK |
& using_cost_seaice=using_gencost(k) |
./pkg/ecco/ecco_check.F |
413 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
422 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
437 |
ECCO_CHECK |
& k,using_gencost(k) |
./pkg/ecco/ecco_check.F |
450 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
466 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
482 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
495 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
514 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
536 |
ECCO_CHECK |
& k,using_gencost(k) |
./pkg/ecco/ecco_check.F |
550 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
584 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
604 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
618 |
ECCO_CHECK |
using_gencost(k)=.FALSE. |
./pkg/ecco/ecco_check.F |
634 |
ECCO_CHECK |
if(using_gencost(k)) icount_transp=icount_transp+1 |
./pkg/ecco/ecco_check.F |
654 |
ECCO_CHECK |
& (using_gencost(k)) ) igen_etaday=k |
./pkg/ecco/ecco_cost_init_fixed.F |
183 |
ECCO_COST_INIT_FIXED |
if ( (using_gencost(k)).AND.( (gencost_flag(k).GE.1).OR. |