- Timestamp:
- 2013-11-04T12:51:55+01:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_LOCEAN_2013/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90
r3625 r4147 759 759 sn_bot5 = FLD_N( 'botmeltn5_1m' , -1. , 'botmeltn5' , .true. , .true. , ' yearly' , '' , '' ) 760 760 761 ! REWIND ( numnam ) ! ... at some point might read in from NEMO namelist? 762 ! READ ( numnam, namsbc_cice ) 761 ! ... at some point might read in from NEMO namelist? 762 !!$ REWIND( numnam_ref ) ! Namelist namsbc_cice in reference namelist : 763 !!$ READ ( numnam_ref, namsbc_cice, IOSTAT = ios, ERR = 901) 764 !!$901 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namsbc_cice in reference namelist', lwp ) 765 !!$ 766 !!$ REWIND( numnam_cfg ) ! Namelist namsbc_cice in configuration namelist : Parameters of the run 767 !!$ READ ( numnam_cfg, namsbc_cice, IOSTAT = ios, ERR = 902 ) 768 !!$902 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namsbc_cice in configuration namelist', lwp ) 769 !!$ WRITE ( numond, namsbc_cice ) 763 770 764 771 ! store namelist information in an array
Note: See TracChangeset
for help on using the changeset viewer.