00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041 #include <stdio.h>
00042 #include "mensagem.h"
00043 #include "memvirtu.h"
00044 #include "lowparam.h"
00045 #include "lowmacro.h"
00046 #include "lowsolid.h"
00047 #include "vectorop.h"
00048 #include "eulerops.h"
00049 #include "lowgeome.h"
00050 #include "shpshape.h"
00051 #include "mancommd.h"
00052
00053 #ifdef __Extended_Version
00054 void MSD_execNameCleanSolid(void)
00055 {
00056 char name[30];
00057
00058 while (1 != sscanf(restbuf, "%s", name))
00059 {
00060 printf("Nome\n");
00061 if (!lineins("? "))
00062 {
00063 return;
00064 }
00065 }
00066 MSD_highNameCleanSolid(name);
00067 }
00068
00069 #endif
00070
00071 int MSD_highNameCleanSolid(char *name)
00072 {
00073 int sn;
00074
00075 if ((sn = MSD_getSolidIdFromName(name)) == -1)
00076 {
00077 fprintf(stderr, MEN_NaoEncontrouSolidNome, NAM_CleanSolid, name);
00078 return(ERROR);
00079 }
00080 return(MSD_highCleanSolid(sn));
00081 }
00082
00083 #ifdef __Extended_Version
00084 void MSD_execCleanSolid(void)
00085 {
00086 int sn;
00087
00088 while (1 != sscanf(restbuf, "%d", &sn))
00089 {
00090 printf("clean: sn");
00091 if (!lineins("? "))
00092 {
00093 return;
00094 }
00095 }
00096 MSD_highCleanSolid(sn);
00097 }
00098
00099 #endif
00100
00101 int MSD_highCleanSolid(Id sn)
00102 {
00103 SPTYPE optr;
00104
00105 if ((optr = MSD_getSolid(sn)) == SNIL)
00106 {
00107 fprintf(stderr, MEN_NaoEncontrouSolido, NAM_CleanSolid, sn);
00108 return(ERROR);
00109 }
00110 MSD_lowCleanSolid(optr);
00111 return(SUCCESS);
00112 }
00113
00114 void MSD_lowCleanSolid(SPTYPE s)
00115 {
00116 DPTYPE d;
00117 FPTYPE f1;
00118 FPTYPE f2;
00119 FPTYPE f3;
00120 LPTYPE l1;
00121 LPTYPE l3;
00122 EPTYPE e1;
00123 EPTYPE e3;
00124 HPTYPE he1;
00125 HPTYPE he2;
00126 VPTYPE v1;
00127 VPTYPE v2;
00128 VPTYPE v3;
00129 int flag1;
00130
00131
00132 for (AllShellsSolid(s, d))
00133 {
00134 for (e1 = SheSEdges(d); e1 != ENIL;)
00135 {
00136 flag1 = 0;
00137 if (MSD_lowVtxVtxContainment(HalVtx(EdgHe1(e1)), HalVtx(EdgHe2(e1))))
00138 {
00139 if (HalVtx(EdgHe1(e1)) != HalVtx(EdgHe2(e1)))
00140 {
00141 e3 = EdgNextE(e1);
00142 flag1 = 1;
00143 MSD_lowKEV(EdgHe1(e1), EdgHe2(e1));
00144 }
00145 }
00146 e1 = (flag1 == 0) ? (EdgNextE(e1)) : e3;
00147 }
00148 }
00149
00150
00151 for (AllShellsSolid(s, d))
00152 {
00153 for (f1 = SheSFaces(d); f1 != FNIL;)
00154 {
00155 flag1 = 0;
00156 if (vecnull(FacFeq(f1), EPS))
00157 {
00158 f3 = FacNextF(f1);
00159 flag1 = 1;
00160 MSD_lowMakeFaceToPoint(f1);
00161 }
00162 f1 = (flag1 == 0) ? (FacNextF(f1)) : f3;
00163 }
00164 }
00165
00166
00167 for (AllShellsSolid(s, d))
00168 {
00169 for (e1 = SheSEdges(d); e1 != ENIL;)
00170 {
00171 flag1 = 0;
00172 f1 = LooLFace(HalWLoop(EdgHe1(e1)));
00173 f2 = LooLFace(HalWLoop(EdgHe2(e1)));
00174 if ((f1 != f2) && MSD_lowFacFacEqualEqs(f1, f2))
00175 {
00176 e3 = EdgNextE(e1);
00177 flag1 = 1;
00178 MSD_lowKEF(EdgHe1(e1), EdgHe2(e1));
00179 }
00180 e1 = (flag1 == 0) ? (EdgNextE(e1)) : e3;
00181 }
00182 }
00183
00184
00185 for (AllShellsSolid(s, d))
00186 {
00187 for (e1 = SheSEdges(d); e1 != ENIL;)
00188 {
00189 flag1 = 0;
00190 if (HalWLoop(EdgHe1(e1)) == HalWLoop(EdgHe2(e1)))
00191 {
00192 if (HalNxt(EdgHe2(e1)) == EdgHe1(e1))
00193 {
00194 e3 = EdgNextE(e1);
00195 flag1 = 1;
00196 MSD_lowKEV(EdgHe1(e1), EdgHe2(e1));
00197 }
00198 else
00199 if (HalNxt(EdgHe1(e1)) == EdgHe2(e1))
00200 {
00201 e3 = EdgNextE(e1);
00202 flag1 = 1;
00203 MSD_lowKEV(EdgHe2(e1), EdgHe1(e1));
00204 }
00205 else
00206 {
00207 e3 = EdgNextE(e1);
00208 flag1 = 1;
00209 v2 = HalVtx(EdgHe2(e1));
00210 l1 = HalWLoop(EdgHe1(e1));
00211 MSD_lowKEMR(EdgHe1(e1), EdgHe2(e1));
00212 if (FacFLOut(LooLFace(l1)) == l1)
00213 {
00214 if (MSD_lowLooVtxContainment(l1, v2, getdrop(FacFeq(LooLFace(l1)))) != 1)
00215 {
00216 FacFLOut(LooLFace(l1)) = HalWLoop(VerVEdge(v2));
00217 }
00218 }
00219 }
00220 }
00221 e1 = (flag1 == 0) ? (EdgNextE(e1)) : e3;
00222 }
00223 }
00224
00225
00226 for (AllShellsSolid(s, d))
00227 {
00228 for (AllFacesShell(d, f1))
00229 {
00230 for (l1 = FacFLoops(f1); l1 != LNIL;)
00231 {
00232 he1 = LooLEdg(l1);
00233 flag1 = 0;
00234 if ((HalNxt(he1) == he1) && (FacFLOut(f1) != l1))
00235 {
00236 l3 = LooNextL(l1);
00237 flag1 = 1;
00238 he2 = LooLEdg(FacFLOut(f1));
00239 MSD_lowMEKR(he2, he1);
00240 MSD_lowKEV(HalPrv(he2), mate(HalPrv(he2)));
00241 }
00242 l1 = (flag1 == 0) ? (LooNextL(l1)) : l3;
00243 }
00244 }
00245 }
00246
00247
00248 for (AllShellsSolid(s, d))
00249 {
00250 for (v1 = SheSVerts(d); v1 != VNIL;)
00251 {
00252 flag1 = 0;
00253 he1 = VerVEdge(v1);
00254 if (he1 != HNIL)
00255 {
00256 he2 = HalNxt(mate(he1));
00257 if ((he1 != he2) && (he1 == HalNxt(mate(he2))))
00258 {
00259 if (MSD_lowEdgEdgColinear(HalEdg(he1), HalEdg(he2)))
00260 {
00261 v3 = VerNextV(v1);
00262 flag1 = 1;
00263 MSD_lowKEV(he1, mate(he1));
00264 }
00265 }
00266 v1 = (flag1 == 0) ? (VerNextV(v1)) : v3;
00267 }
00268 else
00269 {
00270 v1 = VerNextV(v1);
00271 }
00272 }
00273 }
00274
00275 MSD_lowSetNormal(s, TRUE);
00276 MSD_lowSetEdgeAngle(s);
00277 }