8 use constants
, only: dp
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
integer divwall
number of grid points in wall
integer, dimension(:), allocatable solmodel
solubility model
real(dp), dimension(:), allocatable xg
molar fractions of gases
real(dp), dimension(:), allocatable sheetsg
gas solubility in sheet
integer divcell
number of grid points in cell
real(dp) rhop
polymer density
real(dp) temp
temperature (K)
real(dp) tbeg
time at the end
real(dp) eps
foam porosity
integer, dimension(:), allocatable diffmodel
diffusivity model
real(dp), dimension(:), allocatable pbg
boundary conditions
real(dp), dimension(:), allocatable pressure
partial pressure(Pa)
real(dp), dimension(:), allocatable dg
gas diffusiviy in polymer
real(dp) dfoam
foam thickness
real(dp) rhof
foam density
integer nroutputs
number of outer endme steps
real(dp) fstrut
strut content
real(dp), dimension(:), allocatable sheetdg
gas diffusivity in sheet
integer divsheet
number of grid points in sheet
real(dp), dimension(:), allocatable sg
gas solubility in polymer
integer ncell
number of cells
real(dp) dsheet
sheet thickness
real(dp) temp_cond
temperature of conductivity measurements
namespace with global variables
logical sheet
determines if sheet is used on the outside of the foam
real(dp) dgas
gas diffusivity in gasphase
real(dp) dwall
wall thickness