- Timestamp:
- 2019-12-12T09:59:50+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r12072_MERGE_OPTION2_2019/src/OCE/DOM/domain.F90
r12172 r12202 298 298 ! 299 299 ! 300 REWIND( numnam_ref ) ! Namelist namrun in reference namelist : Parameters of the run301 300 READ ( numnam_ref, namrun, IOSTAT = ios, ERR = 901) 302 301 901 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namrun in reference namelist' ) 303 REWIND( numnam_cfg ) ! Namelist namrun in configuration namelist : Parameters of the run304 302 READ ( numnam_cfg, namrun, IOSTAT = ios, ERR = 902 ) 305 303 902 IF( ios > 0 ) CALL ctl_nam ( ios , 'namrun in configuration namelist' ) … … 395 393 #endif 396 394 397 REWIND( numnam_ref ) ! Namelist namdom in reference namelist : space & time domain (bathymetry, mesh, timestep)398 395 READ ( numnam_ref, namdom, IOSTAT = ios, ERR = 903) 399 396 903 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namdom in reference namelist' ) 400 REWIND( numnam_cfg ) ! Namelist namdom in configuration namelist : space & time domain (bathymetry, mesh, timestep)401 397 READ ( numnam_cfg, namdom, IOSTAT = ios, ERR = 904 ) 402 398 904 IF( ios > 0 ) CALL ctl_nam ( ios , 'namdom in configuration namelist' ) … … 426 422 #if defined key_netcdf4 427 423 ! ! NetCDF 4 case ("key_netcdf4" defined) 428 REWIND( numnam_ref ) ! Namelist namnc4 in reference namelist : NETCDF429 424 READ ( numnam_ref, namnc4, IOSTAT = ios, ERR = 907) 430 425 907 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namnc4 in reference namelist' ) 431 REWIND( numnam_cfg ) ! Namelist namnc4 in configuration namelist : NETCDF432 426 READ ( numnam_cfg, namnc4, IOSTAT = ios, ERR = 908 ) 433 427 908 IF( ios > 0 ) CALL ctl_nam ( ios , 'namnc4 in configuration namelist' )
Note: See TracChangeset
for help on using the changeset viewer.