MFIX  2016-1
param_mod.f
Go to the documentation of this file.
1 ! -*- f90 -*-
2  MODULE param
3 
4 ! Parameters describing problem size: (set from user input)
5 !'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
6 ! Number of partitions in axial direction
7  INTEGER :: dimension_i ! X-Axis
8  INTEGER :: dimension_j ! Y-Axis
9  INTEGER :: dimension_k ! Z-Axis
10 ! Number of computational cells
11  INTEGER :: dimension_3 !
12  INTEGER :: dimension_3l ! Local subdomain
13  INTEGER :: dimension_3g ! Global
14  INTEGER :: dimension_3p ! POST_MFIX
15 ! Number of computational cells for higher order schemes
16  INTEGER :: dimension_4
17 ! Total number of solids phases
18  INTEGER :: dimension_m
19 ! Maximum number of species.
20  INTEGER :: dimension_n_g ! Gas
21  INTEGER :: dimension_n_s ! Solids
22 ! Maximum number of user-defined scalars
23  INTEGER :: dimension_scalar
24  INTEGER :: dim_scalar2
25 
26 ! Definitions for sparse matrix
27 !'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
28 ! East
29  INTEGER :: east
30  parameter(east = 1)
31 
32 ! West
33  INTEGER :: west
34  parameter(west =-1)
35 
36 ! North
37  INTEGER :: north
38  parameter(north = 2)
39 
40 ! South
41  INTEGER :: south
42  parameter(south =-2)
43 
44 ! Top
45  INTEGER :: top
46  parameter(top = 3)
47 
48 ! Bottom
49  INTEGER :: bottom
50  parameter(bottom =-3)
51 
52 ! Parameters limiting user-specifed input.
53 !'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
54 ! Maximum number of reactions defined in data file
55  INTEGER, PARAMETER :: dimension_rxn = 100
56 ! Number of user defined constants
57  INTEGER, PARAMETER :: dimension_c = 500
58 ! Maximum number of items for specifying initial conditions
59  INTEGER, PARAMETER :: dimension_ic = 500
60 ! Maximum number of items for specifying boundary conditions
61  INTEGER, PARAMETER :: dimension_bc = 500
62 ! Maximum number of items for specifying internal surfaces.
63  INTEGER, PARAMETER :: dimension_is = 500
64 ! Maximum number of items for specifying point sources
65  INTEGER, PARAMETER :: dimension_ps = 5000
66 ! Maximum number of solids phases
67  INTEGER, PARAMETER :: dim_m = 10
68 ! Maximum number of gas species
69  INTEGER, PARAMETER :: dim_n_g = 100
70 ! Maximum number of solids species per phase.
71  INTEGER, PARAMETER :: dim_n_s = 100
72 ! Maximum of DIM_N_g and DIM_N_s
73  INTEGER, PARAMETER :: dim_n = max(dim_n_g, dim_n_s)
74 ! Maximum number of species.
75  INTEGER, PARAMETER :: dim_n_all = 2*dim_n
76 ! Maximum of the number of cells in the x direction.
77  INTEGER, PARAMETER :: dim_i = 5000
78 ! Maximum of the number of cells in the y direction.
79  INTEGER, PARAMETER :: dim_j = 5000
80 ! Maximum of the number of cells in the z direction.
81  INTEGER, PARAMETER :: dim_k = 5000
82 ! Maximum number of user-defined output files
83  INTEGER, PARAMETER :: dimension_usr = 5
84 ! Maximum of the number of scalars that can be read
85  INTEGER, PARAMETER :: dim_scalar = 100
86 ! Number of Equation types:
87 ! 1) Gas pressure
88 ! 2) Solids volume fraction
89 ! 3) Gas and solids U-Momentum equation
90 ! 4) Gas and solids V-Momentum equation
91 ! 5) Gas and solids W-Momentum equation
92 ! 6) Temperature
93 ! 7) Species Mass Fractions
94 ! 8) Granular Temperature
95 ! 9) User-defined scalar
96 ! 10) DES Diffusion
97  INTEGER, PARAMETER :: dim_eqs = 10
98 
99  CONTAINS
100  SUBROUTINE filler
101  IMPLICIT NONE
102  ! empty subroutine so param is accessible from pymfix
103  END SUBROUTINE filler
104 
105  END MODULE param
integer, parameter dimension_c
Definition: param_mod.f:57
integer dimension_i
Definition: param_mod.f:7
integer, parameter dim_n_g
Definition: param_mod.f:69
integer, parameter dimension_ic
Definition: param_mod.f:59
integer, parameter dim_i
Definition: param_mod.f:77
integer, parameter dimension_is
Definition: param_mod.f:63
integer, parameter dimension_rxn
Definition: param_mod.f:55
integer, parameter dim_n
Definition: param_mod.f:73
integer dimension_3
Definition: param_mod.f:11
integer dimension_n_g
Definition: param_mod.f:20
integer dimension_k
Definition: param_mod.f:9
integer, parameter dim_scalar
Definition: param_mod.f:85
integer, parameter dim_eqs
Definition: param_mod.f:97
integer, parameter dim_m
Definition: param_mod.f:67
integer, parameter dimension_bc
Definition: param_mod.f:61
integer east
Definition: param_mod.f:29
integer, parameter dimension_usr
Definition: param_mod.f:83
integer dimension_3l
Definition: param_mod.f:12
integer, parameter dim_j
Definition: param_mod.f:79
integer dimension_3g
Definition: param_mod.f:13
integer dimension_4
Definition: param_mod.f:16
integer north
Definition: param_mod.f:37
integer south
Definition: param_mod.f:41
subroutine filler
Definition: param_mod.f:101
integer dim_scalar2
Definition: param_mod.f:24
Definition: param_mod.f:2
integer, parameter dimension_ps
Definition: param_mod.f:65
integer dimension_3p
Definition: param_mod.f:14
integer west
Definition: param_mod.f:33
integer, parameter dim_n_s
Definition: param_mod.f:71
integer top
Definition: param_mod.f:45
integer dimension_scalar
Definition: param_mod.f:23
integer, parameter dim_n_all
Definition: param_mod.f:75
integer dimension_n_s
Definition: param_mod.f:21
integer, parameter dim_k
Definition: param_mod.f:81
integer dimension_m
Definition: param_mod.f:18
integer bottom
Definition: param_mod.f:49
integer dimension_j
Definition: param_mod.f:8