scale-dg.F90

Go to the documentation of this file.

!-------------------------------------------------------------------------------
!-------------------------------------------------------------------------------
program scaledg
  !-----------------------------------------------------------------------------
  !
  !++ used modules
  !
  use mod_dg_launcher
  !-----------------------------------------------------------------------------
  implicit none
  !-----------------------------------------------------------------------------
  !
  !++ included parameters
  !
  !-----------------------------------------------------------------------------
  !
  !++ parameters & variables
  !
  !=============================================================================
 
  logical               :: execute_preprocess           = .false. ! execute preprocess tools?
  logical               :: execute_model                = .true.  ! execute main model?
 
  !-----------------------------------------------------------
 
  call launcher( execute_preprocess, & ! (in)
                 execute_model       ) ! (in)
 
  stop
end program scaledg