/[MITgcm]/MITgcm_contrib/dgoldberg/streamice/STREAMICE.h
ViewVC logotype

Diff of /MITgcm_contrib/dgoldberg/streamice/STREAMICE.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.10 by heimbach, Mon Oct 1 23:45:14 2012 UTC revision 1.15 by dgoldberg, Wed Oct 10 02:26:48 2012 UTC
# Line 1  Line 1 
1  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1--+-+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
2    
3  #ifdef ALLOW_STREAMICE  #ifdef ALLOW_STREAMICE
4    
# Line 12  C     -------------------------- REAL PA Line 12  C     -------------------------- REAL PA
12       & streamice_nonlin_tol_fp,       & streamice_nonlin_tol_fp,
13       & streamice_CFL_factor, streamice_adjDump,       & streamice_CFL_factor, streamice_adjDump,
14       & streamice_bg_surf_slope_x, streamice_bg_surf_slope_y,       & streamice_bg_surf_slope_x, streamice_bg_surf_slope_y,
15       & streamice_kx_b_init, streamice_ky_b_init       & streamice_kx_b_init, streamice_ky_b_init,
16         & streamice_wgt_drift, streamice_wgt_surf    
17        _RL streamice_density, streamice_density_ocean_avg        _RL streamice_density, streamice_density_ocean_avg
18        _RL A_glen_isothermal, n_glen, eps_glen_min        _RL A_glen_isothermal, n_glen, eps_glen_min
19        _RL C_basal_fric_const        _RL C_basal_fric_const
# Line 25  C     -------------------------- REAL PA Line 26  C     -------------------------- REAL PA
26        _RL streamice_adjDump        _RL streamice_adjDump
27        _RL streamice_bg_surf_slope_x, streamice_bg_surf_slope_y        _RL streamice_bg_surf_slope_x, streamice_bg_surf_slope_y
28        _RL streamice_kx_b_init, streamice_ky_b_init        _RL streamice_kx_b_init, streamice_ky_b_init
29          _RL streamice_wgt_drift, streamice_wgt_surf    
30          
31                
32  C     parms for parameterized initial thickness  C     parms for parameterized initial thickness
33  C     SHELF_MAX_DRAFT: max thickness of ice in m  C     SHELF_MAX_DRAFT: max thickness of ice in m
# Line 215  C    REAL ARRAYS Line 218  C    REAL ARRAYS
218       &     streamice_u_surf, streamice_v_surf,       &     streamice_u_surf, streamice_v_surf,
219       &     visc_streamice_full, streamice_omega, streamice_basal_geom,       &     visc_streamice_full, streamice_omega, streamice_basal_geom,
220       &     streamice_vert_shear_uz, streamice_vert_shear_vz,       &     streamice_vert_shear_uz, streamice_vert_shear_vz,
221         &     streamice_sigma_coord, streamice_delsigma,
222         &     H_streamice_prev
223    
224  #ifdef USE_ALT_RLOW  #ifdef USE_ALT_RLOW
225       &     R_low_si,        COMMON /STREAMICE_RLOW/
226         &     R_low_si
227  #endif  #endif
228       &     streamice_sigma_coord, streamice_delsigma  
229    
230        _RL H_streamice           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL H_streamice           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
231        _RL U_streamice           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL U_streamice           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 241  C    REAL ARRAYS Line 248  C    REAL ARRAYS
248        _RL R_low_si    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL R_low_si    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
249  #endif  #endif
250    
       COMMON /STREAMICE_COST_RL/  
      &       cost_func1_streamice  
       _RL cost_func1_streamice(nSx,nSy)  
   
251  C      The following arrays are used for the hybrid stress balance        C      The following arrays are used for the hybrid stress balance      
252                
253        _RL streamice_taubx (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL streamice_taubx (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 264  C      The following arrays are used for Line 267  C      The following arrays are used for
267  !! IMPORTANT: MELT RATE IN METERS PER YEAR  !! IMPORTANT: MELT RATE IN METERS PER YEAR
268  !! POSITIVE WHERE MELTING  !! POSITIVE WHERE MELTING
269        _RL BDOT_streamice (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL BDOT_streamice (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
270                _RL H_streamice_prev (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
271        _RL STREAMICE_dummy_array (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL STREAMICE_dummy_array (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
272                
273          
274              
275          COMMON /STREAMICE_COST_RL/
276         &       cost_func1_streamice
277          _RL cost_func1_streamice(nSx,nSy)
278          
279  C    NOTES :  C    NOTES :
280  C      REAL ARRAYS THAT COMPRISE "STATE":  C      REAL ARRAYS THAT COMPRISE "STATE":
281  C       H_streamice,  C       H_streamice,
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.15
  ViewVC Help
Powered by ViewVC 1.1.22