| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_cost_concentration.F |
130 |
SEAICE_COST_CONCENTRATION |
localwww = 0. _d 0 |
|
./pkg/seaice/seaice_cost_concentration.F |
350 |
SEAICE_COST_CONCENTRATION |
localwww = localweight(i,j,bi,bj)*cmask(i,j,k) |
|
./pkg/seaice/seaice_cost_concentration.F |
353 |
SEAICE_COST_CONCENTRATION |
localwww = localModWeight(i,j,bi,bj)*cmask(i,j,k) |
|
./pkg/seaice/seaice_cost_concentration.F |
358 |
SEAICE_COST_CONCENTRATION |
localcost = localcost + junk*junk*localwww |
|
./pkg/seaice/seaice_cost_concentration.F |
372 |
SEAICE_COST_CONCENTRATION |
& localwww, |
|
./pkg/seaice/seaice_cost_concentration.F |
373 |
SEAICE_COST_CONCENTRATION |
& junk*junk*localwww |
|
./pkg/seaice/seaice_cost_concentration.F |
377 |
SEAICE_COST_CONCENTRATION |
if ( localwww .ne. 0. ) |
|
./pkg/seaice/seaice_cost_concentration.F |
89 |
SEAICE_COST_CONCENTRATION |
_RL localwww |
|
./pkg/seaice/seaice_cost_sss.F |
131 |
SEAICE_COST_SSS |
localwww = 0. _d 0 |
|
./pkg/seaice/seaice_cost_sss.F |
310 |
SEAICE_COST_SSS |
localwww = localweight(i,j,bi,bj)*cmask(i,j,k) |
|
./pkg/seaice/seaice_cost_sss.F |
327 |
SEAICE_COST_SSS |
localcost = localcost + junk*junk*localwww |
|
./pkg/seaice/seaice_cost_sss.F |
342 |
SEAICE_COST_SSS |
& localwww, |
|
./pkg/seaice/seaice_cost_sss.F |
347 |
SEAICE_COST_SSS |
if ( localwww .ne. 0. ) |
|
./pkg/seaice/seaice_cost_sss.F |
90 |
SEAICE_COST_SSS |
_RL localwww |
|
./pkg/seaice/seaice_cost_sst.F |
134 |
SEAICE_COST_SST |
localwww = 0. _d 0 |
|
./pkg/seaice/seaice_cost_sst.F |
310 |
SEAICE_COST_SST |
localwww = localweight(i,j,bi,bj)*cmask(i,j,k) |
|
./pkg/seaice/seaice_cost_sst.F |
323 |
SEAICE_COST_SST |
localcost = localcost + junk*junk*localwww |
|
./pkg/seaice/seaice_cost_sst.F |
338 |
SEAICE_COST_SST |
& localwww, |
|
./pkg/seaice/seaice_cost_sst.F |
343 |
SEAICE_COST_SST |
if ( localwww .ne. 0. ) |
|
./pkg/seaice/seaice_cost_sst.F |
88 |
SEAICE_COST_SST |
_RL localwww |
|
./pkg/ecco/cost_gencost_seaicev4.F |
170 |
COST_GENCOST_SEAICEV4 |
localwww = 0. _d 0 |
|
./pkg/ecco/cost_gencost_seaicev4.F |
409 |
COST_GENCOST_SEAICEV4 |
localwww = localweight(i,j,k,bi,bj)*cmask(i,j,k) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
413 |
COST_GENCOST_SEAICEV4 |
& objf_gencost(bi,bj,igen_conc) + junk*junk*localwww |
|
./pkg/ecco/cost_gencost_seaicev4.F |
415 |
COST_GENCOST_SEAICEV4 |
if ( localwww .ne. 0. ) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
93 |
COST_GENCOST_SEAICEV4 |
_RL localwww |
|
./pkg/ecco/cost_generic.F |
133 |
COST_GENERIC |
localwww = 0. _d 0 |
|
./pkg/ecco/cost_generic.F |
286 |
COST_GENERIC |
localwww = localweight(i,j,k,bi,bj)*cmask(i,j,k) |
|
./pkg/ecco/cost_generic.F |
289 |
COST_GENERIC |
localcost = localcost + junk*junk*localwww |
|
./pkg/ecco/cost_generic.F |
290 |
COST_GENERIC |
if ( localwww .ne. 0. ) |
|
./pkg/ecco/cost_generic.F |
89 |
COST_GENERIC |
_RL localwww |