| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_readparms.F |
195 |
ECCO_READPARMS |
& gencost_avgperiod, |
|
./pkg/ecco/ecco_readparms.F |
581 |
ECCO_READPARMS |
gencost_avgperiod(k) = ' ' |
|
./pkg/ecco/ecco_readparms.F |
817 |
ECCO_READPARMS |
if ( gencost_avgperiod(k) .NE. 'day ' .AND. |
|
./pkg/ecco/ecco_readparms.F |
818 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'DAY ' .AND. |
|
./pkg/ecco/ecco_readparms.F |
819 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'month' .AND. |
|
./pkg/ecco/ecco_readparms.F |
820 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'MONTH' .AND. |
|
./pkg/ecco/ecco_readparms.F |
821 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'step' .AND. |
|
./pkg/ecco/ecco_readparms.F |
822 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'STEP' .AND. |
|
./pkg/ecco/ecco_readparms.F |
823 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'const' .AND. |
|
./pkg/ecco/ecco_readparms.F |
824 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'CONST' .AND. |
|
./pkg/ecco/ecco_readparms.F |
825 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'year ' .AND. |
|
./pkg/ecco/ecco_readparms.F |
826 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'YEAR ' ) then |
|
./pkg/ecco/ecco_readparms.F |
865 |
ECCO_READPARMS |
if ( gencost_avgperiod(k) .NE. 'day ' .AND. |
|
./pkg/ecco/ecco_readparms.F |
866 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'DAY ' .AND. |
|
./pkg/ecco/ecco_readparms.F |
867 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'month' .AND. |
|
./pkg/ecco/ecco_readparms.F |
868 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'MONTH' .AND. |
|
./pkg/ecco/ecco_readparms.F |
869 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'step' .AND. |
|
./pkg/ecco/ecco_readparms.F |
870 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'STEP' .AND. |
|
./pkg/ecco/ecco_readparms.F |
871 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'const' .AND. |
|
./pkg/ecco/ecco_readparms.F |
872 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'CONST' .AND. |
|
./pkg/ecco/ecco_readparms.F |
873 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'year ' .AND. |
|
./pkg/ecco/ecco_readparms.F |
874 |
ECCO_READPARMS |
& gencost_avgperiod(k) .NE. 'YEAR ' ) then |
|
./pkg/ecco/cost_gencost_assignperiod.F |
57 |
COST_GENCOST_ASSIGNPERIOD |
& (gencost_avgperiod(k).NE.' ') ) ) then |
|
./pkg/ecco/cost_gencost_assignperiod.F |
58 |
COST_GENCOST_ASSIGNPERIOD |
if ( gencost_avgperiod(k) .EQ. 'day' .OR. |
|
./pkg/ecco/cost_gencost_assignperiod.F |
59 |
COST_GENCOST_ASSIGNPERIOD |
& gencost_avgperiod(k) .EQ. 'DAY' ) then |
|
./pkg/ecco/cost_gencost_assignperiod.F |
65 |
COST_GENCOST_ASSIGNPERIOD |
else if ( gencost_avgperiod(k) .EQ. 'month' .OR. |
|
./pkg/ecco/cost_gencost_assignperiod.F |
66 |
COST_GENCOST_ASSIGNPERIOD |
& gencost_avgperiod(k) .EQ. 'MONTH' ) then |
|
./pkg/ecco/cost_gencost_assignperiod.F |
72 |
COST_GENCOST_ASSIGNPERIOD |
else if ( gencost_avgperiod(k) .EQ. 'year' .OR. |
|
./pkg/ecco/cost_gencost_assignperiod.F |
73 |
COST_GENCOST_ASSIGNPERIOD |
& gencost_avgperiod(k) .EQ. 'YEAR' ) then |
|
./pkg/ecco/cost_gencost_assignperiod.F |
79 |
COST_GENCOST_ASSIGNPERIOD |
else if ( gencost_avgperiod(k) .EQ. 'step' .OR. |
|
./pkg/ecco/cost_gencost_assignperiod.F |
80 |
COST_GENCOST_ASSIGNPERIOD |
& gencost_avgperiod(k) .EQ. 'STEP' ) then |
|
./pkg/ecco/cost_gencost_assignperiod.F |
86 |
COST_GENCOST_ASSIGNPERIOD |
else if ( gencost_avgperiod(k) .EQ. 'const' .OR. |
|
./pkg/ecco/cost_gencost_assignperiod.F |
87 |
COST_GENCOST_ASSIGNPERIOD |
& gencost_avgperiod(k) .EQ. 'CONST' ) then |
|
./pkg/ecco/ecco.h |
325 |
NO PROCEDURE |
& gencost_avgperiod, |
|
./pkg/ecco/ecco.h |
336 |
NO PROCEDURE |
character*(5) gencost_avgperiod(NGENCOST) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
184 |
ECCO_COST_INIT_FIXED |
& (gencost_avgperiod(k).NE.' ') ) ) then |
|
./pkg/ecco/ecco_cost_init_fixed.F |
185 |
ECCO_COST_INIT_FIXED |
if ( gencost_avgperiod(k) .EQ. 'day' .OR. |
|
./pkg/ecco/ecco_cost_init_fixed.F |
186 |
ECCO_COST_INIT_FIXED |
& gencost_avgperiod(k) .EQ. 'DAY' ) then |
|
./pkg/ecco/ecco_cost_init_fixed.F |
189 |
ECCO_COST_INIT_FIXED |
else if ( gencost_avgperiod(k) .EQ. 'month' .OR. |
|
./pkg/ecco/ecco_cost_init_fixed.F |
190 |
ECCO_COST_INIT_FIXED |
& gencost_avgperiod(k) .EQ. 'MONTH' ) then |
|
./pkg/ecco/ecco_cost_init_fixed.F |
193 |
ECCO_COST_INIT_FIXED |
else if ( gencost_avgperiod(k) .EQ. 'step' .OR. |
|
./pkg/ecco/ecco_cost_init_fixed.F |
194 |
ECCO_COST_INIT_FIXED |
& gencost_avgperiod(k) .EQ. 'STEP' ) then |
|
./pkg/ecco/ecco_cost_init_fixed.F |
197 |
ECCO_COST_INIT_FIXED |
else if ( gencost_avgperiod(k) .EQ. 'const' .OR. |
|
./pkg/ecco/ecco_cost_init_fixed.F |
198 |
ECCO_COST_INIT_FIXED |
& gencost_avgperiod(k) .EQ. 'CONST' ) then |
|
./pkg/ecco/ecco_cost_init_fixed.F |
201 |
ECCO_COST_INIT_FIXED |
else if ( gencost_avgperiod(k) .EQ. 'year' .OR. |
|
./pkg/ecco/ecco_cost_init_fixed.F |
202 |
ECCO_COST_INIT_FIXED |
& gencost_avgperiod(k) .EQ. 'YEAR' ) then |