/[MITgcm]/MITgcm/pkg/streamice/STREAMICE.h
ViewVC logotype

Diff of /MITgcm/pkg/streamice/STREAMICE.h

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

revision 1.9 by dgoldberg, Wed Jun 4 13:08:52 2014 UTC revision 1.10 by jmc, Sat Jun 7 16:13:17 2014 UTC
# Line 25  C     & A_glen_isothermal, n_glen, eps_g Line 25  C     & A_glen_isothermal, n_glen, eps_g
25       & streamice_adot_uniform,       & streamice_adot_uniform,
26       & streamice_forcing_period       & streamice_forcing_period
27    
   
28        _RL streamice_density, streamice_density_ocean_avg        _RL streamice_density, streamice_density_ocean_avg
29  C      _RL A_glen_isothermal, n_glen, eps_glen_min, eps_u_min  C      _RL A_glen_isothermal, n_glen, eps_glen_min, eps_u_min
30        _RL B_glen_isothermal, n_glen, eps_glen_min, eps_u_min        _RL B_glen_isothermal, n_glen, eps_glen_min, eps_u_min
# Line 44  C      _RL A_glen_isothermal, n_glen, ep Line 43  C      _RL A_glen_isothermal, n_glen, ep
43        _RL streamice_wgt_tikh        _RL streamice_wgt_tikh
44        _RL streamice_addl_backstress        _RL streamice_addl_backstress
45        _RL streamice_smooth_gl_width        _RL streamice_smooth_gl_width
46        _RL streamice_adot_uniform        _RL streamice_adot_uniform
47        _RL streamice_forcing_period        _RL streamice_forcing_period
48    
   
49  C     parms for parameterized initial thickness  C     parms for parameterized initial thickness
50  C     SHELF_MAX_DRAFT: max thickness of ice in m  C     SHELF_MAX_DRAFT: max thickness of ice in m
51  C     SHELF_MIN_DRAFT: min thickness of ice in m  C     SHELF_MIN_DRAFT: min thickness of ice in m
# Line 229  C     -------------------------- AND NOW Line 227  C     -------------------------- AND NOW
227    
228  C     EXPLANATION OF MASKS  C     EXPLANATION OF MASKS
229    
230  C     STREAMICE_hmask           VALUES  1=ice-covered cell  C     STREAMICE_hmask           VALUES  1=ice-covered cell
231  C                                       2=partially ice-covered cell (no dynamics)  C                                       2=partially ice-covered cell (no dynamics)
232  C                                       0=ice-free cell (for now, it means the cell  C                                       0=ice-free cell (for now, it means the cell
233  C                                                           is treated as an open-ocean cell  C                                                           is treated as an open-ocean cell
# Line 328  C     &     A_glen, Line 326  C     &     A_glen,
326    
327  #ifdef STREAMICE_STRESS_BOUNDARY_CONTROL  #ifdef STREAMICE_STRESS_BOUNDARY_CONTROL
328        COMMON /STREAMICE_STRESS_BOUNDARY/        COMMON /STREAMICE_STRESS_BOUNDARY/
329       &      streamice_u_normal_pert,       &      streamice_u_normal_pert,
330       &      streamice_v_normal_pert,       &      streamice_v_normal_pert,
331       &      streamice_u_shear_pert,       &      streamice_u_shear_pert,
332       &      streamice_v_shear_pert,       &      streamice_v_shear_pert,
333       &      streamice_u_normal_stress,       &      streamice_u_normal_stress,
334       &      streamice_v_normal_stress,       &      streamice_v_normal_stress,
335       &      streamice_u_shear_stress,       &      streamice_u_shear_stress,
336       &      streamice_v_shear_stress       &      streamice_v_shear_stress
# Line 347  C     &     A_glen, Line 345  C     &     A_glen,
345       &     streamice_vert_shear_uz, streamice_vert_shear_vz       &     streamice_vert_shear_uz, streamice_vert_shear_vz
346  #endif  #endif
347    
   
348  #ifdef ALLOW_STREAMICE_TIMEDEP_FORCING  #ifdef ALLOW_STREAMICE_TIMEDEP_FORCING
349        COMMON /STREAMICE_TIMEDEP_FORCE/        COMMON /STREAMICE_TIMEDEP_FORCE/
350       &      bdot_streamice0,       &      bdot_streamice0,
351       &      bdot_streamice1       &      bdot_streamice1
352  #ifdef STREAMICE_STRESS_BOUNDARY_CONTROL  #ifdef STREAMICE_STRESS_BOUNDARY_CONTROL
353       &      ,streamice_u_normal_stress0,       &      ,streamice_u_normal_stress0,
354       &      streamice_u_normal_stress1,       &      streamice_u_normal_stress1,
355       &      streamice_v_normal_stress0,       &      streamice_v_normal_stress0,
356       &      streamice_v_normal_stress1,       &      streamice_v_normal_stress1,
357       &      streamice_u_shear_stress0,       &      streamice_u_shear_stress0,
358       &      streamice_u_shear_stress1,       &      streamice_u_shear_stress1,
359       &      streamice_v_shear_stress0,       &      streamice_v_shear_stress0,
360       &      streamice_v_shear_stress1       &      streamice_v_shear_stress1
361  #endif      #endif
362  #endif  #endif
363    
364  #ifdef ALLOW_STREAMICE_2DTRACER  #ifdef ALLOW_STREAMICE_2DTRACER
# Line 380  C     &     A_glen, Line 377  C     &     A_glen,
377       &     R_low_si       &     R_low_si
378  #endif  #endif
379    
   
380        _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)
381        _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)
382        _RL V_streamice           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL V_streamice           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 468  C     The following arrays are used for Line 464  C     The following arrays are used for
464    
465  #ifdef ALLOW_STREAMICE_TIMEDEP_FORCING  #ifdef ALLOW_STREAMICE_TIMEDEP_FORCING
466  #ifdef STREAMICE_STRESS_BOUNDARY_CONTROL  #ifdef STREAMICE_STRESS_BOUNDARY_CONTROL
467          _RL streamice_u_normal_stress0        _RL streamice_u_normal_stress0
468       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
469        _RL streamice_u_normal_stress1        _RL streamice_u_normal_stress1
470       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
471        _RL streamice_v_normal_stress0        _RL streamice_v_normal_stress0
472       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 484  C     The following arrays are used for Line 480  C     The following arrays are used for
480       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
481        _RL streamice_v_shear_stress1        _RL streamice_v_shear_stress1
482       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
483  #endif      #endif
484        _RL bdot_streamice0        _RL bdot_streamice0
485       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)       &   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
486        _RL bdot_streamice1        _RL bdot_streamice1
# Line 525  C        velocity initial guess, so they Line 521  C        velocity initial guess, so they
521        INTEGER n_dofs_process (0:nPx*nPy-1)        INTEGER n_dofs_process (0:nPx*nPy-1)
522  #endif  #endif
523    
   
524  #endif /* ALLOW_STREAMICE */  #endif /* ALLOW_STREAMICE */
525    
526  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22