1 |
francois |
283 |
/* lecture des fichiers */ |
2 |
|
|
#include <stdio.h> |
3 |
|
|
#include <string.h> |
4 |
|
|
#include "m3d_const.h" |
5 |
|
|
#include "m3d_hotes.h" |
6 |
|
|
#include "m3d_struct.h" |
7 |
|
|
#include "prototype.h" |
8 |
|
|
extern int format ; |
9 |
|
|
extern GEST_MEM *gest ; |
10 |
|
|
extern int debug ; |
11 |
|
|
extern int nb_max_noe ; |
12 |
|
|
void m3d_rec(int *nb_noeud,int *nb_ele,float *coord,int *numele,int *ierr) |
13 |
|
|
{ |
14 |
|
|
switch (format) |
15 |
|
|
{ |
16 |
|
|
case MOSAIC : |
17 |
|
|
m3d_rmos(nb_noeud,nb_ele,coord,numele,ierr) ; |
18 |
|
|
break ; |
19 |
|
|
case STARCD : |
20 |
|
|
m3d_rstar(nb_noeud,nb_ele,coord,numele,ierr) ; |
21 |
|
|
break ; |
22 |
|
|
case SYSTUS : |
23 |
|
|
m3d_rsystus(nb_noeud,nb_ele,coord,numele,ierr) ; |
24 |
|
|
break ; |
25 |
|
|
case SUPERTAB : |
26 |
|
|
m3d_rids(nb_noeud,nb_ele,coord,numele,ierr) ; |
27 |
|
|
break ; |
28 |
|
|
case MASTER_SERIES : |
29 |
|
|
m3d_rids(nb_noeud,nb_ele,coord,numele,ierr) ; |
30 |
|
|
break ; |
31 |
|
|
case NASTRAN : |
32 |
|
|
m3d_rnastran(nb_noeud,nb_ele,coord,numele,ierr) ; |
33 |
|
|
break ; |
34 |
|
|
case ANSYS : |
35 |
|
|
m3d_ransys(nb_noeud,nb_ele,coord,numele,ierr) ; |
36 |
|
|
break ; |
37 |
|
|
case ACSIS : |
38 |
|
|
m3d_racsis(nb_noeud,nb_ele,coord,numele,ierr) ; |
39 |
|
|
break ; |
40 |
|
|
|
41 |
|
|
} |
42 |
|
|
if (*ierr == VRAI) |
43 |
|
|
{ |
44 |
|
|
// if (debug) aff_text(" Erreur lecture M3D_REC \n") ; |
45 |
|
|
return ; |
46 |
|
|
} |
47 |
|
|
return ; |
48 |
|
|
} |