module CONVERT driver More...

Functions/Subroutines
subroutine, public	convert_setup
	Setup. More...

subroutine, public	convert
	Driver. More...

Detailed Description

module CONVERT driver

Description: administrator of convert tools

Author: Team SCALE

NAMELIST

PARAM_CONVERT

name type default value comment

CONVERT_TOPO logical .false.

CONVERT_LANDUSE logical .false.

CONVERT_2D logical .false.

History Output: No history output

Function/Subroutine Documentation

◆ convert_setup()

subroutine, public mod_convert::convert_setup ( )

Setup.

Definition at line 52 of file mod_convert.F90.

References mod_cnv2d::cnv2d_setup(), mod_cnvlanduse::cnvlanduse_setup(), mod_cnvtopo::cnvtopo_setup(), scale_io::io_fid_conf, and scale_prc::prc_abort().

Referenced by mod_rm_prep::rm_prep().

     use scale_prc, only: &
        prc_abort
     use mod_cnvtopo, only: &
        cnvtopo_setup
     use mod_cnvlanduse, only: &
        cnvlanduse_setup
     use mod_cnv2d, only: &
        cnv2d_setup
     implicit none
 
     namelist / param_convert / &
        convert_topo,    &
        convert_landuse, &
        convert_2d
 
     integer :: ierr
     !---------------------------------------------------------------------------
 
     log_newline
     log_info("CONVERT_setup",*) 'Setup'
 
     !--- read namelist
     rewind(io_fid_conf)
     read(io_fid_conf,nml=param_convert,iostat=ierr)
     if( ierr < 0 ) then !--- missing
        log_info("CONVERT_setup",*) 'Not found namelist. Default used.'
     elseif( ierr > 0 ) then !--- fatal error
        log_error("CONVERT_setup",*) 'Not appropriate names in namelist PARAM_CONVERT. Check!'
        call prc_abort
     endif
     log_nml(param_convert)
 
     ! set up TOPO
     if( convert_topo ) then
        call cnvtopo_setup
     end if
 
     ! set up LANDUSE
     if( convert_landuse ) then
        call cnvlanduse_setup
     end if
 
     ! set up LANDUSE
     if( convert_2d ) then
        call cnv2d_setup
     end if
 
     return

Here is the call graph for this function:

Here is the caller graph for this function:

◆ convert()

subroutine, public mod_convert::convert ( )

Driver.

Definition at line 105 of file mod_convert.F90.

References mod_cnv2d::cnv2d(), mod_cnvlanduse::cnvlanduse(), mod_cnvtopo::cnvtopo(), and scale_prc::prc_abort().