cpincl.f90 File Reference

Modules
module	cpincl

Functions/Subroutines
subroutine	cp_models_init
	Initialize Fortran combustion models properties API. This maps Fortran pointers to global C variables. More...

Variables
double precision	epsicp
integer, save	ncharb
	Number of coals. More...
integer, dimension(ncharm), save	nclpch
	Number of classes per coal. More...
double precision, dimension(ncharm), save	cch
double precision, dimension(ncharm), save	hch
double precision, dimension(ncharm), save	och
double precision, dimension(ncharm), save	sch
double precision, dimension(ncharm), save	nch
double precision, dimension(ncharm), save	alpha
double precision, dimension(ncharm), save	beta
double precision, dimension(ncharm), save	teta
double precision, dimension(ncharm), save	omega
double precision, dimension(ncharm), save	pcich
double precision, dimension(ncharm), save	rho0ch
double precision, dimension(ncharm), save	thcdch
double precision, dimension(ncharm), save	cck
double precision, dimension(ncharm), save	hck
double precision, dimension(ncharm), save	ock
double precision, dimension(ncharm), save	sck
double precision, dimension(ncharm), save	nck
double precision, dimension(ncharm), save	gamma
double precision, dimension(ncharm), save	delta
double precision, dimension(ncharm), save	kappa
double precision, dimension(ncharm), save	zeta
double precision, dimension(ncharm), save	rhock
double precision, dimension(ncharm), save	pcick
double precision, dimension(ncharm), save	cpashc
double precision, dimension(ncharm), save	h0ashc
double precision, dimension(ncharm), save	h02ch
double precision, dimension(ncharm), save	cp2ch
double precision, dimension(ncharm), save	xwatch
double precision, dimension(ncharm), save	cp2wat
double precision, dimension(2, ncharm), save	crepn1
double precision, dimension(2, ncharm), save	crepn2
real(c_double), dimension(:), pointer, save	xashch
integer, dimension(ncharm), save	iy1ch
integer, dimension(ncharm), save	iy2ch
integer, dimension(ncharm), save	iochet
integer, dimension(ncharm), save	ioetc2
integer, dimension(ncharm), save	ioetwt
double precision, dimension(ncharm), save	y1ch
double precision, dimension(ncharm), save	a1ch
double precision, dimension(ncharm), save	e1ch
double precision, dimension(ncharm), save	y2ch
double precision, dimension(ncharm), save	a2ch
double precision, dimension(ncharm), save	e2ch
double precision, dimension(ncharm), save	ahetch
double precision, dimension(ncharm), save	ehetch
double precision, dimension(ncharm), save	ahetc2
double precision, dimension(ncharm), save	ehetc2
double precision, dimension(ncharm), save	ahetwt
double precision, dimension(ncharm), save	ehetwt
integer	nsolim
integer, save	nsolid
integer, dimension(ncharm), save	ich
integer, dimension(ncharm), save	ick
integer, dimension(ncharm), save	iash
integer, dimension(ncharm), save	iwat
double precision, dimension(nsolim, npot), save	ehsoli
double precision, dimension(nsolim), save	wmols
double precision, dimension(nsolim), save	eh0sol
integer(c_int), pointer, save	nclacp
integer(c_int), dimension(:), pointer, save	ichcor
real(c_double), dimension(:), pointer, save	diam20
real(c_double), dimension(:), pointer, save	dia2mn
real(c_double), dimension(:), pointer, save	rho20
real(c_double), dimension(:), pointer, save	rho2mn
real(c_double), dimension(:), pointer, save	xmp0
real(c_double), dimension(:), pointer, save	xmash
integer, dimension(ncharm), save	ichx1c
integer, dimension(ncharm), save	ichx2c
integer, save	ichx1
integer, save	ichx2
integer, save	ico
integer, save	io2
integer, save	in2
integer(c_int), pointer, save	ico2
integer(c_int), pointer, save	ih2o
double precision, dimension(ncharm), save	chx1
double precision, dimension(ncharm), save	chx2
double precision, dimension(ncharm), save	a1
double precision, dimension(ncharm), save	b1
double precision, dimension(ncharm), save	c1
double precision, dimension(ncharm), save	d1
double precision, dimension(ncharm), save	e1
double precision, dimension(ncharm), save	f1
double precision, dimension(ncharm), save	a2
double precision, dimension(ncharm), save	b2
double precision, dimension(ncharm), save	c2
double precision, dimension(ncharm), save	d2
double precision, dimension(ncharm), save	e2
double precision, dimension(ncharm), save	f2
integer, dimension(nozppm), save	ientat
integer, dimension(nozppm), save	ientcp
double precision, dimension(nozppm), save	timpat
double precision, dimension(nozppm, nclcpm), save	x20
integer, dimension(ncharm), save	if1mc
integer, dimension(ncharm), save	if2mc
integer, save	ix1mc
integer, save	ix2mc
integer, save	ichx1f1
integer, save	ichx2f2
integer, save	icof1
integer, save	icof2
integer, save	ih2of1
integer, save	ih2of2
integer, save	ih2sf1
integer, save	ih2sf2
integer, save	ihcnf1
integer, save	ihcnf2
double precision, dimension(nozppm), save	qimpat
double precision, dimension(nozppm, ncharm), save	qimpcp
double precision, dimension(nozppm, ncharm), save	timpcp
double precision, dimension(nozppm, ncharm, ncpcmx), save	distch
double precision, dimension(npot), save	thc
integer, save	npoc

Detailed Description

Module for pulverized coal combustion