33 |
common /g_dynvars_cd/ |
common /g_dynvars_cd/ |
34 |
& g_uveld, g_vveld, |
& g_uveld, g_vveld, |
35 |
& g_etanm1, |
& g_etanm1, |
36 |
& g_unm1, g_vnm1, |
& g_unm1, g_vnm1 |
|
& g_gucd, g_gvcd |
|
37 |
_RL g_uveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
_RL g_uveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
38 |
_RL g_vveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
_RL g_vveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
39 |
_RL g_etanm1(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
_RL g_etanm1(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
40 |
_RL g_unm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
_RL g_unm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
41 |
_RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
_RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
|
_RL g_gucd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
|
|
_RL g_gvcd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |
|
42 |
#endif |
#endif |
43 |
|
|
44 |
common /g_ffields/ |
common /g_ffields/ |