File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_toolbox.F |
567 |
ECCO_ADDCOST |
_RL localwww |
./pkg/ecco/ecco_toolbox.F |
582 |
ECCO_ADDCOST |
localwww = 0. _d 0 |
./pkg/ecco/ecco_toolbox.F |
591 |
ECCO_ADDCOST |
localwww = localweight(i,j,k,bi,bj) |
./pkg/ecco/ecco_toolbox.F |
595 |
ECCO_ADDCOST |
localcost = localcost + junk*junk*localwww |
./pkg/ecco/ecco_toolbox.F |
597 |
ECCO_ADDCOST |
localcost = localcost + junk*localwww |
./pkg/ecco/ecco_toolbox.F |
599 |
ECCO_ADDCOST |
if ( localwww .ne. 0. ) |
./pkg/seaice/seaice_cost_concentration.F |
105 |
SEAICE_COST_CONCENTRATION |
_RL localwww |
./pkg/seaice/seaice_cost_concentration.F |
143 |
SEAICE_COST_CONCENTRATION |
localwww = 0. _d 0 |
./pkg/seaice/seaice_cost_concentration.F |
363 |
SEAICE_COST_CONCENTRATION |
localwww = localweight(i,j,bi,bj)*cmask(i,j,k) |
./pkg/seaice/seaice_cost_concentration.F |
366 |
SEAICE_COST_CONCENTRATION |
localwww = localModWeight(i,j,bi,bj)*cmask(i,j,k) |
./pkg/seaice/seaice_cost_concentration.F |
371 |
SEAICE_COST_CONCENTRATION |
localcost = localcost + junk*junk*localwww |
./pkg/seaice/seaice_cost_concentration.F |
385 |
SEAICE_COST_CONCENTRATION |
& localwww, |
./pkg/seaice/seaice_cost_concentration.F |
386 |
SEAICE_COST_CONCENTRATION |
& junk*junk*localwww |
./pkg/seaice/seaice_cost_concentration.F |
390 |
SEAICE_COST_CONCENTRATION |
if ( localwww .ne. 0. ) |
./pkg/seaice/seaice_cost_sss.F |
103 |
SEAICE_COST_SSS |
_RL localwww |
./pkg/seaice/seaice_cost_sss.F |
141 |
SEAICE_COST_SSS |
localwww = 0. _d 0 |
./pkg/seaice/seaice_cost_sss.F |
320 |
SEAICE_COST_SSS |
localwww = localweight(i,j,bi,bj)*cmask(i,j,k) |
./pkg/seaice/seaice_cost_sss.F |
337 |
SEAICE_COST_SSS |
localcost = localcost + junk*junk*localwww |
./pkg/seaice/seaice_cost_sss.F |
352 |
SEAICE_COST_SSS |
& localwww, |
./pkg/seaice/seaice_cost_sss.F |
357 |
SEAICE_COST_SSS |
if ( localwww .ne. 0. ) |
./pkg/seaice/seaice_cost_sst.F |
101 |
SEAICE_COST_SST |
_RL localwww |
./pkg/seaice/seaice_cost_sst.F |
144 |
SEAICE_COST_SST |
localwww = 0. _d 0 |
./pkg/seaice/seaice_cost_sst.F |
320 |
SEAICE_COST_SST |
localwww = localweight(i,j,bi,bj)*cmask(i,j,k) |
./pkg/seaice/seaice_cost_sst.F |
333 |
SEAICE_COST_SST |
localcost = localcost + junk*junk*localwww |
./pkg/seaice/seaice_cost_sst.F |
348 |
SEAICE_COST_SST |
& localwww, |
./pkg/seaice/seaice_cost_sst.F |
353 |
SEAICE_COST_SST |
if ( localwww .ne. 0. ) |