Changeset 11960 for NEMO/branches/2019/dev_r11943_MERGE_2019/src/TOP/TRP
- Timestamp:
- 2019-11-25T18:19:39+01:00 (5 years ago)
- Location:
- NEMO/branches/2019/dev_r11943_MERGE_2019
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11943_MERGE_2019
- Property svn:externals
-
old new 3 3 ^/utils/build/mk@HEAD mk 4 4 ^/utils/tools@HEAD tools 5 ^/vendors/AGRIF/dev @HEAD ext/AGRIF5 ^/vendors/AGRIF/dev_r11615_ENHANCE-04_namelists_as_internalfiles_agrif@HEAD ext/AGRIF 6 6 ^/vendors/FCM@HEAD ext/FCM 7 7 ^/vendors/IOIPSL@HEAD ext/IOIPSL
-
- Property svn:externals
-
NEMO/branches/2019/dev_r11943_MERGE_2019/src/TOP/TRP/trcadv.F90
r11949 r11960 166 166 ! 167 167 ! !== Namelist ==! 168 REWIND( numnat_ref ) ! namtrc_adv in reference namelist169 168 READ ( numnat_ref, namtrc_adv, IOSTAT = ios, ERR = 901) 170 169 901 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namtrc_adv in reference namelist' ) 171 REWIND( numnat_cfg ) ! namtrc_adv in configuration namelist172 170 READ ( numnat_cfg, namtrc_adv, IOSTAT = ios, ERR = 902 ) 173 171 902 IF( ios > 0 ) CALL ctl_nam ( ios , 'namtrc_adv in configuration namelist' ) -
NEMO/branches/2019/dev_r11943_MERGE_2019/src/TOP/TRP/trcdmp.F90
r11949 r11960 183 183 !!---------------------------------------------------------------------- 184 184 ! 185 REWIND( numnat_ref ) ! Namelist namtrc_dmp in reference namelist : Passive tracers newtonian damping186 185 READ ( numnat_ref, namtrc_dmp, IOSTAT = ios, ERR = 909) 187 186 909 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namtrc_dmp in reference namelist' ) 188 REWIND( numnat_cfg ) ! Namelist namtrc_dmp in configuration namelist : Passive tracers newtonian damping189 187 READ ( numnat_cfg, namtrc_dmp, IOSTAT = ios, ERR = 910) 190 188 910 IF( ios > 0 ) CALL ctl_nam ( ios , 'namtrc_dmp in configuration namelist' ) -
NEMO/branches/2019/dev_r11943_MERGE_2019/src/TOP/TRP/trcldf.F90
r11949 r11960 149 149 ENDIF 150 150 ! 151 REWIND( numnat_ref ) ! namtrc_ldf in reference namelist152 151 READ ( numnat_ref, namtrc_ldf, IOSTAT = ios, ERR = 903) 153 152 903 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namtrc_ldf in reference namelist' ) 154 153 ! 155 REWIND( numnat_cfg ) ! namtrc_ldf in configuration namelist156 154 READ ( numnat_cfg, namtrc_ldf, IOSTAT = ios, ERR = 904 ) 157 155 904 IF( ios > 0 ) CALL ctl_nam ( ios , 'namtrc_ldf in configuration namelist' ) -
NEMO/branches/2019/dev_r11943_MERGE_2019/src/TOP/TRP/trcrad.F90
r11949 r11960 90 90 !!---------------------------------------------------------------------- 91 91 ! 92 REWIND( numnat_ref ) ! namtrc_rad in reference namelist93 92 READ ( numnat_ref, namtrc_rad, IOSTAT = ios, ERR = 907) 94 93 907 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namtrc_rad in reference namelist' ) 95 REWIND( numnat_cfg ) ! namtrc_rad in configuration namelist96 94 READ ( numnat_cfg, namtrc_rad, IOSTAT = ios, ERR = 908 ) 97 95 908 IF( ios > 0 ) CALL ctl_nam ( ios , 'namtrc_rad in configuration namelist' ) -
NEMO/branches/2019/dev_r11943_MERGE_2019/src/TOP/TRP/trcsink.F90
r11949 r11960 218 218 !!---------------------------------------------------------------------- 219 219 ! 220 REWIND( numnat_ref ) ! namtrc_rad in reference namelist221 220 READ ( numnat_ref, namtrc_snk, IOSTAT = ios, ERR = 907) 222 221 907 IF( ios /= 0 ) CALL ctl_nam ( ios , 'namtrc_snk in reference namelist' ) 223 REWIND( numnat_cfg ) ! namtrc_rad in configuration namelist224 222 READ ( numnat_cfg, namtrc_snk, IOSTAT = ios, ERR = 908 ) 225 223 908 IF( ios > 0 ) CALL ctl_nam ( ios , 'namtrc_snk in configuration namelist' )
Note: See TracChangeset
for help on using the changeset viewer.