IMEXSfloW  1.0
templategithubproject
 All Classes Files Functions Variables Pages
parameters.f90
Go to the documentation of this file.
1 !*********************************************************************
3 !
6 !*********************************************************************
7 MODULE parameters
8 
9  IMPLICIT NONE
10 
11  REAL*8 :: eps_newton
13  REAL*8 :: max_dt
14  REAL*8 :: cfl
15 
16  REAL*8 :: eps_sing
17 
18  REAL*8 :: reconstr_coeff
19 
20 
25  INTEGER :: reconstr_variables
26 
31  LOGICAL :: interfaces_relaxation
32 
37  LOGICAL :: batimetry_function_flag
38 
43  LOGICAL :: riemann_flag
44 
45  INTEGER, PARAMETER :: n_vars = 2
46  INTEGER, PARAMETER :: n_eqns = n_vars
47 
48  INTEGER :: n_nh
49 
50  INTEGER :: n_RK
51 
52  INTEGER, PARAMETER :: max_nl_iter = 100
53 
54  REAL*8, PARAMETER :: tol_abs = 1.D-5
55  REAL*8, PARAMETER :: tol_rel = 1.D-5
56 
63  INTEGER :: limiter(n_vars)
64 
70  CHARACTER(LEN=20) :: solver_scheme
71 
72  REAL*8 :: theta
73  REAL*8 :: t_start
74  REAL*8 :: t_end
75  REAL*8 :: t_output
76  REAL*8 :: dt_output
77 
78  INTEGER :: verbose_level
79 
80  TYPE bc
81  INTEGER :: flag
82  REAL*8 :: value
83  END TYPE bc
84 
85  ! -------boundary conditions variables
86 
95  TYPE(bc) :: bcL(n_vars)
96 
105  TYPE(bc) :: bcR(n_vars)
106 
107 END MODULE parameters
Parameters.
Definition: parameters.f90:7