Ignore:
Timestamp:
2019-10-09T15:02:14+02:00 (19 months ago)
Author:
acc
Message:

Branch 2019/dev_r11613_ENHANCE-04_namelists_as_internalfiles. Final, non-substantive changes to complete this branch. These changes remove all REWIND statements on the old namelist fortran units (now character variables for internal files). These changes have been left until last since they are easily repeated via a script and it may be preferable to use the previous revision for merge purposes and reapply these last changes separately. This branch has been fully SETTE tested.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/dev_r11613_ENHANCE-04_namelists_as_internalfiles/src/TOP/TRP/trcldf.F90

    r11536 r11671  
    143143      ENDIF 
    144144      ! 
    145       REWIND( numnat_ref )             !  namtrc_ldf in reference namelist  
    146145      READ  ( numnat_ref, namtrc_ldf, IOSTAT = ios, ERR = 903) 
    147146903   IF( ios /= 0 )   CALL ctl_nam ( ios , 'namtrc_ldf in reference namelist' ) 
    148147      ! 
    149       REWIND( numnat_cfg )             !  namtrc_ldf in configuration namelist  
    150148      READ  ( numnat_cfg, namtrc_ldf, IOSTAT = ios, ERR = 904 ) 
    151149904   IF( ios >  0 )   CALL ctl_nam ( ios , 'namtrc_ldf in configuration namelist' ) 
Note: See TracChangeset for help on using the changeset viewer.