Changeset 1601 for trunk/NEMO/OPA_SRC/DOM/closea.F90

Timestamp:

2009-08-11T12:09:19+02:00 (15 years ago)

Author:

ctlod

Message:

Doctor naming of OPA namelist variables , see ticket: #526

File:

• trunk/NEMO/OPA_SRC/DOM/closea.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/DOM/closea.F90

@@ -32 +32 @@
    PUBLIC clo_bat      ! routine called in domzgr module
 
-   !!* Namelist namclo : closed seas and lakes
-   INTEGER, PUBLIC                     ::   nclosea =  0     !: = 0 no closed sea or lake
-      !                                                      !  = 1 closed sea or lake in the domain
-      
    INTEGER, PUBLIC, PARAMETER          ::   jpncs   = 4      !: number of closed sea
    INTEGER, PUBLIC, DIMENSION(jpncs)   ::   ncstt            !: Type of closed sea