File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_cost_concentration.F |
236 |
SEAICE_COST_CONCENTRATION |
call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs, |
./pkg/seaice/seaice_cost_sss.F |
254 |
SEAICE_COST_SSS |
call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs, |
./pkg/seaice/seaice_cost_sst.F |
249 |
SEAICE_COST_SST |
call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs, |
./pkg/seaice/seaice_cost_weights.F |
100 |
SEAICE_COST_WEIGHTS |
IF ( cost_yftype.EQ.'RL' ) THEN |
./verification/global1x1_tot/code/ecco_cost_weights.F |
505 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( geoid_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
555 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( ssh_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
613 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( scatx_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
615 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( scaty_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
703 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( tauu_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
746 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( uwind_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
778 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( tauv_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
821 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( vwind_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
853 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( hflux_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
889 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( atemp_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
921 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( sflux_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code/ecco_cost_weights.F |
957 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( aqh_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
503 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( geoid_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
553 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( ssh_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
609 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( scatx_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
611 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( scaty_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
699 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( tauu_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
742 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( uwind_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
774 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( tauv_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
817 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( vwind_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
849 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( hflux_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
885 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( atemp_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
917 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( sflux_errfile, cost_iprec, cost_yftype, nnz, |
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
953 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( aqh_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/cost_bp_read.F |
100 |
COST_BP_READ |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, |
./pkg/ecco/cost_ctdsclim.F |
166 |
COST_CTDSCLIM |
call MDSREADFIELD( ctdsclimfile, cost_iprec, cost_yftype, |
./pkg/ecco/cost_ctdtclim.F |
165 |
COST_CTDTCLIM |
call MDSREADFIELD( ctdtclimfile, cost_iprec, cost_yftype, |
./pkg/ecco/cost_gencost_sstv4.F |
191 |
COST_GENCOST_SSTV4 |
call MDSREADFIELD( fname2, cost_iprec, cost_yftype, 1, |
./pkg/ecco/cost_gencost_sstv4.F |
329 |
COST_GENCOST_SSTV4 |
call MDSREADFIELD( fname2, cost_iprec, cost_yftype, 1, |
./pkg/ecco/cost_generic.F |
240 |
COST_GENERIC |
call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs, |
./pkg/ecco/cost_readargos.F |
84 |
COST_READARGOS |
call MDSREADFIELD( argosfile, cost_iprec, cost_yftype, nr, |
./pkg/ecco/cost_readargot.F |
84 |
COST_READARGOT |
call MDSREADFIELD( argotfile, cost_iprec, cost_yftype, nr, |
./pkg/ecco/cost_readers.F |
122 |
COST_READERS |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, ersobs, |
./pkg/ecco/cost_readgfo.F |
122 |
COST_READGFO |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, gfoobs, |
./pkg/ecco/cost_readscatxfields.F |
116 |
COST_READSCATXFIELDS |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, |
./pkg/ecco/cost_readscatyfields.F |
115 |
COST_READSCATYFIELDS |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, |
./pkg/ecco/cost_readtopex.F |
121 |
COST_READTOPEX |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, tpobs, |
./pkg/ecco/cost_readtopexmean.F |
70 |
COST_READTOPEXMEAN |
call MDSREADFIELD( topexmeanfile, cost_iprec, cost_yftype, 1, |
./pkg/ecco/cost_salt.F |
166 |
COST_SALT |
call MDSREADFIELD( sdatfile, cost_iprec, cost_yftype, |
./pkg/ecco/cost_sla_read.F |
127 |
COST_SLA_READ |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, sla_obs, |
./pkg/ecco/cost_sla_read_yd.F |
112 |
COST_SLA_READ_YD |
call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, sla_obs, |
./pkg/ecco/cost_theta.F |
165 |
COST_THETA |
call MDSREADFIELD( tdatfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost.h |
309 |
NO PROCEDURE |
& cost_yftype |
./pkg/ecco/ecco_cost.h |
312 |
NO PROCEDURE |
character*(2) cost_yftype |
./pkg/ecco/ecco_cost_weights.F |
1018 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( hflux_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1053 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( atemp_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1087 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( sflux_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1122 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( aqh_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/ecco_cost_weights.F |
1154 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( precip_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1186 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( swflux_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1218 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( swdown_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1250 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( lwflux_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1282 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( lwdown_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1314 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( snowprecip_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1347 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( evap_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1379 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( apressure_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1412 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( runoff_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1437 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( bottomdrag_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1459 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( diffkr_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1483 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( kapgm_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1507 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( kapredi_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1531 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( edtau_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
1557 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( gencost_errfile(k), cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
591 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( geoid_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
628 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( ssh_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
657 |
ECCO_COST_WEIGHTS |
& call MDSREADFIELD( tp_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/ecco_cost_weights.F |
662 |
ECCO_COST_WEIGHTS |
& call MDSREADFIELD( ers_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/ecco_cost_weights.F |
667 |
ECCO_COST_WEIGHTS |
& call MDSREADFIELD( gfo_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/ecco_cost_weights.F |
805 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( scatx_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/ecco_cost_weights.F |
807 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( scaty_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/ecco_cost_weights.F |
876 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( tauu_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
915 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( uwind_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_cost_weights.F |
947 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( tauv_errfile, cost_iprec, cost_yftype, nnz, |
./pkg/ecco/ecco_cost_weights.F |
986 |
ECCO_COST_WEIGHTS |
call MDSREADFIELD( vwind_errfile, cost_iprec, cost_yftype, |
./pkg/ecco/ecco_readparms.F |
128 |
ECCO_READPARMS |
& cost_iprec, cost_yftype |
./pkg/ecco/ecco_readparms.F |
370 |
ECCO_READPARMS |
cost_yftype = 'RL' |
./pkg/ecco/ecco_readparms.F |
390 |
ECCO_READPARMS |
IF ( cost_yftype.NE.'RL' ) THEN |