Changeset 976


Ignore:
Timestamp:
2008-05-15T16:12:42+02:00 (13 years ago)
Author:
cetlod
Message:

phasing traqsr.F90 module to the new version of NEMO, see ticket 146

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/OFF_SRC/TRA/traqsr.F90

    r719 r976  
    5656      !! * Local declarations 
    5757 
    58       NAMELIST/namqsr/ ln_traqsr, xsi1 
     58      NAMELIST/nam_qsr/ ln_traqsr, xsi1 
    5959      !!---------------------------------------------------------------------- 
    6060 
    61       ! Read Namelist namqsr : ratio and length of penetration 
     61      ! Read Namelist nam_qsr : ratio and length of penetration 
    6262      ! -------------------- 
    6363      REWIND ( numnam ) 
    64       READ   ( numnam, namqsr ) 
     64      READ   ( numnam, nam_qsr ) 
    6565 
    6666      ! Parameter control and print 
Note: See TracChangeset for help on using the changeset viewer.