8.3
general documentation
cpincl Module Reference

Functions/Subroutines

subroutine cp_model_map_coal ()
 Initialize Fortran combustion models properties API. This maps Fortran pointers to global C variables. More...
 

Variables

double precision epsicp
 
integer npotcp
 maximal number of tabulation points More...
 
integer(c_int), pointer, save ncharb
 Number of coals. More...
 
integer(c_int), pointer, save i_comb_drift
 coal with drift (0: without drift (default), 1: with) More...
 
integer(c_int), dimension(:), pointer, save nclpch
 Number of classes per coal. More...
 
real(c_double), dimension(:), pointer, save cch
 
real(c_double), dimension(:), pointer, save hch
 
real(c_double), dimension(:), pointer, save och
 
real(c_double), dimension(:), pointer, save sch
 
real(c_double), dimension(:), pointer, save nch
 
real(c_double), dimension(:), pointer, save pcich
 
real(c_double), dimension(:), pointer, save rho0ch
 
real(c_double), dimension(:), pointer, save thcdch
 
real(c_double), dimension(:), pointer, save cck
 
real(c_double), dimension(:), pointer, save hck
 
real(c_double), dimension(:), pointer, save ock
 
real(c_double), dimension(:), pointer, save sck
 
real(c_double), dimension(:), pointer, save nck
 
real(c_double), dimension(:), pointer, save rhock
 
real(c_double), dimension(:), pointer, save pcick
 
real(c_double), dimension(:), pointer, save cpashc
 
real(c_double), dimension(:), pointer, save h0ashc
 
real(c_double), dimension(:), pointer, save h02ch
 
real(c_double), dimension(:,:), pointer, save crepn1
 
real(c_double), dimension(:,:), pointer, save crepn2
 
real(c_double), dimension(:), pointer, save cp2ch
 
real(c_double), dimension(:), pointer, save xashsec
 
real(c_double), dimension(:), pointer, save xashch
 
real(c_double), dimension(:), pointer, save xwatch
 
integer(c_int), dimension(:), pointer, save iy1ch
 
integer(c_int), dimension(:), pointer, save iy2ch
 
integer(c_int), dimension(:), pointer, save iochet
 
integer(c_int), dimension(:), pointer, save ioetc2
 
integer(c_int), dimension(:), pointer, save ioetwt
 
real(c_double), dimension(:), pointer, save y1ch
 
real(c_double), dimension(:), pointer, save a1ch
 
real(c_double), dimension(:), pointer, save e1ch
 
real(c_double), dimension(:), pointer, save y2ch
 
real(c_double), dimension(:), pointer, save a2ch
 
real(c_double), dimension(:), pointer, save e2ch
 
real(c_double), dimension(:), pointer, save ahetch
 
real(c_double), dimension(:), pointer, save ehetch
 
real(c_double), dimension(:), pointer, save ahetc2
 
real(c_double), dimension(:), pointer, save ehetc2
 
real(c_double), dimension(:), pointer, save ahetwt
 
real(c_double), dimension(:), pointer, save ehetwt
 
integer nsolim
 
integer(c_int), pointer, save nsolid
 
integer(c_int), dimension(:), pointer, save ich
 
integer(c_int), dimension(:), pointer, save ick
 
integer(c_int), dimension(:), pointer, save iash
 
integer(c_int), dimension(:), pointer, save iwat
 
real(c_double), dimension(:,:), pointer, save ehsoli
 
real(c_double), dimension(:), pointer, save wmols
 
real(c_double), dimension(:), pointer, 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(c_int), pointer, save ico
 
integer(c_int), pointer, save ico2
 
integer(c_int), pointer, save ih2o
 
integer(c_int), pointer, save io2
 
integer(c_int), pointer, save in2
 
integer(c_int), dimension(:), pointer, save ichx1c
 
integer(c_int), dimension(:), pointer, save ichx2c
 
integer(c_int), pointer, save ichx1
 
integer(c_int), pointer, save ichx2
 
real(c_double), dimension(:), pointer, save chx1
 
real(c_double), dimension(:), pointer, save chx2
 
real(c_double), dimension(:), pointer, save a1
 
real(c_double), dimension(:), pointer, save b1
 
real(c_double), dimension(:), pointer, save c1
 
real(c_double), dimension(:), pointer, save d1
 
real(c_double), dimension(:), pointer, save e1
 
real(c_double), dimension(:), pointer, save f1
 
real(c_double), dimension(:), pointer, save a2
 
real(c_double), dimension(:), pointer, save b2
 
real(c_double), dimension(:), pointer, save c2
 
real(c_double), dimension(:), pointer, save d2
 
real(c_double), dimension(:), pointer, save e2
 
real(c_double), dimension(:), pointer, save f2
 
integer(c_int), pointer, save ihgas
 
integer(c_int), dimension(:), pointer, save if1m
 
integer(c_int), dimension(:), pointer, save if2m
 
integer(c_int), pointer, save if4m
 
integer(c_int), pointer, save if5m
 
integer(c_int), pointer, save if6m
 
integer(c_int), pointer, save if7m
 
integer(c_int), pointer, save if8m
 
integer(c_int), pointer, save if9m
 
integer(c_int), pointer, save ifvp2m
 
integer(c_int), dimension(:), pointer, save ixck
 
integer(c_int), dimension(:), pointer, save ixch
 
integer(c_int), dimension(:), pointer, save inp
 
integer(c_int), dimension(:), pointer, save ih2
 
integer(c_int), dimension(:), pointer, save ixwt
 
integer(c_int), dimension(:), pointer, save iym1
 
integer(c_int), pointer, save irom1
 
integer(c_int), pointer, save immel
 
integer(c_int), dimension(:), pointer, save itemp2
 
integer(c_int), dimension(:), pointer, save irom2
 
integer(c_int), dimension(:), pointer, save idiam2
 
integer(c_int), dimension(:), pointer, save ix2
 
integer(c_int), dimension(:), pointer, save igmdch
 
integer(c_int), dimension(:), pointer, save igmhet
 
integer(c_int), dimension(:), pointer, save igmtr
 
integer(c_int), dimension(:), pointer, save ighco2
 
integer(c_int), dimension(:), pointer, save igmdv1
 
integer(c_int), dimension(:), pointer, save igmdv2
 
integer(c_int), dimension(:), pointer, save igmsec
 
integer(c_int), pointer, save ibcarbone
 
integer(c_int), pointer, save iboxygen
 
integer(c_int), pointer, save ibhydrogen
 
real(c_double), dimension(:,:), pointer, save ehgaze
 engaze(ij) is the massic enthalpy (J/kg) of the i-th elementary gas component at temperature th[j] More...
 
integer(c_int), pointer, save ihy
 
integer(c_int), pointer, save ih2s
 
integer(c_int), pointer, save iso2
 
integer(c_int), pointer, save ihcn
 
integer(c_int), pointer, save inh3
 
integer(c_int), pointer, save noxyd
 
real(c_double), dimension(:), pointer, save af3
 
real(c_double), dimension(:), pointer, save af4
 
real(c_double), dimension(:), pointer, save af5
 
real(c_double), dimension(:), pointer, save af6
 
real(c_double), dimension(:), pointer, save af7
 
real(c_double), dimension(:), pointer, save af8
 
real(c_double), dimension(:), pointer, save af9
 
integer(c_int), pointer, save ieqnox
 
integer(c_int), pointer, save imdnox
 
integer(c_int), pointer, save irb
 
integer(c_int), pointer, save ihtco2
 
integer(c_int), pointer, save ieqco2
 
integer(c_int), pointer, save iyco2
 
integer(c_int), pointer, save iyhcn
 
integer(c_int), pointer, save iyno
 
integer(c_int), pointer, save iynh3
 
integer(c_int), pointer, save ihox
 
integer(c_int), pointer, save ighcn1
 
integer(c_int), pointer, save ighcn2
 
integer(c_int), pointer, save ignoth
 
integer(c_int), pointer, save ignh31
 
integer(c_int), pointer, save ignh32
 
integer(c_int), pointer, save ifhcnd
 
integer(c_int), pointer, save ifhcnc
 
integer(c_int), pointer, save ifnh3d
 
integer(c_int), pointer, save ifnh3c
 
integer(c_int), pointer, save ifnohc
 
integer(c_int), pointer, save ifnonh
 
integer(c_int), pointer, save ifnoch
 
integer(c_int), pointer, save ifnoth
 
integer(c_int), pointer, save ifhcnr
 
integer(c_int), pointer, save icnohc
 
integer(c_int), pointer, save icnonh
 
integer(c_int), pointer, save icnorb
 
integer(c_int), pointer, save igrb
 

Function/Subroutine Documentation

◆ cp_model_map_coal()

subroutine cp_model_map_coal

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

Variable Documentation

◆ a1

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

◆ a1ch

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

◆ a2

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

◆ a2ch

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

◆ af3

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

◆ af4

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

◆ af5

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

◆ af6

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

◆ af7

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

◆ af8

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

◆ af9

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

◆ ahetc2

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

◆ ahetch

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

◆ ahetwt

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

◆ b1

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

◆ b2

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

◆ c1

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

◆ c2

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

◆ cch

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

◆ cck

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

◆ chx1

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

◆ chx2

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

◆ cp2ch

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

◆ cpashc

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

◆ crepn1

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

◆ crepn2

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

◆ d1

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

◆ d2

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

◆ dia2mn

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

◆ diam20

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

◆ e1

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

◆ e1ch

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

◆ e2

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

◆ e2ch

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

◆ eh0sol

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

◆ ehetc2

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

◆ ehetch

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

◆ ehetwt

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

◆ ehgaze

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

engaze(ij) is the massic enthalpy (J/kg) of the i-th elementary gas component at temperature th[j]

◆ ehsoli

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

◆ epsicp

double precision epsicp

◆ f1

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

◆ f2

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

◆ h02ch

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

◆ h0ashc

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

◆ hch

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

◆ hck

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

◆ i_comb_drift

integer(c_int), pointer, save i_comb_drift

coal with drift (0: without drift (default), 1: with)

◆ iash

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

◆ ibcarbone

integer(c_int), pointer, save ibcarbone

◆ ibhydrogen

integer(c_int), pointer, save ibhydrogen

◆ iboxygen

integer(c_int), pointer, save iboxygen

◆ ich

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

◆ ichcor

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

◆ ichx1

integer(c_int), pointer, save ichx1

◆ ichx1c

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

◆ ichx2

integer(c_int), pointer, save ichx2

◆ ichx2c

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

◆ ick

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

◆ icnohc

integer(c_int), pointer, save icnohc

◆ icnonh

integer(c_int), pointer, save icnonh

◆ icnorb

integer(c_int), pointer, save icnorb

◆ ico

integer(c_int), pointer, save ico

◆ ico2

integer(c_int), pointer, save ico2

◆ idiam2

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

◆ ieqco2

integer(c_int), pointer, save ieqco2

◆ ieqnox

integer(c_int), pointer, save ieqnox

◆ if1m

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

◆ if2m

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

◆ if4m

integer(c_int), pointer, save if4m

◆ if5m

integer(c_int), pointer, save if5m

◆ if6m

integer(c_int), pointer, save if6m

◆ if7m

integer(c_int), pointer, save if7m

◆ if8m

integer(c_int), pointer, save if8m

◆ if9m

integer(c_int), pointer, save if9m

◆ ifhcnc

integer(c_int), pointer, save ifhcnc

◆ ifhcnd

integer(c_int), pointer, save ifhcnd

◆ ifhcnr

integer(c_int), pointer, save ifhcnr

◆ ifnh3c

integer(c_int), pointer, save ifnh3c

◆ ifnh3d

integer(c_int), pointer, save ifnh3d

◆ ifnoch

integer(c_int), pointer, save ifnoch

◆ ifnohc

integer(c_int), pointer, save ifnohc

◆ ifnonh

integer(c_int), pointer, save ifnonh

◆ ifnoth

integer(c_int), pointer, save ifnoth

◆ ifvp2m

integer(c_int), pointer, save ifvp2m

◆ ighcn1

integer(c_int), pointer, save ighcn1

◆ ighcn2

integer(c_int), pointer, save ighcn2

◆ ighco2

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

◆ igmdch

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

◆ igmdv1

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

◆ igmdv2

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

◆ igmhet

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

◆ igmsec

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

◆ igmtr

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

◆ ignh31

integer(c_int), pointer, save ignh31

◆ ignh32

integer(c_int), pointer, save ignh32

◆ ignoth

integer(c_int), pointer, save ignoth

◆ igrb

integer(c_int), pointer, save igrb

◆ ih2

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

◆ ih2o

integer(c_int), pointer, save ih2o

◆ ih2s

integer(c_int), pointer, save ih2s

◆ ihcn

integer(c_int), pointer, save ihcn

◆ ihgas

integer(c_int), pointer, save ihgas

◆ ihox

integer(c_int), pointer, save ihox

◆ ihtco2

integer(c_int), pointer, save ihtco2

◆ ihy

integer(c_int), pointer, save ihy

◆ imdnox

integer(c_int), pointer, save imdnox

◆ immel

integer(c_int), pointer, save immel

◆ in2

integer(c_int), pointer, save in2

◆ inh3

integer(c_int), pointer, save inh3

◆ inp

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

◆ io2

integer(c_int), pointer, save io2

◆ iochet

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

◆ ioetc2

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

◆ ioetwt

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

◆ irb

integer(c_int), pointer, save irb

◆ irom1

integer(c_int), pointer, save irom1

◆ irom2

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

◆ iso2

integer(c_int), pointer, save iso2

◆ itemp2

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

◆ iwat

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

◆ ix2

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

◆ ixch

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

◆ ixck

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

◆ ixwt

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

◆ iy1ch

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

◆ iy2ch

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

◆ iyco2

integer(c_int), pointer, save iyco2

◆ iyhcn

integer(c_int), pointer, save iyhcn

◆ iym1

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

◆ iynh3

integer(c_int), pointer, save iynh3

◆ iyno

integer(c_int), pointer, save iyno

◆ nch

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

◆ ncharb

integer(c_int), pointer, save ncharb

Number of coals.

◆ nck

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

◆ nclacp

integer(c_int), pointer, save nclacp

◆ nclpch

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

Number of classes per coal.

◆ noxyd

integer(c_int), pointer, save noxyd

◆ npotcp

integer npotcp

maximal number of tabulation points

◆ nsolid

integer(c_int), pointer, save nsolid

◆ nsolim

integer nsolim

◆ och

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

◆ ock

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

◆ pcich

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

◆ pcick

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

◆ rho0ch

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

◆ rho20

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

◆ rho2mn

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

◆ rhock

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

◆ sch

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

◆ sck

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

◆ thcdch

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

◆ wmols

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

◆ xashch

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

◆ xashsec

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

◆ xmash

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

◆ xmp0

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

◆ xwatch

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

◆ y1ch

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

◆ y2ch

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