programmer's documentation
 All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
cs_gui_radiative_transfer.h
Go to the documentation of this file.
1 #ifndef __CS_GUI_RADIATIVE_TRANSFER_H__
2 #define __CS_GUI_RADIATIVE_TRANSFER_H__
3 
4 /*============================================================================
5  * Management of the GUI parameters file: radiative transfer
6  *============================================================================*/
7 
8 /*
9  This file is part of Code_Saturne, a general-purpose CFD tool.
10 
11  Copyright (C) 1998-2013 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  * Public function prototypes for Fortran API
42  *============================================================================*/
43 
44 /*----------------------------------------------------------------------------
45  *
46  *----------------------------------------------------------------------------*/
47 
48 void CS_PROCF (uiray1, UIRAY1) (int *const iirayo,
49  int *const isuird,
50  int *const i_quad,
51  int *const ndirec,
52  int *const nfreqr,
53  int *const idiver,
54  int *const iimpar,
55  int *const iimlum);
56 
57 
58 /*----------------------------------------------------------------------------
59  *
60  *----------------------------------------------------------------------------*/
61 
62 void CS_PROCF(fcnmra, FCNMRA)
63 (
64  const char *const fstr, /* --> Fortran string */
65  int *const len, /* --> String Length */
66  int *const var_id /* --> Variable Id (1 to n) */
68 );
69 
70 /*----------------------------------------------------------------------------
71  *
72  *----------------------------------------------------------------------------*/
73 
74 void CS_PROCF(cfnmra, CFNMRA)
75 (
76  char *const fstr, /* --> Fortran string */
77  int *const len, /* --> String Length */
78  int *const var_id /* --> Variable Id (1 to n) */
80 );
81 
82 /*----------------------------------------------------------------------------
83  *
84  *----------------------------------------------------------------------------*/
85 
86 
87 void CS_PROCF (uiray2, UIRAY2) (const int *const itypfb,
88  const int *const iparoi,
89  const int *const iparug,
90  const int *const ivart,
91  int *const izfrdp,
92  int *const isothp,
93  const int *const itpimp,
94  const int *const ipgrno,
95  const int *const iprefl,
96  const int *const ifgrno,
97  const int *const ifrefl,
98  const int *const nzoppm,
99  const int *const nfabor,
100  const int *const nvar,
101  double *const epsp,
102  double *const epap,
103  double *const tintp,
104  double *const textp,
105  double *const xlamp,
106  double *const rcodcl);
107 
108 /*----------------------------------------------------------------------------
109  *
110  *----------------------------------------------------------------------------*/
111 
112 
113 void CS_PROCF (uiray3, UIRAY3) ( double *const ck,
114  const int *const ncel,
115  int *const imodak);
116 /*----------------------------------------------------------------------------
117  *
118  *----------------------------------------------------------------------------*/
119 
120 void CS_PROCF (uiray4, UIRAY4) (int *const nbrayf,
121  int *const iirayo,
122  int *const irayvf);
123 
124 /*-----------------------------------------------------------------------------
125  * Indirection between the solver numbering and the XML one
126  * for physical properties of radiative transfer
127  *----------------------------------------------------------------------------*/
128 
129 void CS_PROCF (uirapr, UIRAPR) (const int *const nprayc,
130  const int *const nrphas,
131  const int *const ipppro,
132  const int *const ipproc,
133  const int *const ilumin,
134  const int *const iqx,
135  const int *const iqy,
136  const int *const iqz,
137  const int *const itsre,
138  const int *const itsri,
139  const int *const iabs,
140  const int *const iemi,
141  const int *const icak);
142 
143 /*-----------------------------------------------------------------------------
144  * Free memory: clean global private variables.
145  *
146  * Fortran Interface:
147  *
148  * SUBROUTINE MEMUI2
149  * *****************
150  *
151  *----------------------------------------------------------------------------*/
152 
153 void CS_PROCF (memui2, MEMUI2) (void);
154 
155 /*----------------------------------------------------------------------------*/
156 
158 
159 #endif /* __CS_GUI_RADIATIVE_TRANSFER_H__ */