8.3
general documentation
Loading...
Searching...
No Matches
cpincl Module Reference

Functions/Subroutines

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

Variables

double precision epsicp
integer npotcp
 maximal number of tabulation points
integer(c_int), pointer, save ncharb
 Number of coals.
integer(c_int), pointer, save i_comb_drift
 coal with drift (0: without drift (default), 1: with)
integer(c_int), dimension(:), pointer, save nclpch
 Number of classes per coal.
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]
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