Changeset 12549


Ignore:
Timestamp:
2020-03-13T15:11:44+01:00 (9 months ago)
Author:
smasson
Message:

trunk: fix compilation bug for ABL/sbcabl.F90, see #2411

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/ABL/sbcabl.F90

    r12489 r12549  
    7575      !!--------------------------------------------------------------------- 
    7676 
    77       REWIND( numnam_ref )              ! Namelist namsbc_abl in reference namelist : ABL parameters 
     77      ! Namelist namsbc_abl in reference namelist : ABL parameters 
    7878      READ  ( numnam_ref, namsbc_abl, IOSTAT = ios, ERR = 901 ) 
    7979901   IF( ios /= 0 ) CALL ctl_nam ( ios , 'namsbc_abl in reference namelist' ) 
    80       ! 
    81       REWIND( numnam_cfg )              ! Namelist namsbc_abl in configuration namelist : ABL parameters 
     80      ! Namelist namsbc_abl in configuration namelist : ABL parameters 
    8281      READ  ( numnam_cfg, namsbc_abl, IOSTAT = ios, ERR = 902 ) 
    8382902   IF( ios /= 0 ) CALL ctl_nam ( ios , 'namsbc_abl in configuration namelist' ) 
Note: See TracChangeset for help on using the changeset viewer.