programmer's documentation
cs_radiation_solver.h
Go to the documentation of this file.
1 #ifndef __CS_RADIATION_SOLVER_H__
2 #define __CS_RADIATION_SOLVER_H__
3 
4 /*============================================================================
5  * Radiation solver operations.
6  *============================================================================*/
7 
8 /*
9  This file is part of Code_Saturne, a general-purpose CFD tool.
10 
11  Copyright (C) 1998-2015 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 #include "cs_halo.h"
36 
37 /*----------------------------------------------------------------------------*/
38 
40 
41 /*=============================================================================
42  * Local Macro definitions
43  *============================================================================*/
44 
45 /*============================================================================
46  * Type definition
47  *============================================================================*/
48 
49 /*============================================================================
50  * Global variables
51  *============================================================================*/
52 
53 /*============================================================================
54  * Public function prototypes for Fortran API
55  *============================================================================*/
56 
57 /*----------------------------------------------------------------------------
58  * Order linear solvers for DOM radiative model.
59  *----------------------------------------------------------------------------*/
60 
61 void CS_PROCF (rayord, RAYORD)
62 (
63  const cs_int_t *ndirs,
64  const cs_real_t sx[],
65  const cs_real_t sy[],
66  const cs_real_t sz[]
67 );
68 
69 /*=============================================================================
70  * Public function prototypes
71  *============================================================================*/
72 
73 /*----------------------------------------------------------------------------*/
74 
76 
77 #endif /* __CS_RADIATION_SOLVER_H__ */
double precision, dimension(:), allocatable sy
Definition: radiat.f90:168
#define BEGIN_C_DECLS
Definition: cs_defs.h:429
int cs_int_t
Fortran-compatible integer.
Definition: cs_defs.h:295
double precision, dimension(:), allocatable sx
Definition: radiat.f90:168
double precision, dimension(:), allocatable sz
Definition: radiat.f90:168
#define END_C_DECLS
Definition: cs_defs.h:430
double cs_real_t
Definition: cs_defs.h:296
#define CS_PROCF(x, y)
Definition: cs_defs.h:453
void rayord(const cs_int_t *ndirs, const cs_real_t sx[], const cs_real_t sy[], const cs_real_t sz[])
Definition: cs_radiation_solver.c:203
integer, save ndirs
For the Tn quadrature, ndirec squared.
Definition: radiat.f90:163