This repository was archived by the owner on Aug 28, 2024. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 0
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Experimenting with using f2py to build a direct Python module to the …
…driver rather than using subprocess
- Loading branch information
Showing
2 changed files
with
26 additions
and
2 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,24 @@ | ||
subroutine driver(integrator, param_file_name, display_style) | ||
|
||
!! author: David A. Minton | ||
!! | ||
!! Driver program for the Swiftest integrators. Unlike the earlier Swift and Swifter drivers, in Swiftest all integrators | ||
!! are run from this single program. | ||
!! | ||
!! Adapted from Swifter by David E. Kaufmann's Swifter driver programs swifter_[bs,helio,ra15,rmvs,symba,tu4,whm].f90 | ||
!! Adapted from Hal Levison and Martin Duncan's Swift driver programs | ||
use swiftest | ||
implicit none | ||
|
||
! Arguments | ||
character(len=:), intent(in), allocatable :: integrator !! Symbolic code of the requested integrator | ||
character(len=:), intent(in), allocatable :: param_file_name !! Name of the input parameters file | ||
character(len=:), intent(in), allocatable :: display_style !! Style of the output display {"STANDARD", "COMPACT", "PROGRESS"}). Default is "STANDARD") | ||
!f2py intent(in) integrator | ||
!f2py intent(in) param_file_name | ||
!f2py intent(in) display_style | ||
|
||
call swiftest_driver(integrator, param_file_name, display_style) | ||
|
||
return | ||
end subroutine driver |