/[MITgcm]/manual/s_phys_pkgs/text/seaice.tex
ViewVC logotype

Diff of /manual/s_phys_pkgs/text/seaice.tex

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

revision 1.6 by heimbach, Tue Jan 15 23:58:53 2008 UTC revision 1.7 by heimbach, Thu Jan 17 22:32:38 2008 UTC
# Line 197  c  seaice_model (TOP LEVEL ROUTINE) Line 197  c  seaice_model (TOP LEVEL ROUTINE)
197  c  |  c  |
198  c  |-- #ifdef SEAICE_CGRID  c  |-- #ifdef SEAICE_CGRID
199  c  |     SEAICE_DYNSOLVER  c  |     SEAICE_DYNSOLVER
200    c  |     |
201    c  |     |-- < compute proxy for geostrophic velocity >
202    c  |     |
203    c  |     |-- < set up mass per unit area and Coriolis terms >
204    c  |     |
205    c  |     |-- < dynamic masking of areas with no ice >
206    c  |     |
207    c  |     |
208    
209  c  |   #ELSE  c  |   #ELSE
210  c  |     DYNSOLVER  c  |     DYNSOLVER
211  c  |   #ENDIF  c  |   #ENDIF
212  c  |  c  |
213  c  ...  c  |-- if ( useOBCS )
214    c  |     OBCS_APPLY_UVICE
215    c  |
216    c  |-- if ( SEAICEadvHeff .OR. SEAICEadvArea .OR. SEAICEadvSnow .OR. SEAICEadvSalt )
217    c  |     SEAICE_ADVDIFF
218    c  |
219    c  |-- if ( usePW79thermodynamics )
220    c  |     SEAICE_GROWTH
221    c  |
222    c  |-- if ( useOBCS )
223    c  |     if ( SEAICEadvHeff ) OBCS_APPLY_HEFF
224    c  |     if ( SEAICEadvArea ) OBCS_APPLY_AREA
225    c  |     if ( SEAICEadvSALT ) OBCS_APPLY_HSALT
226    c  |     if ( SEAICEadvSNOW ) OBCS_APPLY_HSNOW
227    c  |
228    c  |-- < do various exchanges >
229    c  |
230    c  |-- < do additional diagnostics >
231    c  |
232    c  o
233    
234  \end{verbatim}  \end{verbatim}
235  }  }
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22