8.0
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-2023 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  * Indirection between the solver numbering and the XML one
78  * for physical properties of the activated specific physics
79  * (pulverized solid fuels)
80  *----------------------------------------------------------------------------*/
81 
82 void CS_PROCF (uisofu, UISOFU) (const int *iirayo,
83  const int *ncharm,
84  int *ncharb,
85  int *nclpch,
86  int *nclacp,
87  const int *ncpcmx,
88  int *ichcor,
89  double *diam20,
90  double *cch,
91  double *hch,
92  double *och,
93  double *nch,
94  double *sch,
95  int *ipci,
96  double *pcich,
97  double *cp2ch,
98  double *rho0ch,
99  double *thcdch,
100  double *cck,
101  double *hck,
102  double *ock,
103  double *nck,
104  double *sck,
105  double *xashch,
106  double *xashsec,
107  double *xwatch,
108  double *h0ashc,
109  double *cpashc,
110  int *iy1ch,
111  double *y1ch,
112  int *iy2ch,
113  double *y2ch,
114  double *a1ch,
115  double *a2ch,
116  double *e1ch,
117  double *e2ch,
118  double *crepn1,
119  double *crepn2,
120  double *ahetch,
121  double *ehetch,
122  int *iochet,
123  double *ahetc2,
124  double *ehetc2,
125  int *ioetc2,
126  double *ahetwt,
127  double *ehetwt,
128  int *ioetwt,
129  int *ieqnox,
130  int *ieqco2,
131  int *imdnox,
132  int *irb,
133  int *ihtco2,
134  int *ihth2o,
135  double *qpr,
136  double *fn,
137  double *ckabs1,
138  int *noxyd,
139  double *oxyo2,
140  double *oxyn2,
141  double *oxyh2o,
142  double *oxyco2,
143  double *repnck,
144  double *repnle,
145  double *repnlo);
146 
147 /*----------------------------------------------------------------------------
148  * Copy name of thermophysical data file from C to Fortran
149  *----------------------------------------------------------------------------*/
150 
151 void CS_PROCF(cfnmtd, CFNMTD) (char *fstr, /* --> Fortran string */
152  int *len /* --> String Length */
154 
155 /*=============================================================================
156  * Public function prototypes
157  *============================================================================*/
158 
159 /*-----------------------------------------------------------------------------
160  * Activate specific physical models based on XML settings.
161  *----------------------------------------------------------------------------*/
162 
163 void
165 
166 /*----------------------------------------------------------------------------
167  * Electrical model: read parameters
168  *----------------------------------------------------------------------------*/
169 
170 void
171 cs_gui_elec_model(void);
172 
173 /*----------------------------------------------------------------------------
174  * Electrical model: define plane for elreca
175  *----------------------------------------------------------------------------*/
176 
177 void
179 
180 /*-----------------------------------------------------------------------------
181  * Return the name of a thermophysical model.
182  *
183  * parameter:
184  * model_thermo --> thermophysical model category
185  *----------------------------------------------------------------------------*/
186 
187 const char *
188 cs_gui_get_thermophysical_model(const char *model_thermo);
189 
190 /*----------------------------------------------------------------------------
191  * groundwater model : read parameters
192  *
193  * parameters:
194  * permeability <-- permeability type
195  * unsteady <-- steady flow
196  * unsaturated <-- take into account unsaturated zone
197  *----------------------------------------------------------------------------*/
198 
199 void
200 cs_gui_gwf_model(int *permeability,
201  int *unsteady,
202  int *unsaturated);
203 
204 /*----------------------------------------------------------------------------*/
205 
207 
208 #endif /* __CS_GUI_SPECIFIC_PHYSICS_H__ */
#define BEGIN_C_DECLS
Definition: cs_defs.h:509
#define CS_PROCF(x, y)
Definition: cs_defs.h:523
#define END_C_DECLS
Definition: cs_defs.h:510
#define CS_ARGF_SUPP_CHAINE
Definition: cs_defs.h:535
void uicpi2(double *const toxy, double *const tfuel)
Definition: cs_gui_specific_physics.c:690
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 cs_gui_elec_model(void)
Definition: cs_gui_specific_physics.c:1438
void cfnmtd(char *fstr, int *len CS_ARGF_SUPP_CHAINE)
Definition: cs_gui_specific_physics.c:1151
void cs_gui_physical_model_select(void)
Definition: cs_gui_specific_physics.c:1260
void cs_gui_gwf_model(int *permeability, int *unsteady, int *unsaturated)
Definition: cs_gui_specific_physics.c:1578
const char * cs_gui_get_thermophysical_model(const char *model_thermo)
Definition: cs_gui_specific_physics.c:1551
void cs_gui_elec_model_rec(void)
Definition: cs_gui_specific_physics.c:1512
void uicpi1(double *const srrom, double *const diftl0)
Definition: cs_gui_specific_physics.c:653
double precision, save srrom
with gas combustion, pulverised coal or the electric module, srrom is the sub-relaxation coefficient ...
Definition: ppincl.f90:779
integer ncharm
maximum number of coals
Definition: ppppar.f90:55
integer ncpcmx
maximum number of coals classes
Definition: ppppar.f90:57
integer(c_int), pointer, save iirayo
Activation of the radiative transfer module:
Definition: radiat.f90:45
double precision, save diftl0
molecular diffusivity for the enthalpy ( ) for gas or coal combustion (the code then automatically se...
Definition: ppthch.f90:162
real(c_double), pointer, save ckabs1
Absorption coefficient of gas mixture.
Definition: ppthch.f90:153
double precision, dimension(ncharm), save cch
Definition: cpincl.f90:99
real(c_double), dimension(:), pointer, save xashch
Definition: cpincl.f90:115
double precision, dimension(ncharm), save sch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save y2ch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save cpashc
Definition: cpincl.f90:99
integer, dimension(ncharm), save ioetwt
Definition: cpincl.f90:151
real(c_double), dimension(:), pointer, save diam20
Definition: cpincl.f90:196
double precision, dimension(ncharm), save cp2ch
Definition: cpincl.f90:99
integer(c_int), pointer, save nclacp
Definition: cpincl.f90:183
double precision, dimension(ncharm), save och
Definition: cpincl.f90:99
double precision, dimension(ncharm), save cck
Definition: cpincl.f90:99
integer(c_int), dimension(:), pointer, save nclpch
Number of classes per coal.
Definition: cpincl.f90:58
integer, dimension(ncharm), save iy1ch
Definition: cpincl.f90:150
double precision, dimension(ncharm), save thcdch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save hck
Definition: cpincl.f90:99
integer, dimension(ncharm), save ioetc2
Definition: cpincl.f90:151
double precision, dimension(ncharm), save e1ch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save ehetwt
Definition: cpincl.f90:152
double precision, dimension(ncharm), save y1ch
Definition: cpincl.f90:152
double precision, dimension(2, ncharm), save crepn2
Definition: cpincl.f90:99
double precision, dimension(ncharm), save xwatch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save ahetc2
Definition: cpincl.f90:152
double precision, dimension(ncharm), save nck
Definition: cpincl.f90:99
double precision, dimension(ncharm), save a1ch
Definition: cpincl.f90:152
integer, dimension(ncharm), save iochet
Definition: cpincl.f90:151
double precision, dimension(ncharm), save ock
Definition: cpincl.f90:99
double precision, dimension(2, ncharm), save crepn1
Definition: cpincl.f90:99
double precision, dimension(ncharm), save ehetc2
Definition: cpincl.f90:152
double precision, dimension(ncharm), save ahetch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save ehetch
Definition: cpincl.f90:152
integer(c_int), pointer, save ncharb
Number of coals.
Definition: cpincl.f90:51
double precision, dimension(ncharm), save sck
Definition: cpincl.f90:99
integer(c_int), dimension(:), pointer, save ichcor
Definition: cpincl.f90:195
double precision, dimension(ncharm), save rho0ch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save pcich
Definition: cpincl.f90:99
double precision, dimension(ncharm), save a2ch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save ahetwt
Definition: cpincl.f90:152
double precision, dimension(ncharm), save h0ashc
Definition: cpincl.f90:99
double precision, dimension(ncharm), save hch
Definition: cpincl.f90:99
double precision, dimension(ncharm), save nch
Definition: cpincl.f90:99
integer, dimension(ncharm), save iy2ch
Definition: cpincl.f90:150
double precision, dimension(ncharm), save e2ch
Definition: cpincl.f90:152
double precision, dimension(ncharm), save xashsec
Definition: cs_coal_incl.f90:42
double precision, dimension(ncharm), save repnck
Definition: cs_coal_incl.f90:79
double precision, dimension(ncharm), save repnlo
Definition: cs_coal_incl.f90:79
double precision, dimension(ncharm), save qpr
Definition: cs_coal_incl.f90:42
double precision, dimension(ncharm), save fn
Definition: cs_coal_incl.f90:42
double precision, dimension(ncharm), save repnle
Definition: cs_coal_incl.f90:79
integer, dimension(ncharm), save ipci
Definition: cs_coal_incl.f90:36
integer, save ihth2o
Definition: cs_coal_incl.f90:36
integer, save noxyd
Definition: ppcpfu.f90:168
integer, save ieqnox
Definition: ppcpfu.f90:102
real(c_double), dimension(:), pointer, save oxyco2
Definition: ppcpfu.f90:180
integer, save ieqco2
Definition: ppcpfu.f90:63
integer, save irb
Definition: ppcpfu.f90:102
real(c_double), dimension(:), pointer, save oxyn2
Definition: ppcpfu.f90:180
integer, save ihtco2
Definition: ppcpfu.f90:71
real(c_double), dimension(:), pointer, save oxyo2
Definition: ppcpfu.f90:180
real(c_double), dimension(:), pointer, save oxyh2o
Definition: ppcpfu.f90:180
integer, save imdnox
Definition: ppcpfu.f90:102