| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_bp.F |
70 |
COST_BP |
_RL junk,junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
131 |
COST_GENCOST_SSHV4 |
_RL junk,junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
608 |
COST_GENCOST_SSHV4 |
junkweight = gencost_weight(i,j,bi,bj,igen_mdt) |
|
./pkg/ecco/cost_gencost_sshv4.F |
611 |
COST_GENCOST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
612 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) num_gencost(igen_mdt,bi,bj) = |
|
./pkg/ecco/cost_gencost_sshv4.F |
614 |
COST_GENCOST_SSHV4 |
diagnosfld(i,j,bi,bj) = junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
946 |
COST_GENCOST_SSHV4 |
junkweight = mean_psMtpobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
952 |
COST_GENCOST_SSHV4 |
& objf_gencost(igen_tp,bi,bj)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
953 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
959 |
COST_GENCOST_SSHV4 |
junkweight = mean_psMersobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
965 |
COST_GENCOST_SSHV4 |
& objf_gencost(igen_ers,bi,bj)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
966 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
972 |
COST_GENCOST_SSHV4 |
junkweight = mean_psMgfoobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
978 |
COST_GENCOST_SSHV4 |
& objf_gencost(igen_gfo,bi,bj)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sshv4.F |
979 |
COST_GENCOST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
280 |
COST_GENCOST_SSTV4 |
junkweight = gencost_weight(i,j,bi,bj,igen_amsre_lsc)* |
|
./pkg/ecco/cost_gencost_sstv4.F |
284 |
COST_GENCOST_SSTV4 |
& +junk*junk*junkweight/ndaysaveRL |
|
./pkg/ecco/cost_gencost_sstv4.F |
285 |
COST_GENCOST_SSTV4 |
if ( (junkweight.GT.0.).AND.(nb_sst(i,j,bi,bj).GT.0.) ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
375 |
COST_GENCOST_SSTV4 |
junkweight = gencost_weight(i,j,bi,bj,igen_amsre)* |
|
./pkg/ecco/cost_gencost_sstv4.F |
378 |
COST_GENCOST_SSTV4 |
& objf_gencost(igen_amsre,bi,bj)+junk*junk*junkweight |
|
./pkg/ecco/cost_gencost_sstv4.F |
379 |
COST_GENCOST_SSTV4 |
if (junkweight.GT.0.) |
|
./pkg/ecco/cost_gencost_sstv4.F |
76 |
COST_GENCOST_SSTV4 |
_RL junk,junkweight |
|
./pkg/ecco/cost_sshv4.F |
125 |
COST_SSHV4 |
_RL junk,junkweight |
|
./pkg/ecco/cost_sshv4.F |
925 |
COST_SSHV4 |
junkweight = mean_psMtpobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
932 |
COST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_sshv4.F |
933 |
COST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_sshv4.F |
939 |
COST_SSHV4 |
junkweight = mean_psMersobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
946 |
COST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_sshv4.F |
947 |
COST_SSHV4 |
if ( junkweight .ne. 0. ) |
|
./pkg/ecco/cost_sshv4.F |
953 |
COST_SSHV4 |
junkweight = mean_psMgfoobs_MSK(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
960 |
COST_SSHV4 |
& + junk*junk*junkweight |
|
./pkg/ecco/cost_sshv4.F |
961 |
COST_SSHV4 |
if ( junkweight .ne. 0. ) |