| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_obcsvol.F |
113 |
CTRL_OBCSVOL |
tmparea= 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
178 |
CTRL_OBCSVOL |
tmparea = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
189 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k) * dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
195 |
CTRL_OBCSVOL |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
214 |
CTRL_OBCSVOL |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
225 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k) * dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
230 |
CTRL_OBCSVOL |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
250 |
CTRL_OBCSVOL |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
261 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
266 |
CTRL_OBCSVOL |
sumarea =sumarea + tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
286 |
CTRL_OBCSVOL |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
297 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k) *dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
302 |
CTRL_OBCSVOL |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
336 |
CTRL_OBCSVOL |
tmparea = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
347 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k) * dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
353 |
CTRL_OBCSVOL |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
372 |
CTRL_OBCSVOL |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
383 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k) * dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
388 |
CTRL_OBCSVOL |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
408 |
CTRL_OBCSVOL |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
419 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k)*dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
424 |
CTRL_OBCSVOL |
sumarea =sumarea + tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
444 |
CTRL_OBCSVOL |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
455 |
CTRL_OBCSVOL |
tmparea = tmparea + delR(k) *dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_obcsvol.F |
460 |
CTRL_OBCSVOL |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_obcsvol.F |
69 |
CTRL_OBCSVOL |
_RL tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
118 |
CTRL_VOLFLUX |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
178 |
CTRL_VOLFLUX |
tmparea = 0. d0 |
|
./pkg/ctrl/ctrl_volflux.F |
196 |
CTRL_VOLFLUX |
tmparea = tmparea + delR(k) * dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
197 |
CTRL_VOLFLUX |
print*,'tmparea',tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
207 |
CTRL_VOLFLUX |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
227 |
CTRL_VOLFLUX |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
245 |
CTRL_VOLFLUX |
tmparea = tmparea + delR(k) * dxg(i,j+jp1,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
246 |
CTRL_VOLFLUX |
print*,'tmparea',tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
257 |
CTRL_VOLFLUX |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
280 |
CTRL_VOLFLUX |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
300 |
CTRL_VOLFLUX |
tmparea = tmparea + delR(k) * dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
301 |
CTRL_VOLFLUX |
print*,'tmparea',tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
314 |
CTRL_VOLFLUX |
sumarea =sumarea + tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
340 |
CTRL_VOLFLUX |
tmparea = 0. d 0 |
|
./pkg/ctrl/ctrl_volflux.F |
363 |
CTRL_VOLFLUX |
tmparea = tmparea + delR(k) * dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
364 |
CTRL_VOLFLUX |
print*,'tmparea',tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
375 |
CTRL_VOLFLUX |
tmparea = tmparea + delR(k) *dyg(i+ip1,j,bi,bj) |
|
./pkg/ctrl/ctrl_volflux.F |
388 |
CTRL_VOLFLUX |
sumarea = sumarea+ tmparea |
|
./pkg/ctrl/ctrl_volflux.F |
73 |
CTRL_VOLFLUX |
_RL tmparea |
|
./pkg/ctrl/ctrl_obcsbal.F |
119 |
CTRL_OBCSBAL |
tmparea= 0. d 0 |
|
./pkg/ctrl/ctrl_obcsbal.F |
72 |
CTRL_OBCSBAL |
_RL tmparea |