| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_obcsbal.F |
120 |
CTRL_OBCSBAL |
tmpflux= 0. d 0 |
|
./pkg/ctrl/ctrl_obcsbal.F |
73 |
CTRL_OBCSBAL |
_RL tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
114 |
CTRL_OBCSVOL |
tmpflux= 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
179 |
CTRL_OBCSVOL |
tmpflux = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
190 |
CTRL_OBCSVOL |
tmpflux = tmpflux - tmpx* delR(k)*dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
198 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
215 |
CTRL_OBCSVOL |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
226 |
CTRL_OBCSVOL |
tmpflux = tmpflux + tmpx* delR(k)*dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
233 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
251 |
CTRL_OBCSVOL |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
262 |
CTRL_OBCSVOL |
tmpflux = tmpflux + tmpy* delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
269 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
287 |
CTRL_OBCSVOL |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
298 |
CTRL_OBCSVOL |
tmpflux = tmpflux - tmpy* delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
305 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
337 |
CTRL_OBCSVOL |
tmpflux = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
348 |
CTRL_OBCSVOL |
tmpflux = tmpflux - tmpx* delR(k)*dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
356 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
373 |
CTRL_OBCSVOL |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
384 |
CTRL_OBCSVOL |
tmpflux = tmpflux + tmpx* delR(k)*dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
391 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
409 |
CTRL_OBCSVOL |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
420 |
CTRL_OBCSVOL |
tmpflux = tmpflux + tmpy* delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
427 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
445 |
CTRL_OBCSVOL |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
456 |
CTRL_OBCSVOL |
tmpflux = tmpflux - tmpy* delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
463 |
CTRL_OBCSVOL |
sumvol = sumvol + tmpflux |
|
./pkg/ctrl/ctrl_obcsvol.F |
70 |
CTRL_OBCSVOL |
_RL tmpflux |
|
./pkg/ctrl/ctrl_volflux.F |
119 |
CTRL_VOLFLUX |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
179 |
CTRL_VOLFLUX |
tmpflux = 0. d0 |
|
./pkg/ctrl/ctrl_volflux.F |
202 |
CTRL_VOLFLUX |
tmpflux = tmpflux -tmpx*delR(k)*dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
210 |
CTRL_VOLFLUX |
sumflux = sumflux + tmpflux |
|
./pkg/ctrl/ctrl_volflux.F |
227 |
CTRL_VOLFLUX |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
252 |
CTRL_VOLFLUX |
tmpflux = tmpflux +tmpx*delR(k)*dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
261 |
CTRL_VOLFLUX |
sumflux = sumflux + tmpflux |
|
./pkg/ctrl/ctrl_volflux.F |
279 |
CTRL_VOLFLUX |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
308 |
CTRL_VOLFLUX |
tmpflux = tmpflux + tmpy* delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
319 |
CTRL_VOLFLUX |
sumflux = sumflux + tmpflux |
|
./pkg/ctrl/ctrl_volflux.F |
337 |
CTRL_VOLFLUX |
tmpflux = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
373 |
CTRL_VOLFLUX |
tmpflux = tmpflux - tmpy* delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
394 |
CTRL_VOLFLUX |
sumflux = sumflux + tmpflux |
|
./pkg/ctrl/ctrl_volflux.F |
74 |
CTRL_VOLFLUX |
_RL tmpflux |