TrioCFD 1.9.8
TrioCFD documentation
Loading...
Searching...
No Matches
Fluide_R12_c1_gaz.cpp
1/****************************************************************************
2* Copyright (c) 2021, CEA
3* All rights reserved.
4*
5* Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
6* 1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
7* 2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
8* 3. Neither the name of the copyright holder nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission.
9*
10* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
11* IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
12* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
13*
14*****************************************************************************/
15
16#include <Fluide_R12_c1_gaz.h>
17
18Implemente_instanciable(Fluide_R12_c1_gaz, "Fluide_R12_c1_gaz", Fluide_reel_base);
19
20Sortie& Fluide_R12_c1_gaz::printOn(Sortie& os) const { return os; }
21
22Entree& Fluide_R12_c1_gaz::readOn(Entree& is)
23{
24#if HAVE_LIBC3
25 Param param(que_suis_je());
26 param.ajouter("like_eos",&like_eos_);
27 param.lire_avec_accolades_depuis(is);
28#else
29 Process::exit(que_suis_je() + " : this binary was not compiled with C3 water laws!");
30#endif
31 return is;
32}
33
34#define ind std::distance(res.begin(), &val)
35
36void Fluide_R12_c1_gaz::rho_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
37{
38 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
39#if HAVE_LIBC3
40 /* calcul a saturation */
41 if (like_eos_)
42 for (auto& val : res)
43 {
44 // On fait comme dans EOS : des trucs chelous
45 // 1. Enthalpie gaz
46 int un = 1;
47 double Hg;
48 int ill, ivstat, ierrth;
49 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
50
51 // 2. Saturation
52 double tsat, dtsp1 ;
53 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
54
55 // 3. Masse volumique a saturation
56 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
57 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
58 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
59
60 // 4. Enthalpie a saturation
61 double hvsp, hlsp, dhvsp1, dhlsp1;
62 F77NAME(FHSATR12)(&un, &tsat, &rhog_sat, &rhol_sat, &P[ind], &hvsp, &hlsp, &dtsp1, &DP_rhoG_sat, &DP_rhoL_sat, &dhvsp1, &dhlsp1);
63
64 // 5. Inversion des inconnues, sort la masse volumique...
65 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
66 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg , &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog , &ill, &ivstat, &ierrth);
67
68 val = rhog; // NB : only a function of T
69 }
70 else for (auto& val : res)
71 {
72 int un = 1;
73 int ill, ivstat, ierrth;
74
75 // 1. Saturation
76 double tsat, dtsp1 ;
77 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
78
79 // 2. finex
80 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
81 double rhog, rhol, DP_rhoL, DP_rhoG;
82 F77NAME(FROVLR12)(&un, &P[ind], &T[ind * ncomp + id], &tsat , &rhog , &rhol, &DP_Tl, &DP_rhoL, &DP_rhoG, &ill, &ivstat, &ierrth);
83
84 val = rhog; // NB : only a function of T
85 }
86#else
87 for (auto& val : res) val = 0;
88#endif
89}
90
91void Fluide_R12_c1_gaz::dP_rho_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
92{
93 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
94#if HAVE_LIBC3
95 /* calcul a saturation */
96 for (auto& val : res)
97 {
98 // On fait comme dans EOS : des trucs chelous
99 // 1. Enthalpie gaz
100 int un = 1;
101 double Hg;
102 int ill, ivstat, ierrth;
103 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
104
105 // 2. Saturation
106 double tsat, dtsp1 ;
107 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
108
109 // 3. Masse volumique a saturation
110 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
111 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
112 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
113
114 // 4. Enthalpie a saturation
115 double hvsp, hlsp, dhvsp1, dhlsp1;
116 F77NAME(FHSATR12)(&un, &tsat, &rhog_sat, &rhol_sat, &P[ind], &hvsp, &hlsp, &dtsp1, &DP_rhoG_sat, &DP_rhoL_sat, &dhvsp1, &dhlsp1);
117
118 // 5. Inversion des inconnues, sort la masse volumique...
119 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
120 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg , &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog , &ill, &ivstat, &ierrth);
121
122 val = dP_rhog - dHg_rhog* dP_Tg/dHg_Tg; // NB : this is derivative with T fixed, not with H fixed
123 }
124#else
125 for (auto& val : res) val = 0;
126#endif
127}
128
129void Fluide_R12_c1_gaz::dT_rho_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
130{
131 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
132#if HAVE_LIBC3
133 /* calcul a saturation */
134 for (auto& val : res)
135 {
136 // On fait comme dans EOS : des trucs chelous
137 // 1. Enthalpie gaz
138 int un = 1;
139 double Hg;
140 int ill, ivstat, ierrth;
141 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
142
143 // 2. Saturation
144 double tsat, dtsp1 ;
145 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
146
147 // 3. Masse volumique a saturation
148 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
149 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
150 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
151
152 // 4. Enthalpie a saturation
153 double hvsp, hlsp, dhvsp1, dhlsp1;
154 F77NAME(FHSATR12)(&un, &tsat, &rhog_sat, &rhol_sat, &P[ind], &hvsp, &hlsp, &dtsp1, &DP_rhoG_sat, &DP_rhoL_sat, &dhvsp1, &dhlsp1);
155
156 // 5. Inversion des inconnues, sort la masse volumique...
157 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
158 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg , &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog , &ill, &ivstat, &ierrth);
159
160 val = dHg_rhog/dHg_Tg; // Dans la formule de FPTHGR, H ne depend que de rho et de T.
161 }
162#else
163 for (auto& val : res) val = 0;
164#endif
165}
166
167void Fluide_R12_c1_gaz::h_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
168{
169 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
170#if HAVE_LIBC3
171 /* calcul a saturation */
172 for (auto& val : res)
173 {
174 int un = 1;
175 double Hg;
176 int ill, ivstat, ierrth;
177 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
178 val = Hg;
179 }
180#else
181 for (auto& val : res) val = 0;
182#endif
183}
184
185void Fluide_R12_c1_gaz::dP_h_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
186{
187 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
188#if HAVE_LIBC3
189 /* calcul a saturation */
190 for (auto& val : res)
191 {
192 // On fait comme dans EOS : des trucs chelous
193 // 1. Enthalpie gaz
194 int un = 1;
195 double Hg;
196 int ill, ivstat, ierrth;
197 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
198
199 // 2. Saturation
200 double tsat, dtsp1 ;
201 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
202
203 // 3. Masse volumique a saturation
204 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
205 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
206 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
207
208 // 4. Enthalpie a saturation
209 double hvsp, hlsp, dhvsp1, dhlsp1;
210 F77NAME(FHSATR12)(&un, &tsat, &rhog_sat, &rhol_sat, &P[ind], &hvsp, &hlsp, &dtsp1, &DP_rhoG_sat, &DP_rhoL_sat, &dhvsp1, &dhlsp1);
211
212 // 5. Inversion des inconnues, sort la masse volumique...
213 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
214 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg , &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog , &ill, &ivstat, &ierrth);
215
216 val = -dP_Tg/dHg_Tg;
217 }
218#else
219 for (auto& val : res) val = 0;
220#endif
221}
222
223void Fluide_R12_c1_gaz::dT_h_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
224{
225 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
226#if HAVE_LIBC3
227 /* calcul a saturation */
228 for (auto& val : res)
229 {
230 // On fait comme dans EOS : des trucs chelous
231 // 1. Enthalpie gaz
232 int un = 1;
233 double Hg;
234 int ill, ivstat, ierrth;
235 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
236
237 // 2. Saturation
238 double tsat, dtsp1 ;
239 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
240
241 // 3. Masse volumique a saturation
242 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
243 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
244 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
245
246 // 4. Enthalpie a saturation
247 double hvsp, hlsp, dhvsp1, dhlsp1;
248 F77NAME(FHSATR12)(&un, &tsat, &rhog_sat, &rhol_sat, &P[ind], &hvsp, &hlsp, &dtsp1, &DP_rhoG_sat, &DP_rhoL_sat, &dhvsp1, &dhlsp1);
249
250 // 5. Inversion des inconnues, sort la masse volumique...
251 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
252 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg , &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog , &ill, &ivstat, &ierrth);
253
254 val = 1./dHg_Tg;
255 }
256#else
257 for (auto& val : res) val = 0;
258#endif
259}
260
261void Fluide_R12_c1_gaz::cp_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
262{
263 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
264#if HAVE_LIBC3
265 /* calcul a saturation */
266 for (auto& val : res)
267 {
268 // On fait comme dans EOS : des trucs chelous
269 // 1. Enthalpie gaz
270 int un = 1;
271 double Hg;
272 int ill, ivstat, ierrth;
273 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
274
275 // 2. Saturation
276 double tsat, dtsp1 ;
277 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
278
279 // 3. Masse volumique a saturation
280 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
281 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
282 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
283
284 // 4. Enthalpie a saturation
285 double hvsp, hlsp, dhvsp1, dhlsp1;
286 F77NAME(FHSATR12)(&un, &tsat, &rhog_sat, &rhol_sat, &P[ind], &hvsp, &hlsp, &dtsp1, &DP_rhoG_sat, &DP_rhoL_sat, &dhvsp1, &dhlsp1);
287
288 // 5. Inversion des inconnues, sort la masse volumique...
289 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
290 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg , &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog , &ill, &ivstat, &ierrth);
291
292 // 5. On appelle la fonction qu'on cherche
293 double cpg, dP_cpg, dhg_cpg;
294 F77NAME(FCPVR12)(&un, &Tg, &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog, &cpg, &dP_cpg, &dhg_cpg);
295
296 val = cpg;
297 }
298#else
299 for (auto& val : res) val = 0;
300#endif
301}
302
303void Fluide_R12_c1_gaz::beta_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
304{
305 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
306 VectorD dT_rho___((int )res.size()), rho___((int )res.size());
307 dT_rho_(T,P,SpanD(dT_rho___),ncomp,id);
308 rho_(T,P,SpanD(rho___),ncomp,id);
309 for (auto& val : res) val = dT_rho___[ind] / rho___[ind];
310}
311
312void Fluide_R12_c1_gaz::mu_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
313{
314 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
315#if HAVE_LIBC3
316 /* calcul a saturation */
317 for (auto& val : res)
318 {
319 // 1. Enthalpie gaz
320 int un = 1;
321 double Hg;
322 int ill, ivstat, ierrth;
323 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
324
325 // 2. Saturation
326 double tsat, dtsp1 ;
327 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
328
329 // 3. Masse volumique du gaz a saturation
330 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
331 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
332 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
333
334 // 4. On appelle la fonction chelou
335 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
336 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg, &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog, &ill, &ivstat, &ierrth);
337
338 // 5. On appelle la fonction qu'on cherche
339 double mug, dP_mug, DHg_mug;
340 F77NAME(FMUVR12)(&un, &P[ind], &T[ind * ncomp + id], &dP_Tg, &dHg_Tg, &mug, &dP_mug, &DHg_mug);
341
342 val = mug;
343 }
344#else
345 for (auto& val : res) val = 0;
346#endif
347}
348
349void Fluide_R12_c1_gaz::lambda_(const SpanD T, const SpanD P, SpanD res, int ncomp, int id) const
350{
351 assert((int )T.size() == ncomp * (int )P.size() && (int )T.size() == ncomp * (int )res.size());
352#if HAVE_LIBC3
353 /* calcul a saturation */
354 for (auto& val : res)
355 {
356 // 1. Enthalpie gaz
357 int un = 1;
358 double Hg;
359 int ill, ivstat, ierrth;
360 F77NAME(FPTHGR12)(&un, &P[ind], &T[ind * ncomp + id], &Hg, &ill, &ivstat, &ierrth);
361
362 // 2. Saturation
363 double tsat, dtsp1 ;
364 F77NAME(FPSATR12)(&un, &P[ind], &tsat, &dtsp1, &ill, &ivstat, &ierrth);
365
366 // 3. Masse volumique du gaz a saturation
367 double DP_Tl = 0.; // Renvoye a 0. dans FCPLR12, on gange un appel
368 double rhog_sat, rhol_sat, DP_rhoL_sat, DP_rhoG_sat;
369 F77NAME(FROVLR12)(&un, &P[ind], &tsat, &tsat , &rhog_sat, &rhol_sat , &DP_Tl, &DP_rhoL_sat, &DP_rhoG_sat, &ill, &ivstat, &ierrth);
370
371 // 4. On appelle la fonction chelou
372 double Tg, dP_Tg, dHg_Tg, rhog, dP_rhog, dHg_rhog;
373 F77NAME(FTGR12)(&un, &P[ind], &Hg, &tsat, &rhog_sat, &Tg, &dP_Tg, &dHg_Tg, &rhog, &dP_rhog, &dHg_rhog, &ill, &ivstat, &ierrth);
374
375 // 5. On appelle la fonction qu'on cherche
376 double lambdag, dP_lambdag, DHg_lambdag;
377 F77NAME(FMUVR12)(&un, &P[ind], &T[ind * ncomp + id], &dP_Tg, &dHg_Tg, &lambdag, &dP_lambdag, &DHg_lambdag);
378
379 val = lambdag;
380 }
381#else
382 for (auto& val : res) val = 0;
383#endif
384}
385
386#undef ind
Entree
Class defining operators and methods for all reading operation in an input flow (file,...
Definition Entree.h:42
Fluide_R12_c1_gaz
Definition Fluide_R12_c1_gaz.h:23
Fluide_R12_c1_gaz::dP_rho_
void dP_rho_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:91
Fluide_R12_c1_gaz::beta_
void beta_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:303
Fluide_R12_c1_gaz::dP_h_
void dP_h_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:185
Fluide_R12_c1_gaz::mu_
void mu_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:312
Fluide_R12_c1_gaz::lambda_
void lambda_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:349
Fluide_R12_c1_gaz::rho_
void rho_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:36
Fluide_R12_c1_gaz::dT_h_
void dT_h_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:223
Fluide_R12_c1_gaz::cp_
void cp_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:261
Fluide_R12_c1_gaz::dT_rho_
void dT_rho_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:129
Fluide_R12_c1_gaz::h_
void h_(const SpanD T, const SpanD P, SpanD res, int ncomp=1, int id=0) const override
Definition Fluide_R12_c1_gaz.cpp:167
Fluide_reel_base
Classe Fluide_reel_base Cette classe represente un fluide reel ainsi que.
Definition Fluide_reel_base.h:52
Objet_U::que_suis_je
const Nom & que_suis_je() const
renvoie la chaine identifiant la classe.
Definition Objet_U.cpp:104
Objet_U::readOn
virtual Entree & readOn(Entree &)
Lecture d'un Objet_U sur un flot d'entree Methode a surcharger.
Definition Objet_U.cpp:293
Objet_U::printOn
virtual Sortie & printOn(Sortie &) const
Ecriture de l'objet sur un flot de sortie Methode a surcharger.
Definition Objet_U.cpp:282
Process::exit
static void exit(int exit_code=-1)
Routine de sortie de TRUST dans une region Kokkos.
Definition Process.cpp:455
Sortie
Classe de base des flux de sortie.
Definition Sortie.h:52