main Program

Uses

  • program~~main~~UsesGraph program~main main module~swiftest swiftest program~main->module~swiftest globals globals module~swiftest->globals module~base base module~swiftest->module~base module~collision collision module~swiftest->module~collision module~encounter encounter module~swiftest->module~encounter module~io_progress_bar io_progress_bar module~swiftest->module~io_progress_bar module~lambda_function lambda_function module~swiftest->module~lambda_function module~netcdf_io netcdf_io module~swiftest->module~netcdf_io module~operators operators module~swiftest->module~operators module~solver solver module~swiftest->module~solver module~walltime walltime module~swiftest->module~walltime module~base->globals module~coarray coarray module~base->module~coarray module~collision->globals module~collision->module~base module~collision->module~encounter module~encounter->globals module~encounter->module~base module~encounter->module~netcdf_io module~io_progress_bar->globals module~io_progress_bar->module~base module~lambda_function->globals module~netcdf_io->globals module~netcdf_io->module~base module~operators->globals module~solver->globals module~solver->module~base module~solver->module~lambda_function ieee_exceptions ieee_exceptions module~solver->ieee_exceptions module~walltime->globals module~walltime->module~base module~coarray->globals

This is used as a wrapper for the swiftest_driver subroutine so that the driver can be used as either a function call or a standalone executable program.


Calls

program~~main~~CallsGraph program~main main interface~swiftest_driver swiftest_driver program~main->interface~swiftest_driver interface~swiftest_io_get_args swiftest_io_get_args program~main->interface~swiftest_io_get_args proc~base_util_exit base_util_exit program~main->proc~base_util_exit

Variables

Type Attributes Name Initial
character(len=:), allocatable :: display_style

{“PROGRESS”, “CLASSIC”, “QUIET”, “COMPACT”}). Default is “PROGRESS”

character(len=:), allocatable :: integrator

Integrator type code (see globals for symbolic names)
character(len=:), allocatable :: param_file_name

Name of the file containing user-defined parameters

Source Code

program main
   !! author: David A. Minton
   !!
   !! This is used as a wrapper for the swiftest_driver subroutine so that the driver can be used as either
   !! a function call or a standalone executable program.
   use swiftest
   implicit none

   character(len=:), allocatable :: integrator    
         !! Integrator type code (see globals for symbolic names)
   character(len=:), allocatable :: param_file_name 
         !! Name of the file containing user-defined parameters
   character(len=:), allocatable :: display_style 
         !! {"PROGRESS", "CLASSIC", "QUIET", "COMPACT"}). 
         !! Default is "PROGRESS"   

   call swiftest_io_get_args(integrator, param_file_name, display_style, from_cli=.true.)
   call swiftest_driver(integrator, param_file_name, display_style)
   call base_util_exit(SUCCESS)

end program main