- Timestamp:
- 2016-10-28T11:13:57+02:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r6999_CONFIGMAN_1/NEMOGCM/TOOLS/SIREN/src/create_bathy.f90
r7025 r7153 46 46 !> - cn_varcfg : variable configuration file 47 47 !> (see ./SIREN/cfg/variable.cfg) 48 !> - cn_dimcfg : dimension configuration file. define dimension allowed to 49 !> be used (see ./SIREN/cfg/dimension.cfg). 48 50 !> - cn_dumcfg : useless (dummy) configuration file, for useless 49 51 !> dimension or variable (see ./SIREN/cfg/dummy.cfg). … … 134 136 !> @date February, 2016 135 137 !> - do not closed sea for east-west cyclic domain 138 !> @date October, 2016 139 !> - dimension to be used select from configuration file 136 140 ! 137 141 !> @todo … … 219 223 ! namcfg 220 224 CHARACTER(LEN=lc) :: cn_varcfg = './cfg/variable.cfg' 225 CHARACTER(LEN=lc) :: cn_dimcfg = './cfg/dimension.cfg' 221 226 CHARACTER(LEN=lc) :: cn_dumcfg = './cfg/dummy.cfg' 222 227 … … 249 254 NAMELIST /namcfg/ & !< configuration namelist 250 255 & cn_varcfg, & !< variable configuration file 256 & cn_dimcfg, & !< dimension configuration file 251 257 & cn_dumcfg !< dummy configuration file 252 258 … … 308 314 ! get variable extra information 309 315 CALL var_def_extra(TRIM(cn_varcfg)) 316 317 ! get dimension allowed 318 CALL dim_def_extra(TRIM(cn_dimcfg)) 310 319 311 320 ! get dummy variable … … 615 624 CALL mpp_clean(tl_coord1) 616 625 CALL mpp_clean(tl_coord0) 626 CALL var_clean_extra() 617 627 618 628 ! close log file
Note: See TracChangeset
for help on using the changeset viewer.