File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -93,10 +93,26 @@ module m_global_parameters
9393 logical , parameter :: igr_pres_lim = (${igr_pres_lim}$ /= 0 ) !< Limit to positive pressures for IGR
9494 logical , parameter :: viscous = (${viscous}$ /= 0 ) !< Viscous effects
9595 #:else
96- integer :: weno_polyn !< Degree of the WENO polynomials (polyn)
97- integer :: muscl_polyn !< Degree of the MUSCL polynomials (polyn)i
98- integer :: weno_num_stencils !< Number of stencils for WENO reconstruction (only different from weno_polyn for TENO(>5 ))
99- logical :: wenojs !< WENO- JS (default)
96+ integer :: recon_type
97+ integer :: weno_polyn
98+ integer :: muscl_polyn
99+ integer :: weno_order
100+ integer :: muscl_order
101+ integer :: weno_num_stencils
102+ integer :: muscl_lim
103+ integer :: num_fluids
104+ logical :: wenojs
105+ logical :: mapped_weno
106+ logical :: wenoz
107+ logical :: teno
108+ real (wp) :: wenoz_q
109+ logical :: mhd
110+ logical :: relativity
111+ integer :: igr_iter_solver
112+ integer :: igr_order
113+ logical :: igr
114+ logical :: igr_pres_lim
115+ logical :: viscous
100116 #:endif
101117
102118 $:GPU_DECLARE(create= ' [int_comp, ic_eps, ic_beta]' )
@@ -254,6 +270,8 @@ module m_global_parameters
254270 !> @{
255271 #:if MFC_CASE_OPTIMIZATION
256272 integer , parameter :: nb = ${nb}$ !< Number of eq. bubble sizes
273+ #:else
274+ integer :: nb
257275 #:endif
258276
259277 real (wp) :: Eu !< Euler number
You can’t perform that action at this time.
0 commit comments