| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_bp.F |
70 |
COST_BP |
_RL junk,junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
1015 |
COST_GENCOST_SSHV4 |
junkweight=slaoffset_weight |
|
./pkg/ecco/cost_gencost_sshv4.F |
1017 |
COST_GENCOST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
1134 |
COST_GENCOST_SSHV4 |
junkweight = mean_psMslaobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1140 |
COST_GENCOST_SSHV4 |
& objf_gencost(bi,bj,igen_tp)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
1141 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1147 |
COST_GENCOST_SSHV4 |
junkweight = mean_psMslaobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1153 |
COST_GENCOST_SSHV4 |
& objf_gencost(bi,bj,igen_ers)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
1154 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1160 |
COST_GENCOST_SSHV4 |
junkweight = mean_psMslaobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1166 |
COST_GENCOST_SSHV4 |
& objf_gencost(bi,bj,igen_gfo)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
1167 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
143 |
COST_GENCOST_SSHV4 |
_RL junk,junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
701 |
COST_GENCOST_SSHV4 |
junkweight = gencost_weight(i,j,bi,bj,igen_mdt) |
|
./pkg/ecco/cost_gencost_sshv4.F |
705 |
COST_GENCOST_SSHV4 |
junkweight = 0. _d 0 |
|
./pkg/ecco/cost_gencost_sshv4.F |
708 |
COST_GENCOST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
709 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) num_gencost(bi,bj,igen_mdt) = |
|
./pkg/ecco/cost_gencost_sshv4.F |
711 |
COST_GENCOST_SSHV4 |
diagnosfld(i,j,bi,bj) = junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sstv4.F |
310 |
COST_GENCOST_SSTV4 |
junkweight = gencost_weight(i,j,bi,bj,igen_amsre_lsc)* |
|
./pkg/ecco/cost_gencost_sstv4.F |
314 |
COST_GENCOST_SSTV4 |
& +junk*junk*junkweight/ndaysaveRL |
|
./pkg/ecco/cost_gencost_sstv4.F |
315 |
COST_GENCOST_SSTV4 |
if ( (junkweight.GT.0.).AND.(nb_sst(i,j,bi,bj).GT.0.) ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
417 |
COST_GENCOST_SSTV4 |
junkweight = gencost_weight(i,j,bi,bj,igen_amsre)* |
|
./pkg/ecco/cost_gencost_sstv4.F |
420 |
COST_GENCOST_SSTV4 |
& objf_gencost(igen_amsre,bi,bj)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sstv4.F |
421 |
COST_GENCOST_SSTV4 |
if (junkweight.GT.0.) |
|
./pkg/ecco/cost_gencost_sstv4.F |
79 |
COST_GENCOST_SSTV4 |
_RL junk,junkweight |
|
./pkg/ecco/cost_ies.F |
193 |
COST_IES |
junkweight = wies(i,j,bi,bj)*iesmask(i,j,bi,bj) |
|
./pkg/ecco/cost_ies.F |
197 |
COST_IES |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_ies.F |
198 |
COST_IES |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_ies.F |
70 |
COST_IES |
_RL junk,junkweight |
|
./pkg/ecco/cost_sshv4.F |
1001 |
COST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_sshv4.F |
1002 |
COST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_sshv4.F |
141 |
COST_SSHV4 |
_RL junk,junkweight |
|
./pkg/ecco/cost_sshv4.F |
966 |
COST_SSHV4 |
junkweight = mean_psMtpobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
973 |
COST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_sshv4.F |
974 |
COST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_sshv4.F |
980 |
COST_SSHV4 |
junkweight = mean_psMersobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
987 |
COST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_sshv4.F |
988 |
COST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_sshv4.F |
994 |
COST_SSHV4 |
junkweight = mean_psMgfoobs_MSK(i,j,bi,bj) |