Symbol Description Uses
gencost_flag 10


File Line number Procedure Code
./pkg/ecco/cost_gencost_all.F 56 COST_GENCOST_ALL 
         if ( (using_gencost(k)).AND.( gencost_flag(k).EQ.1 ) ) then
./pkg/ecco/cost_gencost_assignperiod.F 55 COST_GENCOST_ASSIGNPERIOD 
       if ( (using_gencost(k)).AND.( gencost_flag(k).GE.1 ) ) then
./pkg/ecco/ecco_cost.h 84 NO PROCEDURE 
     &       gencost_nrec, gencost_flag
./pkg/ecco/ecco_cost.h 89 NO PROCEDURE 
      integer gencost_flag(NGENCOST)
./pkg/ecco/ecco_cost_init_fixed.F 148 ECCO_COST_INIT_FIXED 
       if ( (using_gencost(k)).AND.( gencost_flag(k).GE.1 ) ) then
./pkg/ecco/ecco_readparms.F 516 ECCO_READPARMS 
         gencost_flag(k)       = 0
./pkg/ecco/ecco_readparms.F 556 ECCO_READPARMS 
           gencost_flag(k)=-1
./pkg/ecco/ecco_readparms.F 564 ECCO_READPARMS 
           gencost_flag(k)=2
./pkg/ecco/ecco_readparms.F 569 ECCO_READPARMS 
           gencost_flag(k)=1
./pkg/ecco/ecco_readparms.F 577 ECCO_READPARMS 
        if ( (using_gencost(k)).AND.( gencost_flag(k).GE.1 ) ) then