1 |
|
C $Header$ |
2 |
|
C $Name$ |
3 |
|
|
4 |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
5 |
|
|
6 |
#ifdef ALLOW_STREAMICE |
#ifdef ALLOW_STREAMICE |
7 |
|
|
8 |
COMMON /STREAMICE_CG_FIELDS_RL/ |
COMMON /STREAMICE_CG_FIELDS_RL/ |
9 |
& taudx_SI, taudy_SI, |
& taudx_SI, taudy_SI, |
10 |
& Ru_SI, Rv_SI, Zu_SI, Zv_SI, |
& Ru_SI, Rv_SI, Zu_SI, Zv_SI, |
11 |
& DIAGu_SI, DIAGv_SI, RHSu_SI, RHSv_SI, |
& DIAGu_SI, DIAGv_SI, RHSu_SI, RHSv_SI, |
12 |
& ubd_SI, vbd_SI, Au_SI, Av_SI, Du_SI, Dv_SI, |
& ubd_SI, vbd_SI, Au_SI, Av_SI, Du_SI, Dv_SI, |
13 |
& u_old_SI, v_old_SI, Zu_old_SI, Zv_old_SI, |
& u_old_SI, v_old_SI, Zu_old_SI, Zv_old_SI, |
14 |
& Ru_old_SI, Rv_old_SI, |
& Ru_old_SI, Rv_old_SI, |
15 |
& k1AtC_str, |
& k1AtC_str, |
16 |
& k2AtC_str, |
& k2AtC_str, |
32 |
_RL Au_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Au_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
33 |
_RL Av_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Av_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
34 |
_RL Du_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Du_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
35 |
_RL Dv_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Dv_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
36 |
_RL u_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL u_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
37 |
_RL v_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL v_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
38 |
_RL Zu_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Zu_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
39 |
_RL Zv_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Zv_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
40 |
_RL Ru_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Ru_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
41 |
_RL Rv_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Rv_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
42 |
|
|
43 |
COMMON /STREAMICE_CG_FIELDS2_RL/ |
COMMON /STREAMICE_CG_FIELDS2_RL/ |
44 |
& streamice_cg_A1, |
& streamice_cg_A1, |
45 |
& streamice_cg_A2, |
& streamice_cg_A2, |
46 |
& streamice_cg_A3, |
& streamice_cg_A3, |
61 |
_RL DPhi (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,4,4,2) |
_RL DPhi (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,4,4,2) |
62 |
_RL grid_jacq_streamice (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,4) |
_RL grid_jacq_streamice (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,4) |
63 |
_RL Xquad (2) |
_RL Xquad (2) |
64 |
|
|
65 |
|
|
66 |
#endif /* ALLOW_STREAMICE */ |
#endif /* ALLOW_STREAMICE */ |
67 |
|
|
68 |
CEH3 ;;; Local Variables: *** |
CEH3 ;;; Local Variables: *** |