Version: 8.3.0
libmesh5.h
Go to the documentation of this file.
1 
2 
3 /*----------------------------------------------------------*/
4 /* */
5 /* LIBMESH V 5.46 */
6 /* */
7 /*----------------------------------------------------------*/
8 /* */
9 /* Description: handle .meshb file format I/O */
10 /* Author: Loic MARECHAL */
11 /* Creation date: feb 16 2007 */
12 /* Last modification: dec 09 2011 */
13 /* */
14 /*----------------------------------------------------------*/
15 
16 
17 /*----------------------------------------------------------*/
18 /* Defines */
19 /*----------------------------------------------------------*/
20 
21 #include "SMESH_DriverGMF.hxx"
22 
23 #define GmfStrSiz 1024
24 #define GmfMaxTyp 1000
25 #define GmfMaxKwd 80
26 #define GmfMshVer 1
27 #define GmfRead 1
28 #define GmfWrite 2
29 #define GmfSca 1
30 #define GmfVec 2
31 #define GmfSymMat 3
32 #define GmfMat 4
33 #define GmfFloat 1
34 #define GmfDouble 2
35 
36 enum GmfKwdCod
37 {
38  GmfReserved1, \
39  GmfVersionFormatted, \
40  GmfReserved2, \
41  GmfDimension, \
42  GmfVertices, \
43  GmfEdges, \
44  GmfTriangles, \
45  GmfQuadrilaterals, \
46  GmfTetrahedra, \
47  GmfPrisms, \
48  GmfHexahedra, \
49  GmfIterationsAll, \
50  GmfTimesAll, \
51  GmfCorners, \
52  GmfRidges, \
53  GmfRequiredVertices, \
54  GmfRequiredEdges, \
55  GmfRequiredTriangles, \
56  GmfRequiredQuadrilaterals, \
57  GmfTangentAtEdgeVertices, \
58  GmfNormalAtVertices, \
59  GmfNormalAtTriangleVertices, \
60  GmfNormalAtQuadrilateralVertices, \
61  GmfAngleOfCornerBound, \
62  GmfTrianglesP2, \
63  GmfEdgesP2, \
64  GmfSolAtPyramids, \
65  GmfQuadrilateralsQ2, \
66  GmfISolAtPyramids, \
67  GmfSubDomainFromGeom, \
68  GmfTetrahedraP2, \
69  GmfFault_NearTri, \
70  GmfFault_Inter, \
71  GmfHexahedraQ2, \
72  GmfExtraVerticesAtEdges, \
73  GmfExtraVerticesAtTriangles, \
74  GmfExtraVerticesAtQuadrilaterals, \
75  GmfExtraVerticesAtTetrahedra, \
76  GmfExtraVerticesAtPrisms, \
77  GmfExtraVerticesAtHexahedra, \
78  GmfVerticesOnGeometricVertices, \
79  GmfVerticesOnGeometricEdges, \
80  GmfVerticesOnGeometricTriangles, \
81  GmfVerticesOnGeometricQuadrilaterals, \
82  GmfEdgesOnGeometricEdges, \
83  GmfFault_FreeEdge, \
84  GmfPolyhedra, \
85  GmfPolygons, \
86  GmfFault_Overlap, \
87  GmfPyramids, \
88  GmfBoundingBox, \
89  GmfBody, \
90  GmfPrivateTable, \
91  GmfFault_BadShape, \
92  GmfEnd, \
93  GmfTrianglesOnGeometricTriangles, \
94  GmfTrianglesOnGeometricQuadrilaterals, \
95  GmfQuadrilateralsOnGeometricTriangles, \
96  GmfQuadrilateralsOnGeometricQuadrilaterals, \
97  GmfTangents, \
98  GmfNormals, \
99  GmfTangentAtVertices, \
100  GmfSolAtVertices, \
101  GmfSolAtEdges, \
102  GmfSolAtTriangles, \
103  GmfSolAtQuadrilaterals, \
104  GmfSolAtTetrahedra, \
105  GmfSolAtPrisms, \
106  GmfSolAtHexahedra, \
107  GmfDSolAtVertices, \
108  GmfISolAtVertices, \
109  GmfISolAtEdges, \
110  GmfISolAtTriangles, \
111  GmfISolAtQuadrilaterals, \
112  GmfISolAtTetrahedra, \
113  GmfISolAtPrisms, \
114  GmfISolAtHexahedra, \
115  GmfIterations, \
116  GmfTime, \
117  GmfFault_SmallTri, \
118  GmfCoarseHexahedra
119 };
120 
121 
122 /*----------------------------------------------------------*/
123 /* External procedures */
124 /*----------------------------------------------------------*/
125 
126 MESHDriverGMF_EXPORT extern int GmfOpenMesh(const char *, int, ...);
127 MESHDriverGMF_EXPORT extern int GmfCloseMesh(int);
128 MESHDriverGMF_EXPORT extern int GmfStatKwd(int, int, ...);
129 MESHDriverGMF_EXPORT extern int GmfGotoKwd(int, int);
130 MESHDriverGMF_EXPORT extern int GmfSetKwd(int, int, ...);
131 MESHDriverGMF_EXPORT extern void GmfGetLin(int, int, ...);
132 MESHDriverGMF_EXPORT extern void GmfSetLin(int, int, ...);
133 
134 
135 /*----------------------------------------------------------*/
136 /* Fortran 77 API */
137 /*----------------------------------------------------------*/
138 
139 #if defined(F77_NO_UNDER_SCORE)
140 #define call(x) x
141 #else
142 #define call(x) x ## _
143 #endif
144 
145 
146 /*----------------------------------------------------------*/
147 /* Transmesh private API */
148 /*----------------------------------------------------------*/
149 
150 #ifdef TRANSMESH
151 
152 MESHDriverGMF_EXPORT extern char *GmfKwdFmt[ GmfMaxKwd + 1 ][4];
153 MESHDriverGMF_EXPORT extern int GmfCpyLin(int, int, int);
154 
155 #endif