| 1 | dgoldberg | 1.3 | C $Header: /u/gcmpack/MITgcm/pkg/streamice/STREAMICE_CG.h,v 1.2 2013/06/21 20:49:50 jmc Exp $ | 
| 2 |  |  | C $Name:  $ | 
| 3 |  |  |  | 
| 4 | heimbach | 1.1 | C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| | 
| 5 |  |  |  | 
| 6 |  |  | #ifdef ALLOW_STREAMICE | 
| 7 |  |  |  | 
| 8 | dgoldberg | 1.3 | COMMON /STREAMICE_CG_FIELDS_RL/ | 
| 9 | heimbach | 1.1 | &     taudx_SI, taudy_SI, | 
| 10 |  |  | &     Ru_SI, Rv_SI, Zu_SI, Zv_SI, | 
| 11 |  |  | &     DIAGu_SI, DIAGv_SI, RHSu_SI, RHSv_SI, | 
| 12 |  |  | &     ubd_SI, vbd_SI, Au_SI, Av_SI, Du_SI, Dv_SI, | 
| 13 | dgoldberg | 1.3 | &     u_old_SI, v_old_SI, Zu_old_SI, Zv_old_SI, | 
| 14 | heimbach | 1.1 | &     Ru_old_SI, Rv_old_SI, | 
| 15 |  |  | &     k1AtC_str, | 
| 16 |  |  | &     k2AtC_str, | 
| 17 |  |  | &     DPhi, | 
| 18 |  |  | &     grid_jacq_streamice, | 
| 19 |  |  | &     Xquad | 
| 20 |  |  | _RL taudx_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 21 |  |  | _RL taudy_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 22 |  |  | _RL Rv_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 23 |  |  | _RL Ru_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 24 |  |  | _RL Zu_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 25 |  |  | _RL Zv_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 26 |  |  | _RL DIAGu_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 27 |  |  | _RL DIAGv_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 28 |  |  | _RL RHSu_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 29 |  |  | _RL RHSv_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 30 |  |  | _RL ubd_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 31 |  |  | _RL vbd_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 32 |  |  | _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) | 
| 34 |  |  | _RL Du_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 35 | dgoldberg | 1.3 | _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) | 
| 37 |  |  | _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) | 
| 39 |  |  | _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) | 
| 41 | heimbach | 1.1 | _RL Rv_old_SI (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 42 |  |  |  | 
| 43 | dgoldberg | 1.3 | COMMON /STREAMICE_CG_FIELDS2_RL/ | 
| 44 | heimbach | 1.1 | &     streamice_cg_A1, | 
| 45 |  |  | &     streamice_cg_A2, | 
| 46 |  |  | &     streamice_cg_A3, | 
| 47 |  |  | &     streamice_cg_A4 | 
| 48 |  |  | _RL streamice_cg_A1 | 
| 49 |  |  | &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,-1:1,-1:1) | 
| 50 |  |  | _RL streamice_cg_A2 | 
| 51 |  |  | &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,-1:1,-1:1) | 
| 52 |  |  | _RL streamice_cg_A3 | 
| 53 |  |  | &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,-1:1,-1:1) | 
| 54 |  |  | _RL streamice_cg_A4 | 
| 55 |  |  | &    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,-1:1,-1:1) | 
| 56 |  |  |  | 
| 57 |  |  | c     THE FOLLOWING ARRAYS ARE FIXED FOR A SIMULATION (depend only on grid) | 
| 58 | dgoldberg | 1.2 | c     BUT ARE HERE BECAUSE THEY ARE USED EXCLUSIVELY BY THE MATRIX SOLUTION | 
| 59 | heimbach | 1.1 | _RL k1AtC_str (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 60 |  |  | _RL k2AtC_str (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) | 
| 61 |  |  | _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) | 
| 63 |  |  | _RL Xquad (2) | 
| 64 | dgoldberg | 1.3 |  | 
| 65 |  |  |  | 
| 66 | heimbach | 1.1 | #endif /* ALLOW_STREAMICE */ | 
| 67 |  |  |  | 
| 68 |  |  | CEH3 ;;; Local Variables: *** | 
| 69 |  |  | CEH3 ;;; mode:fortran *** | 
| 70 |  |  | CEH3 ;;; End: *** |