| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_cost_gen.F |
189 |
CTRL_COST_GEN2D |
fctile = fctile + xx_gen_weight(i,j,bi,bj)*tmpx*tmpx |
|
./pkg/ctrl/ctrl_cost_gen.F |
193 |
CTRL_COST_GEN2D |
if ( xx_gen_weight(i,j,bi,bj) .ne. 0. _d 0 ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
26 |
CTRL_COST_GEN2D |
I xx_gen_weight, |
|
./pkg/ctrl/ctrl_cost_gen.F |
299 |
CTRL_COST_GEN2D |
fctile = fctile + xx_gen_weight(i,j,bi,bj)*tmpx*tmpx |
|
./pkg/ctrl/ctrl_cost_gen.F |
302 |
CTRL_COST_GEN2D |
fctile = fctile + xx_gen_weight(i,j,bi,bj)*tmpx*tmpx |
|
./pkg/ctrl/ctrl_cost_gen.F |
309 |
CTRL_COST_GEN2D |
if ( xx_gen_weight(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_cost_gen.F |
312 |
CTRL_COST_GEN2D |
if ( xx_gen_weight(i,j,bi,bj) .ne. 0. _d 0 ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
369 |
CTRL_COST_GEN2D |
& + xx_gen_weight(i,j,bi,bj)*cosphi(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_cost_gen.F |
372 |
CTRL_COST_GEN2D |
& + xx_gen_weight(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_cost_gen.F |
377 |
CTRL_COST_GEN2D |
if ( xx_gen_weight(i,j,bi,bj)*cosphi(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_cost_gen.F |
380 |
CTRL_COST_GEN2D |
if ( xx_gen_weight(i,j,bi,bj) .ne. 0. _d 0 ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
413 |
CTRL_COST_GEN3D |
I xx_gen_weight, |
|
./pkg/ctrl/ctrl_cost_gen.F |
446 |
CTRL_COST_GEN3D |
_RL xx_gen_weight(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
|
./pkg/ctrl/ctrl_cost_gen.F |
531 |
CTRL_COST_GEN3D |
& + xx_gen_weight(i,j,k,bi,bj) |
|
./pkg/ctrl/ctrl_cost_gen.F |
536 |
CTRL_COST_GEN3D |
if ( xx_gen_weight(i,j,k,bi,bj) .ne. 0. _d 0 ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
70 |
CTRL_COST_GEN2D |
_RL xx_gen_weight(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |