New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 1089 – NEMO

Changeset 1089


Ignore:
Timestamp:
2008-06-09T10:33:47+02:00 (16 years ago)
Author:
cetlod
Message:

rename the namelists of TOP , see ticket:204

Location:
trunk/NEMO/TOP_SRC
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/TOP_SRC/CFC/trclsm_cfc.F90

    r1070 r1089  
    4141      !! ** input   :   Namelist namcfc 
    4242      !!---------------------------------------------------------------------- 
    43       CHARACTER (len=32) ::   clname = 'namelist.sms.cfc' 
     43      CHARACTER (len=32) ::   clname = 'namelist_cfc' 
    4444      INTEGER ::   numnat 
    4545      !! 
  • trunk/NEMO/TOP_SRC/LOBSTER/trclsm_lobster.F90

    r1071 r1089  
    6262      !                               ! Open the namelist file 
    6363      !                               ! ---------------------- 
    64       clname ='namelist.sms.lobster' 
     64      clname ='namelist_lobster' 
    6565      CALL ctlopn( numnat, clname, 'OLD', 'FORMATTED', 'SEQUENTIAL',   & 
    6666         &           1, numout, .FALSE., 1 ) 
  • trunk/NEMO/TOP_SRC/PISCES/trclsm_pisces.F90

    r1073 r1089  
    6161      !                               ! Open the namelist file 
    6262      !                               ! ---------------------- 
    63       clname ='namelist.sms.pisces' 
     63      clname ='namelist_pisces' 
    6464      CALL ctlopn( numnat, clname, 'OLD', 'FORMATTED', 'SEQUENTIAL',   & 
    6565         &           1, numout, .FALSE., 1 ) 
  • trunk/NEMO/TOP_SRC/trclec.F90

    r1077 r1089  
    9292      IF(lwp) WRITE(numout,*) '~~~~~~~' 
    9393 
    94       clname = 'namelist.passivetrc' 
     94      clname = 'namelist_top' 
    9595      CALL ctlopn( numnat, clname, 'OLD', 'FORMATTED', 'SEQUENTIAL',   & 
    9696         &         1, numout, .FALSE., 1 ) 
Note: See TracChangeset for help on using the changeset viewer.