OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
ige3d_c.inc
Go to the documentation of this file.
1Copyright> OpenRadioss
2Copyright> Copyright (C) 1986-2025 Altair Engineering Inc.
3Copyright>
4Copyright> This program is free software: you can redistribute it and/or modify
5Copyright> it under the terms of the GNU Affero General Public License as published by
6Copyright> the Free Software Foundation, either version 3 of the License, or
7Copyright> (at your option) any later version.
8Copyright>
9Copyright> This program is distributed in the hope that it will be useful,
10Copyright> but WITHOUT ANY WARRANTY; without even the implied warranty of
11Copyright> MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12Copyright> GNU Affero General Public License for more details.
13Copyright>
14Copyright> You should have received a copy of the GNU Affero General Public License
15Copyright> along with this program. If not, see <https://www.gnu.org/licenses/>.
16Copyright>
17Copyright>
18Copyright> Commercial Alternative: Altair Radioss Software
19Copyright>
20Copyright> As an alternative to this open-source version, Altair also offers Altair Radioss
21Copyright> software under a commercial license. Contact Altair to discuss further if the
22Copyright> commercial version may interest you: https://www.altair.com/radioss/.
23C.../IGE3D/
24C
25 INTEGER LIGE3D
26 PARAMETER (LIGE3D=17)
27C
28 COMMON /IG3D/
29 . SIXIG3D,NUMELIG3D0,NBMESHSURF,ADDSIXIG3D,ADDELIG3D,NRAFMAX,INOD_IGE,
30 . NBNEWX_TMP,NBNEWX_FINAL,L_TAB_REMOVE,L_TAB_NEWFCT,
31 . OFFSET_NEWFCT,NEWFCT,NBFILSMAX,NBPART_IG3D,L_TAB_STAY,
32 . DEG_MAX
33 INTEGER NUMELIG3D0,NBMESHSURF,ADDSIXIG3D,ADDELIG3D,NRAFMAX,INOD_IGE,
34 . SIXIG3D,NBNEWX_TMP,NBNEWX_FINAL,L_TAB_REMOVE,L_TAB_NEWFCT,
35 . OFFSET_NEWFCT,NEWFCT,NBFILSMAX,NBPART_IG3D,L_TAB_STAY,
36 . DEG_MAX
37C--------1---------2---------3---------4---------5---------6---------7--
#define INTEGER
Definition Bdef.h:94
end diagonal values have been computed in the(sparse) matrix id.SOL