MoDeNa  1.0
Software framework facilitating sequential multi-scale modelling
globals.f90
Go to the documentation of this file.
1 
7 module globals
8  use constants, only: dp
9  implicit none
10  logical :: sheet
11  integer :: nroutputs
12  integer :: divwall
13  integer :: divcell
14  integer :: divsheet
15  integer :: ncell
16  integer, dimension(:), allocatable :: solmodel
17  integer, dimension(:), allocatable :: diffmodel
18  real(dp) :: tend
19  real(dp) :: tbeg
20  real(dp) :: dcell
21  real(dp) :: dwall
22  real(dp) :: dfoam
23  real(dp) :: dsheet
24  real(dp) :: temp
25  real(dp) :: temp_cond
26  real(dp) :: pressure
27  real(dp) :: fstrut
28  real(dp) :: rhof
29  real(dp) :: rhop
30  real(dp) :: eps
31  real(dp) :: dgas
32  real(dp), dimension(:), allocatable :: sg
33  real(dp), dimension(:), allocatable :: dg
34  real(dp), dimension(:), allocatable :: sheetsg
35  real(dp), dimension(:), allocatable :: sheetdg
36  real(dp), dimension(:), allocatable :: xg
37  real(dp), dimension(:), allocatable :: pbg
38 end module globals
real(dp) dcell
cell size
Definition: globals.f90:20
integer divwall
number of grid points in wall
Definition: globals.f90:12
integer, dimension(:), allocatable solmodel
solubility model
Definition: globals.f90:16
real(dp), dimension(:), allocatable xg
molar fractions of gases
Definition: globals.f90:36
real(dp), dimension(:), allocatable sheetsg
gas solubility in sheet
Definition: globals.f90:34
integer divcell
number of grid points in cell
Definition: globals.f90:13
real(dp) rhop
polymer density
Definition: globals.f90:49
real(dp) temp
temperature (K)
Definition: globals.f90:49
real(dp) tbeg
time at the end
Definition: globals.f90:19
real(dp) eps
foam porosity
Definition: globals.f90:30
integer, dimension(:), allocatable diffmodel
diffusivity model
Definition: globals.f90:17
real(dp), dimension(:), allocatable pbg
boundary conditions
Definition: globals.f90:37
real(dp), dimension(:), allocatable pressure
partial pressure(Pa)
Definition: globals.f90:106
real(dp), dimension(:), allocatable dg
gas diffusiviy in polymer
Definition: globals.f90:33
real(dp) dfoam
foam thickness
Definition: globals.f90:22
real(dp) rhof
foam density
Definition: globals.f90:28
integer nroutputs
number of outer endme steps
Definition: globals.f90:11
real(dp) fstrut
strut content
Definition: globals.f90:27
real(dp), dimension(:), allocatable sheetdg
gas diffusivity in sheet
Definition: globals.f90:35
integer divsheet
number of grid points in sheet
Definition: globals.f90:14
real(dp), dimension(:), allocatable sg
gas solubility in polymer
Definition: globals.f90:32
integer ncell
number of cells
Definition: globals.f90:15
real(dp) dsheet
sheet thickness
Definition: globals.f90:23
real(dp) temp_cond
temperature of conductivity measurements
Definition: globals.f90:25
namespace with global variables
Definition: globals.f90:8
logical sheet
determines if sheet is used on the outside of the foam
Definition: globals.f90:10
real(dp) dgas
gas diffusivity in gasphase
Definition: globals.f90:31
real(dp) dwall
wall thickness
Definition: globals.f90:21
double tend
end time, s