Changeset 894 for trunk/NEMO/LIM_SRC_3/ice.F90
- Timestamp:
- 2008-04-21T14:36:04+02:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/LIM_SRC_3/ice.F90
r888 r894 455 455 !!-------------------------------------------------------------------------- 456 456 ! REMOVE 457 INTEGER (wp), PUBLIC, DIMENSION(jpl) :: & !:457 INTEGER, PUBLIC, DIMENSION(jpl) :: & !: 458 458 ice_types !: Vector making the connection between types and categories 459 459 460 INTEGER (wp), PUBLIC, DIMENSION(jpm,2) :: & !:460 INTEGER, PUBLIC, DIMENSION(jpm,2) :: & !: 461 461 ice_cat_bounds !: Matrix containing the integer upper and 462 462 !: lower boundaries of ice thickness categories 463 463 464 464 ! REMOVE 465 INTEGER (wp), PUBLIC, DIMENSION(jpm) :: & !:465 INTEGER, PUBLIC, DIMENSION(jpm) :: & !: 466 466 ice_ncat_types !: Vector containing the number of thickness categories in each ice type 467 467
Note: See TracChangeset
for help on using the changeset viewer.