1 |
c |
2 |
c Plumes State Common - State variables on plumes grid |
3 |
c ---------------------------------------------------------------------- |
4 |
common /plumes_state/ uplume,thplume |
5 |
|
6 |
_RL uplume(sNx,sNy,Nhplume,Nrplume,Nsx) |
7 |
_RL thplume(sNx,sNy,Nhplume,Nrplume,Nsx) |
8 |
|
9 |
c Plumes Tendency Common - Changes in state variables due to plumes |
10 |
c ---------------------------------------------------------------------- |
11 |
common /plumes_tendency/ duplume,dthplume |
12 |
|
13 |
_RL duplume(sNx,sNy,Nhplume,Nrplume,Nsx) |
14 |
_RL dthplume(sNx,sNy,Nhplume,Nrplume,Nsx) |
15 |
|
16 |
c Plumes Exports Common - plumes variables on other grids for export |
17 |
c ---------------------------------------------------------------------- |
18 |
common /plumes_exports/ guplume,gvplume,gthplume |
19 |
|
20 |
_RL guplume(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
21 |
_RL gvplume(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |
22 |
_RL gthplume(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,Nsx,Nsy) |