My Project
programmer's documentation
Functions/Subroutines | Variables
cpincl Module Reference

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
 

Function/Subroutine Documentation

◆ cp_models_init()

subroutine cpincl::cp_models_init ( )

Initialize Fortran combustion models properties API. This maps Fortran pointers to global C variables.

Variable Documentation

◆ a1

double precision, dimension(ncharm), save a1

◆ a1ch

double precision, dimension (ncharm), save a1ch

◆ a2

double precision, dimension(ncharm), save a2

◆ a2ch

double precision, dimension (ncharm), save a2ch

◆ ahetc2

double precision, dimension(ncharm), save ahetc2

◆ ahetch

double precision, dimension(ncharm), save ahetch

◆ ahetwt

double precision, dimension(ncharm), save ahetwt

◆ alpha

double precision, dimension (ncharm), save alpha

◆ b1

double precision, dimension(ncharm), save b1

◆ b2

double precision, dimension(ncharm), save b2

◆ beta

double precision, dimension (ncharm), save beta

◆ c1

double precision, dimension(ncharm), save c1

◆ c2

double precision, dimension(ncharm), save c2

◆ cch

double precision, dimension (ncharm), save cch

◆ cck

double precision, dimension (ncharm), save cck

◆ chx1

double precision, dimension(ncharm), save chx1

◆ chx2

double precision, dimension(ncharm), save chx2

◆ cp2ch

double precision, dimension (ncharm), save cp2ch

◆ cp2wat

double precision, dimension(ncharm), save cp2wat

◆ cpashc

double precision, dimension(ncharm), save cpashc

◆ crepn1

double precision, dimension(2,ncharm), save crepn1

◆ crepn2

double precision, dimension(2,ncharm), save crepn2

◆ d1

double precision, dimension(ncharm), save d1

◆ d2

double precision, dimension(ncharm), save d2

◆ delta

double precision, dimension (ncharm), save delta

◆ dia2mn

real(c_double), dimension(:), pointer, save dia2mn

◆ diam20

real(c_double), dimension(:), pointer, save diam20

◆ distch

double precision, dimension(nozppm,ncharm,ncpcmx), save distch

◆ e1

double precision, dimension(ncharm), save e1

◆ e1ch

double precision, dimension (ncharm), save e1ch

◆ e2

double precision, dimension(ncharm), save e2

◆ e2ch

double precision, dimension (ncharm), save e2ch

◆ eh0sol

double precision, dimension(nsolim), save eh0sol

◆ ehetc2

double precision, dimension(ncharm), save ehetc2

◆ ehetch

double precision, dimension(ncharm), save ehetch

◆ ehetwt

double precision, dimension(ncharm), save ehetwt

◆ ehsoli

double precision, dimension(nsolim,npot), save ehsoli

◆ epsicp

double precision epsicp

◆ f1

double precision, dimension(ncharm), save f1

◆ f2

double precision, dimension(ncharm), save f2

◆ gamma

double precision, dimension (ncharm), save gamma

◆ h02ch

double precision, dimension (ncharm), save h02ch

◆ h0ashc

double precision, dimension(ncharm), save h0ashc

◆ hch

double precision, dimension (ncharm), save hch

◆ hck

double precision, dimension (ncharm), save hck

◆ iash

integer, dimension(ncharm), save iash

◆ ich

integer, dimension(ncharm), save ich

◆ ichcor

integer(c_int), dimension(:), pointer, save ichcor

◆ ichx1

integer, save ichx1

◆ ichx1c

integer, dimension(ncharm), save ichx1c

◆ ichx1f1

integer, save ichx1f1

◆ ichx2

integer, save ichx2

◆ ichx2c

integer, dimension(ncharm), save ichx2c

◆ ichx2f2

integer, save ichx2f2

◆ ick

integer, dimension(ncharm), save ick

◆ ico

integer, save ico

◆ ico2

integer(c_int), pointer, save ico2

◆ icof1

integer, save icof1

◆ icof2

integer, save icof2

◆ ientat

integer, dimension(nozppm), save ientat

◆ ientcp

integer, dimension(nozppm), save ientcp

◆ if1mc

integer, dimension(ncharm), save if1mc

◆ if2mc

integer, dimension(ncharm), save if2mc

◆ ih2o

integer(c_int), pointer, save ih2o

◆ ih2of1

integer, save ih2of1

◆ ih2of2

integer, save ih2of2

◆ ih2sf1

integer, save ih2sf1

◆ ih2sf2

integer, save ih2sf2

◆ ihcnf1

integer, save ihcnf1

◆ ihcnf2

integer, save ihcnf2

◆ in2

integer, save in2

◆ io2

integer, save io2

◆ iochet

integer, dimension (ncharm), save iochet

◆ ioetc2

integer, dimension(ncharm), save ioetc2

◆ ioetwt

integer, dimension(ncharm), save ioetwt

◆ iwat

integer, dimension(ncharm), save iwat

◆ ix1mc

integer, save ix1mc

◆ ix2mc

integer, save ix2mc

◆ iy1ch

integer, dimension (ncharm), save iy1ch

◆ iy2ch

integer, dimension (ncharm), save iy2ch

◆ kappa

double precision, dimension(ncharm), save kappa

◆ nch

double precision, dimension(ncharm), save nch

◆ ncharb

integer, save ncharb

Number of coals.

◆ nck

double precision, dimension(ncharm), save nck

◆ nclacp

integer(c_int), pointer, save nclacp

◆ nclpch

integer, dimension(ncharm), save nclpch

Number of classes per coal.

◆ npoc

integer, save npoc

◆ nsolid

integer, save nsolid

◆ nsolim

integer nsolim

◆ och

double precision, dimension (ncharm), save och

◆ ock

double precision, dimension (ncharm), save ock

◆ omega

double precision, dimension(ncharm), save omega

◆ pcich

double precision, dimension (ncharm), save pcich

◆ pcick

double precision, dimension (ncharm), save pcick

◆ qimpat

double precision, dimension(nozppm), save qimpat

◆ qimpcp

double precision, dimension(nozppm,ncharm), save qimpcp

◆ rho0ch

double precision, dimension(ncharm), save rho0ch

◆ rho20

real(c_double), dimension (:), pointer, save rho20

◆ rho2mn

real(c_double), dimension(:), pointer, save rho2mn

◆ rhock

double precision, dimension (ncharm), save rhock

◆ sch

double precision, dimension(ncharm), save sch

◆ sck

double precision, dimension (ncharm), save sck

◆ teta

double precision, dimension(ncharm), save teta

◆ thc

double precision, dimension(npot), save thc

◆ thcdch

double precision, dimension(ncharm), save thcdch

◆ timpat

double precision, dimension(nozppm), save timpat

◆ timpcp

double precision, dimension(nozppm,ncharm), save timpcp

◆ wmols

double precision, dimension(nsolim), save wmols

◆ x20

double precision, dimension(nozppm,nclcpm), save x20

◆ xashch

real(c_double), dimension(:), pointer, save xashch

◆ xmash

real(c_double), dimension (:), pointer, save xmash

◆ xmp0

real(c_double), dimension(:), pointer, save xmp0

◆ xwatch

double precision, dimension(ncharm), save xwatch

◆ y1ch

double precision, dimension (ncharm), save y1ch

◆ y2ch

double precision, dimension (ncharm), save y2ch

◆ zeta

double precision, dimension(ncharm), save zeta