7.1
general documentation
cs_gui_specific_physics.h
Go to the documentation of this file.
1 #ifndef __CS_GUI_SPECIFIC_PHYSICS_H__
2 #define __CS_GUI_SPECIFIC_PHYSICS_H__
3 
4 /*============================================================================
5  * Management of the GUI parameters file: specific physics
6  *============================================================================*/
7 
8 /*
9  This file is part of Code_Saturne, a general-purpose CFD tool.
10 
11  Copyright (C) 1998-2021 EDF S.A.
12 
13  This program is free software; you can redistribute it and/or modify it under
14  the terms of the GNU General Public License as published by the Free Software
15  Foundation; either version 2 of the License, or (at your option) any later
16  version.
17 
18  This program is distributed in the hope that it will be useful, but WITHOUT
19  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
20  FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
21  details.
22 
23  You should have received a copy of the GNU General Public License along with
24  this program; if not, write to the Free Software Foundation, Inc., 51 Franklin
25  Street, Fifth Floor, Boston, MA 02110-1301, USA.
26 */
27 
28 /*----------------------------------------------------------------------------*/
29 
30 /*----------------------------------------------------------------------------
31  * Local headers
32  *----------------------------------------------------------------------------*/
33 
34 #include "cs_base.h"
35 
36 /*----------------------------------------------------------------------------*/
37 
39 
40 /*============================================================================
41  * Type definitions
42  *============================================================================*/
43 
44 /*============================================================================
45  * Public Fortran function prototypes
46  *============================================================================*/
47 
48 /*----------------------------------------------------------------------------
49  * Density under relaxation
50  *
51  * Fortran Interface:
52  *
53  * SUBROUTINE UICPI1 (SRROM)
54  * *****************
55  * DOUBLE PRECISION SRROM <-- density relaxation
56  * DOUBLE PRECISION DIFTL0 <-- dynamic diffusion
57  *----------------------------------------------------------------------------*/
58 
59 void CS_PROCF (uicpi1, UICPI1) (double *const srrom,
60  double *const diftl0);
61 
62 /*----------------------------------------------------------------------------
63  * Temperature for D3P Gas Combustion
64  *
65  * Fortran Interface:
66  *
67  * SUBROUTINE UICPI2 (SRROM)
68  * *****************
69  * DOUBLE PRECISION Toxy <-- Oxydant temperature
70  * DOUBLE PRECISION Tfuel <-- Fuel temperature
71  *----------------------------------------------------------------------------*/
72 
73 void CS_PROCF (uicpi2, UICPI2) (double *const toxy,
74  double *const tfuel);
75 
76 /*----------------------------------------------------------------------------
77  * Atmospheric flows: read of meteorological file of data
78  *
79  * Fortran Interface:
80  *
81  * subroutine uiati1
82  * *****************
83  * char(*) fmeteo <-- meteo file name
84  * int len <-- meteo file name destination string length
85  *----------------------------------------------------------------------------*/
86 
87 void CS_PROCF (uiati1, UIATI1) (char *fmeteo,
88  int *len
90 
91 /*----------------------------------------------------------------------------
92  * Indirection between the solver numbering and the XML one
93  * for physical properties of the activated specific physics
94  * (pulverized solid fuels)
95  *----------------------------------------------------------------------------*/
96 
97 void CS_PROCF (uisofu, UISOFU) (const int *iirayo,
98  const int *ncharm,
99  int *ncharb,
100  int *nclpch,
101  int *nclacp,
102  const int *ncpcmx,
103  int *ichcor,
104  double *diam20,
105  double *cch,
106  double *hch,
107  double *och,
108  double *nch,
109  double *sch,
110  int *ipci,
111  double *pcich,
112  double *cp2ch,
113  double *rho0ch,
114  double *thcdch,
115  double *cck,
116  double *hck,
117  double *ock,
118  double *nck,
119  double *sck,
120  double *xashch,
121  double *xashsec,
122  double *xwatch,
123  double *h0ashc,
124  double *cpashc,
125  int *iy1ch,
126  double *y1ch,
127  int *iy2ch,
128  double *y2ch,
129  double *a1ch,
130  double *a2ch,
131  double *e1ch,
132  double *e2ch,
133  double *crepn1,
134  double *crepn2,
135  double *ahetch,
136  double *ehetch,
137  int *iochet,
138  double *ahetc2,
139  double *ehetc2,
140  int *ioetc2,
141  double *ahetwt,
142  double *ehetwt,
143  int *ioetwt,
144  int *ieqnox,
145  int *ieqco2,
146  int *imdnox,
147  int *irb,
148  int *ihtco2,
149  int *ihth2o,
150  double *qpr,
151  double *fn,
152  double *ckabs1,
153  int *noxyd,
154  double *oxyo2,
155  double *oxyn2,
156  double *oxyh2o,
157  double *oxyco2,
158  double *repnck,
159  double *repnle,
160  double *repnlo);
161 
162 /*----------------------------------------------------------------------------
163  * Copy name of thermophysical data file from C to Fortran
164  *----------------------------------------------------------------------------*/
165 
166 void CS_PROCF(cfnmtd, CFNMTD) (char *fstr, /* --> Fortran string */
167  int *len /* --> String Length */
169 
170 /*----------------------------------------------------------------------------
171  * groundwater model : read parameters
172  *
173  * Fortran Interface:
174  *
175  * subroutine uidai1
176  * *****************
177  * integer permeability <-- permeability type
178  * integer dispersion <-- dispersion type
179  * integer unsteady <-- steady flow
180  * integer gravity <-- check if gravity is taken into account
181  * integer unsaturated <-- take into account unsaturated zone
182  *----------------------------------------------------------------------------*/
183 
184 void CS_PROCF (uidai1, UIDAI1) (int *permeability,
185  int *dispersion,
186  int *unsteady,
187  int *gravity,
188  int *unsaturated);
189 
190 /*=============================================================================
191  * Public function prototypes
192  *============================================================================*/
193 
194 /*-----------------------------------------------------------------------------
195  * Activate specific physical models based on XML settings.
196  *----------------------------------------------------------------------------*/
197 
198 void
200 
201 /*----------------------------------------------------------------------------
202  * Electrical model: read parameters
203  *----------------------------------------------------------------------------*/
204 
205 void
206 cs_gui_elec_model(void);
207 
208 /*----------------------------------------------------------------------------
209  * Electrical model: define plane for elreca
210  *----------------------------------------------------------------------------*/
211 
212 void
214 
215 /*-----------------------------------------------------------------------------
216  * Return the name of a thermophysical model.
217  *
218  * parameter:
219  * model_thermo --> thermophysical model category
220  *----------------------------------------------------------------------------*/
221 
222 const char *
223 cs_gui_get_thermophysical_model(const char *model_thermo);
224 
225 /*----------------------------------------------------------------------------*/
226 
228 
229 #endif /* __CS_GUI_SPECIFIC_PHYSICS_H__ */
double precision, dimension(ncharm), save thcdch
Definition: cpincl.f90:99
integer ncharm
maximum number of coals
Definition: ppppar.f90:55
void cs_gui_physical_model_select(void)
Definition: cs_gui_specific_physics.c:1377
integer, dimension(ncharm), save iy2ch
Definition: cpincl.f90:150
double precision, dimension(ncharm), save cck
Definition: cpincl.f90:99
void cs_gui_elec_model_rec(void)
Definition: cs_gui_specific_physics.c:1629
double precision, dimension(ncharm), save xashsec
Definition: cs_coal_incl.f90:42
double precision, dimension(ncharm), save ahetc2
Definition: cpincl.f90:152
double precision, dimension(ncharm), save ehetc2
Definition: cpincl.f90:152
double precision, dimension(ncharm), save ahetwt
Definition: cpincl.f90:152
void uiati1(char *fmeteo, int *len CS_ARGF_SUPP_CHAINE)
integer, save ieqco2
Definition: ppcpfu.f90:63
#define BEGIN_C_DECLS
Definition: cs_defs.h:510
double precision, dimension(ncharm), save e1ch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save a1ch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save h0ashc
Definition: cpincl.f90:99
double precision, dimension(ncharm), save sch
Definition: cpincl.f90:99
double precision, dimension(3), save oxyn2
Definition: ppcpfu.f90:175
double precision, dimension(ncharm), save hck
Definition: cpincl.f90:99
double precision, dimension(3), save oxyo2
Definition: ppcpfu.f90:175
double precision, dimension(ncharm), save hch
Definition: cpincl.f90:99
double precision, dimension(3), save oxyco2
Definition: ppcpfu.f90:175
double precision, dimension(ncharm), save cp2ch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save sck
Definition: cpincl.f90:99
integer(c_int), pointer, save ncharb
Number of coals.
Definition: cpincl.f90:51
#define CS_ARGF_SUPP_CHAINE
Definition: cs_defs.h:536
integer(c_int), pointer, save iirayo
Activation of the radiative transfer module:
Definition: radiat.f90:45
double precision, dimension(ncharm), save e2ch
Definition: cpincl.f90:152
integer(c_int), dimension(:), pointer, save ichcor
Definition: cpincl.f90:195
double precision, dimension(ncharm), save y2ch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save nch
Definition: cpincl.f90:99
void cs_gui_elec_model(void)
Definition: cs_gui_specific_physics.c:1555
integer(c_int), pointer, save nclacp
Definition: cpincl.f90:183
integer, save ieqnox
Definition: ppcpfu.f90:102
double precision, dimension(ncharm), save cpashc
Definition: cpincl.f90:99
const char * cs_gui_get_thermophysical_model(const char *model_thermo)
Definition: cs_gui_specific_physics.c:1668
double precision, dimension(ncharm), save och
Definition: cpincl.f90:99
double precision, dimension(ncharm), save repnck
Definition: cs_coal_incl.f90:79
double precision, dimension(ncharm), save y1ch
Definition: cpincl.f90:152
real(c_double), pointer, save ckabs1
Absorption coefficient of gas mixture.
Definition: ppthch.f90:153
double precision, dimension(ncharm), save fn
Definition: cs_coal_incl.f90:42
double precision, dimension(ncharm), save cch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save pcich
Definition: cpincl.f90:99
integer ncpcmx
maximum number of coals classes
Definition: ppppar.f90:57
double precision, save diftl0
Definition: ppthch.f90:162
integer, dimension(ncharm), save ioetwt
Definition: cpincl.f90:151
integer, dimension(ncharm), save ioetc2
Definition: cpincl.f90:151
double precision, dimension(2, ncharm), save crepn1
Definition: cpincl.f90:99
void cfnmtd(char *fstr, int *len CS_ARGF_SUPP_CHAINE)
Definition: cs_gui_specific_physics.c:1151
double precision, dimension(ncharm), save nck
Definition: cpincl.f90:99
double precision, dimension(ncharm), save ock
Definition: cpincl.f90:99
double precision, dimension(ncharm), save ahetch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save repnle
Definition: cs_coal_incl.f90:79
integer, save noxyd
Definition: ppcpfu.f90:168
integer, dimension(ncharm), save ipci
Definition: cs_coal_incl.f90:36
double precision, dimension(ncharm), save xwatch
Definition: cpincl.f90:99
integer, dimension(ncharm), save iochet
Definition: cpincl.f90:151
real(c_double), dimension(:), pointer, save xashch
Definition: cpincl.f90:115
double precision, save srrom
Definition: ppincl.f90:724
#define END_C_DECLS
Definition: cs_defs.h:511
integer, save ihtco2
Definition: ppcpfu.f90:71
integer(c_int), dimension(:), pointer, save nclpch
Number of classes per coal.
Definition: cpincl.f90:58
#define CS_PROCF(x, y)
Definition: cs_defs.h:524
double precision, dimension(ncharm), save a2ch
Definition: cpincl.f90:152
double precision, dimension(2, ncharm), save crepn2
Definition: cpincl.f90:99
void uicpi2(double *const toxy, double *const tfuel)
Definition: cs_gui_specific_physics.c:690
double precision, dimension(ncharm), save ehetch
Definition: cpincl.f90:152
integer, dimension(ncharm), save iy1ch
Definition: cpincl.f90:150
void uisofu(const int *iirayo, const int *ncharm, int *ncharb, int *nclpch, int *nclacp, const int *ncpcmx, int *ichcor, double *diam20, double *cch, double *hch, double *och, double *nch, double *sch, int *ipci, double *pcich, double *cp2ch, double *rho0ch, double *thcdch, double *cck, double *hck, double *ock, double *nck, double *sck, double *xashch, double *xashsec, double *xwatch, double *h0ashc, double *cpashc, int *iy1ch, double *y1ch, int *iy2ch, double *y2ch, double *a1ch, double *a2ch, double *e1ch, double *e2ch, double *crepn1, double *crepn2, double *ahetch, double *ehetch, int *iochet, double *ahetc2, double *ehetc2, int *ioetc2, double *ahetwt, double *ehetwt, int *ioetwt, int *ieqnox, int *ieqco2, int *imdnox, int *irb, int *ihtco2, int *ihth2o, double *qpr, double *fn, double *ckabs1, int *noxyd, double *oxyo2, double *oxyn2, double *oxyh2o, double *oxyco2, double *repnck, double *repnle, double *repnlo)
Definition: cs_gui_specific_physics.c:708
void uicpi1(double *const srrom, double *const diftl0)
Definition: cs_gui_specific_physics.c:653
integer, save imdnox
Definition: ppcpfu.f90:102
double precision, dimension(ncharm), save qpr
Definition: cs_coal_incl.f90:42
integer, save ihth2o
Definition: cs_coal_incl.f90:36
integer, save irb
Definition: ppcpfu.f90:102
double precision, dimension(3), save oxyh2o
Definition: ppcpfu.f90:175
double precision, dimension(ncharm), save ehetwt
Definition: cpincl.f90:152
double precision, dimension(ncharm), save rho0ch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save repnlo
Definition: cs_coal_incl.f90:79
real(c_double), dimension(:), pointer, save diam20
Definition: cpincl.f90:196
void uidai1(int *permeability, int *dispersion, int *unsteady, int *gravity, int *unsaturated)
Definition: cs_gui_specific_physics.c:1195