| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_summary.F |
259 |
ECCO_COST_SUMMARY |
if (using_tpj) then |
|
./pkg/ecco/ecco_readparms.F |
272 |
ECCO_READPARMS |
using_tpj = .false. |
|
./pkg/ecco/ecco_readparms.F |
85 |
ECCO_READPARMS |
& using_mdt, using_tpj, using_ers, using_gfo, |
|
./pkg/ecco/cost_gencost_sshv4.F |
1248 |
COST_GENCOST_SSHV4 |
if (using_tpj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
399 |
COST_GENCOST_SSHV4 |
if (using_tpj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
565 |
COST_GENCOST_SSHV4 |
if (using_tpj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
965 |
COST_GENCOST_SSHV4 |
if (using_tpj) |
|
./pkg/ecco/ecco.h |
105 |
NO PROCEDURE |
logical using_tpj |
|
./pkg/ecco/ecco.h |
94 |
NO PROCEDURE |
& using_tpj, |
|
./pkg/ecco/ecco_check.F |
275 |
ECCO_CHECK |
IF ( (using_topex).AND.(.NOT.using_tpj) ) using_tpj=.TRUE. |
|
./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 |
648 |
ECCO_CHECK |
IF ( (using_tpj ).OR.(using_ers).OR.(using_gfo) |