ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/REPOS_ERICCA/acismesh/r3d_rech_facette.cpp
Revision: 1
Committed: Mon Jun 11 22:53:07 2007 UTC (17 years, 11 months ago)
File size: 2580 byte(s)
Log Message:

File Contents

# User Rev Content
1 1 /*****************************************************************
2    
3     r3d_rech_facette.cpp Type:Func
4    
5     Recherche d une facette correspondante a la face
6    
7     Date de creation : 14-8-1997 11 :55 :38
8     Derniere version : 14-8-1997 11 :55 :38
9    
10     Vincent FRANCOIS
11    
12     *****************************************************************/
13    
14    
15    
16    
17    
18     /**************************/
19     /* include */
20     #include <stdio.h>
21     #include <string.h>
22     #include <stdlib.h>
23     #include "const.h"
24     #include "memoire.h"
25     #include "struct.h"
26     #include "prototype.h"
27    
28     /**************************/
29     /* variables globales */
30     extern struct environnement env;
31     extern struct s_mesh *mesh;
32     extern struct s_maillage *maillage;
33     extern struct s_acis *acis;
34    
35    
36    
37     /**************************/
38     /* programme principal */
39    
40     void r3d_rech_facette(struct s_face *face,int *nb_facette,int *tab_facette)
41     {
42     struct s_mfacette *mfacette;
43     struct s_mnoeud *mno1,*mno2,*mno3;
44     struct s_mtriangle *mtri;
45     float u1,u2,u3,u,uu,du;
46     float v1,v2,v3,v,vv,dv;
47     int i;
48    
49    
50     for (i=0;i<maillage->nb_mfacette;i++)
51     {
52     mfacette=ADRESSE(i,mfacette,maillage->);
53     if (mfacette->etat==LIBRE)
54     {
55     mtri=mfacette->mtriangle[0];
56     mno1=ADRESSE(mtri->n1,mnoeud,maillage->);
57     mno2=ADRESSE(mtri->n2,mnoeud,maillage->);
58     mno3=ADRESSE(mtri->n3,mnoeud,maillage->);
59     if (geo_app_point_face(face,mno1)==1)
60     if (geo_app_point_face(face,mno2)==1)
61     if (geo_app_point_face(face,mno3)==1)
62     {
63     if (mesh->rev_u!=0.) du=0.5*mesh->rev_u-mno1->u; else du=0.;
64     if (mesh->rev_v!=0.) dv=0.5*mesh->rev_v-mno1->v; else dv=0.;
65     eval_decale(&u2,du,mno2->u,U);
66     eval_decale(&v2,dv,mno2->v,V);
67     eval_decale(&u3,du,mno3->u,U);
68     eval_decale(&v3,dv,mno3->v,V);
69     u2=u2-du;
70     v2=v2-dv;
71     u3=u3-du;
72     v3=v3-dv;
73     eval_decale(&u1,du,mno1->u,LIBRE);
74     eval_decale(&v1,dv,mno1->v,LIBRE);
75     eval_decale(&u2,du,u2,LIBRE);
76     eval_decale(&v2,dv,v2,LIBRE);
77     eval_decale(&u3,du,u3,LIBRE);
78     eval_decale(&v3,dv,v3,LIBRE);
79     u=(u1+u2+u3)/3.;
80     v=(v1+v2+v3)/3.;
81     eval_decale(&uu,-du,u,U);
82     eval_decale(&vv,-dv,v,V);
83     if (geo_point_interieur(uu,vv)==1)
84     {
85     mfacette->etat=ATTACHE;
86     tab_facette[(*nb_facette)]=i;
87     (*nb_facette)++;
88     mesh->nb_facette_attache++;
89     }
90     }
91     }
92     }
93     }