Changeset 888 for trunk/NEMO/LIM_SRC_3/ice.F90
- Timestamp:
- 2008-04-11T19:05:03+02:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/LIM_SRC_3/ice.F90
r834 r888 9 9 !!---------------------------------------------------------------------- 10 10 !! LIM 3.0, UCL-LOCEAN-IPSL (2005) 11 !! $ Header: /home/opalod/NEMOCVSROOT/NEMO/LIM_SRC/ice.F90,v 1.4 2005/03/27 18:34:41 opalod Exp$11 !! $ Id: $ 12 12 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 13 13 !!---------------------------------------------------------------------- … … 493 493 diag_bot_me, & ! vertical bottom melt 494 494 diag_sur_me ! vertical surface melt 495 INTEGER , PUBLIC :: & !: indexes of the debugging 496 jiindex, & ! point 497 jjindex 495 INTEGER , PUBLIC :: jiindx, jjindx !: indexes of the debugging point 498 496 499 497 #else
Note: See TracChangeset
for help on using the changeset viewer.