1 |
francois |
283 |
#include <stdio.h> |
2 |
|
|
#include "m3d_struct.h" |
3 |
|
|
#include "m3d_const.h" |
4 |
|
|
#include "m3d_hotes.h" |
5 |
|
|
#include "prototype.h" |
6 |
|
|
extern int debug ; |
7 |
|
|
/* destruction de tetraedres connectes a un noeud */ |
8 |
|
|
int m3d_killnoe(float *coord,int *numele,NOEUD *noe_p,FACE **tab_front) |
9 |
|
|
{ |
10 |
|
|
/* declarations */ |
11 |
|
|
TETRAEDRE *tetra ; |
12 |
|
|
CONNEC *connec ; |
13 |
|
|
char mess[255]; |
14 |
|
|
connec = noe_p->lis_con ; |
15 |
|
|
/* parcours de la liste et mise a jour */ |
16 |
|
|
while (connec!=NULL) |
17 |
|
|
{ |
18 |
|
|
/* destruction du tetra, a moins qu'il ne soit deja detruit */ |
19 |
|
|
tetra = connec->tetra ; |
20 |
|
|
if (tetra->mark!=KILLED) |
21 |
|
|
{ |
22 |
|
|
if (!m3d_d_tetra(tetra,tab_front)) |
23 |
|
|
{ |
24 |
|
|
return(FAUX) ; |
25 |
|
|
} |
26 |
|
|
} |
27 |
|
|
connec = connec->suivant ; |
28 |
|
|
} |
29 |
|
|
/* aucun tetra connecte au noeud */ |
30 |
|
|
if (noe_p->mark2 != CARD_NULL) |
31 |
|
|
{ |
32 |
|
|
if (debug) |
33 |
|
|
{ |
34 |
|
|
sprintf(mess,"%s\n",(char*)" Erreur cardinalite M3D_KILLNOE ") ; |
35 |
|
|
//aff_text(mess); |
36 |
|
|
} |
37 |
|
|
} |
38 |
|
|
/* noe_p->mark = KILLED ;*/ |
39 |
|
|
return(VRAI) ; |
40 |
|
|
} |