mirror of
https://github.com/NGSolve/netgen.git
synced 2024-11-14 10:08:32 +05:00
1733 lines
34 KiB
C++
1733 lines
34 KiB
C++
#include <mystdlib.h>
|
|
|
|
#include <linalg.hpp>
|
|
#include <csg.hpp>
|
|
|
|
|
|
namespace netgen
|
|
{
|
|
//using namespace netgen;
|
|
|
|
|
|
/*
|
|
SolidIterator :: SolidIterator ()
|
|
{
|
|
;
|
|
}
|
|
|
|
SolidIterator :: ~SolidIterator ()
|
|
{
|
|
;
|
|
}
|
|
*/
|
|
|
|
|
|
|
|
// int Solid :: cntnames = 0;
|
|
|
|
Solid :: Solid (Primitive * aprim)
|
|
{
|
|
op = TERM;
|
|
prim = aprim;
|
|
s1 = s2 = NULL;
|
|
maxh = 1e10;
|
|
name = NULL;
|
|
}
|
|
|
|
Solid :: Solid (optyp aop, Solid * as1, Solid * as2)
|
|
{
|
|
op = aop;
|
|
s1 = as1;
|
|
s2 = as2;
|
|
prim = NULL;
|
|
name = NULL;
|
|
maxh = 1e10;
|
|
}
|
|
|
|
Solid :: ~Solid ()
|
|
{
|
|
// cout << "delete solid, op = " << int(op) << endl;
|
|
delete [] name;
|
|
|
|
switch (op)
|
|
{
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
if (s1->op != ROOT) delete s1;
|
|
if (s2->op != ROOT) delete s2;
|
|
break;
|
|
}
|
|
case SUB:
|
|
// case ROOT:
|
|
{
|
|
if (s1->op != ROOT) delete s1;
|
|
break;
|
|
}
|
|
case TERM:
|
|
{
|
|
// cout << "has term" << endl;
|
|
delete prim;
|
|
break;
|
|
}
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
void Solid :: SetName (const char * aname)
|
|
{
|
|
delete [] name;
|
|
name = new char[strlen (aname)+1];
|
|
strcpy (name, aname);
|
|
}
|
|
|
|
|
|
Solid * Solid :: Copy (CSGeometry & geom) const
|
|
{
|
|
Solid * nsol(NULL);
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
Primitive * nprim = prim->Copy();
|
|
geom.AddSurfaces (nprim);
|
|
nsol = new Solid (nprim);
|
|
break;
|
|
}
|
|
|
|
case SECTION:
|
|
case UNION:
|
|
{
|
|
nsol = new Solid (op, s1->Copy(geom), s2->Copy(geom));
|
|
break;
|
|
}
|
|
|
|
case SUB:
|
|
{
|
|
nsol = new Solid (SUB, s1 -> Copy (geom));
|
|
break;
|
|
}
|
|
|
|
case ROOT:
|
|
{
|
|
nsol = s1->Copy(geom);
|
|
break;
|
|
}
|
|
}
|
|
|
|
return nsol;
|
|
}
|
|
|
|
|
|
void Solid :: Transform (Transformation<3> & trans)
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
prim -> Transform (trans);
|
|
break;
|
|
}
|
|
case SECTION:
|
|
case UNION:
|
|
{
|
|
s1 -> Transform (trans);
|
|
s2 -> Transform (trans);
|
|
break;
|
|
}
|
|
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> Transform (trans);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
void Solid :: IterateSolid (SolidIterator & it,
|
|
bool only_once)
|
|
{
|
|
if (only_once)
|
|
{
|
|
if (visited)
|
|
return;
|
|
|
|
visited = 1;
|
|
}
|
|
|
|
it.Do (this);
|
|
|
|
switch (op)
|
|
{
|
|
case SECTION:
|
|
{
|
|
s1->IterateSolid (it, only_once);
|
|
s2->IterateSolid (it, only_once);
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
s1->IterateSolid (it, only_once);
|
|
s2->IterateSolid (it, only_once);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1->IterateSolid (it, only_once);
|
|
break;
|
|
}
|
|
case TERM:
|
|
case TERM_REF:
|
|
break; // do nothing
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
bool Solid :: IsIn (const Point<3> & p, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->PointInSolid (p, eps);
|
|
return ( (ist == IS_INSIDE) || (ist == DOES_INTERSECT) ) ? 1 : 0;
|
|
}
|
|
case SECTION:
|
|
return s1->IsIn (p, eps) && s2->IsIn (p, eps);
|
|
case UNION:
|
|
return s1->IsIn (p, eps) || s2->IsIn (p, eps);
|
|
case SUB:
|
|
return !s1->IsStrictIn (p, eps);
|
|
case ROOT:
|
|
return s1->IsIn (p, eps);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
bool Solid :: IsStrictIn (const Point<3> & p, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->PointInSolid (p, eps);
|
|
return (ist == IS_INSIDE) ? 1 : 0;
|
|
}
|
|
case SECTION:
|
|
return s1->IsStrictIn(p, eps) && s2->IsStrictIn(p, eps);
|
|
case UNION:
|
|
return s1->IsStrictIn(p, eps) || s2->IsStrictIn(p, eps);
|
|
case SUB:
|
|
return !s1->IsIn (p, eps);
|
|
case ROOT:
|
|
return s1->IsStrictIn (p, eps);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
bool Solid :: VectorIn (const Point<3> & p, const Vec<3> & v,
|
|
double eps) const
|
|
{
|
|
Vec<3> hv;
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->VecInSolid (p, v, eps);
|
|
return (ist == IS_INSIDE || ist == DOES_INTERSECT) ? 1 : 0;
|
|
}
|
|
case SECTION:
|
|
return s1 -> VectorIn (p, v, eps) && s2 -> VectorIn (p, v, eps);
|
|
case UNION:
|
|
return s1 -> VectorIn (p, v, eps) || s2 -> VectorIn (p, v, eps);
|
|
case SUB:
|
|
return !s1->VectorStrictIn(p, v, eps);
|
|
case ROOT:
|
|
return s1->VectorIn(p, v, eps);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
bool Solid :: VectorStrictIn (const Point<3> & p, const Vec<3> & v,
|
|
double eps) const
|
|
{
|
|
Vec<3> hv;
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->VecInSolid (p, v, eps);
|
|
return (ist == IS_INSIDE) ? true : false;
|
|
}
|
|
case SECTION:
|
|
return s1 -> VectorStrictIn (p, v, eps) &&
|
|
s2 -> VectorStrictIn (p, v, eps);
|
|
case UNION:
|
|
return s1 -> VectorStrictIn (p, v, eps) ||
|
|
s2 -> VectorStrictIn (p, v, eps);
|
|
case SUB:
|
|
return !s1->VectorIn(p, v, eps);
|
|
case ROOT:
|
|
return s1->VectorStrictIn(p, v, eps);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
bool Solid::VectorIn2 (const Point<3> & p, const Vec<3> & v1,
|
|
const Vec<3> & v2, double eps) const
|
|
{
|
|
if (VectorStrictIn (p, v1, eps))
|
|
return 1;
|
|
if (!VectorIn (p, v1, eps))
|
|
return 0;
|
|
|
|
bool res = VectorIn2Rec (p, v1, v2, eps);
|
|
return res;
|
|
}
|
|
|
|
bool Solid::VectorIn2Rec (const Point<3> & p, const Vec<3> & v1,
|
|
const Vec<3> & v2, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
return (prim->VecInSolid2 (p, v1, v2, eps) != IS_OUTSIDE); // Is this correct????
|
|
case SECTION:
|
|
return s1->VectorIn2Rec (p, v1, v2, eps) &&
|
|
s2->VectorIn2Rec (p, v1, v2, eps);
|
|
case UNION:
|
|
return s1->VectorIn2Rec (p, v1, v2, eps) ||
|
|
s2->VectorIn2Rec (p, v1, v2, eps);
|
|
case SUB:
|
|
return !s1->VectorIn2Rec (p, v1, v2, eps);
|
|
case ROOT:
|
|
return s1->VectorIn2Rec (p, v1, v2, eps);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void Solid :: Print (ostream & str) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
str << prim->GetSurfaceId(0);
|
|
for (int i = 1; i < prim->GetNSurfaces(); i++)
|
|
str << "," << prim->GetSurfaceId(i);
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
str << "(";
|
|
s1 -> Print (str);
|
|
str << " AND ";
|
|
s2 -> Print (str);
|
|
str << ")";
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
str << "(";
|
|
s1 -> Print (str);
|
|
str << " OR ";
|
|
s2 -> Print (str);
|
|
str << ")";
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
str << " NOT ";
|
|
s1 -> Print (str);
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
str << " [" << name << "=";
|
|
s1 -> Print (str);
|
|
str << "] ";
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
void Solid :: GetSolidData (ostream & ost, int first) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case SECTION:
|
|
{
|
|
ost << "(";
|
|
s1 -> GetSolidData (ost, 0);
|
|
ost << " AND ";
|
|
s2 -> GetSolidData (ost, 0);
|
|
ost << ")";
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
ost << "(";
|
|
s1 -> GetSolidData (ost, 0);
|
|
ost << " OR ";
|
|
s2 -> GetSolidData (ost, 0);
|
|
ost << ")";
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
ost << "NOT ";
|
|
s1 -> GetSolidData (ost, 0);
|
|
break;
|
|
}
|
|
case TERM: case TERM_REF:
|
|
{
|
|
if (name)
|
|
ost << name;
|
|
else
|
|
ost << "(noname)";
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
if (first)
|
|
s1 -> GetSolidData (ost, 0);
|
|
else
|
|
ost << name;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
static Solid * CreateSolidExpr (istream & ist, const SYMBOLTABLE<Solid*> & solids);
|
|
static Solid * CreateSolidTerm (istream & ist, const SYMBOLTABLE<Solid*> & solids);
|
|
static Solid * CreateSolidPrim (istream & ist, const SYMBOLTABLE<Solid*> & solids);
|
|
|
|
static void ReadString (istream & ist, char * str)
|
|
{
|
|
//char * hstr = str;
|
|
char ch;
|
|
|
|
while (1)
|
|
{
|
|
ist.get(ch);
|
|
if (!ist.good()) break;
|
|
|
|
if (!isspace (ch))
|
|
{
|
|
ist.putback (ch);
|
|
break;
|
|
}
|
|
}
|
|
|
|
while (1)
|
|
{
|
|
ist.get(ch);
|
|
if (!ist.good()) break;
|
|
if (isalpha(ch) || isdigit(ch))
|
|
{
|
|
*str = ch;
|
|
str++;
|
|
}
|
|
else
|
|
{
|
|
ist.putback (ch);
|
|
break;
|
|
}
|
|
}
|
|
*str = 0;
|
|
// cout << "Read string (" << hstr << ")"
|
|
// << "put back: " << ch << endl;
|
|
}
|
|
|
|
|
|
Solid * CreateSolidExpr (istream & ist, const SYMBOLTABLE<Solid*> & solids)
|
|
{
|
|
// cout << "create expr" << endl;
|
|
|
|
Solid *s1, *s2;
|
|
char str[100];
|
|
|
|
s1 = CreateSolidTerm (ist, solids);
|
|
ReadString (ist, str);
|
|
if (strcmp (str, "OR") == 0)
|
|
{
|
|
// cout << " OR ";
|
|
s2 = CreateSolidExpr (ist, solids);
|
|
return new Solid (Solid::UNION, s1, s2);
|
|
}
|
|
|
|
// cout << "no OR found, put back string: " << str << endl;
|
|
for (int i = int(strlen(str))-1; i >= 0; i--)
|
|
ist.putback (str[i]);
|
|
|
|
return s1;
|
|
}
|
|
|
|
Solid * CreateSolidTerm (istream & ist, const SYMBOLTABLE<Solid*> & solids)
|
|
{
|
|
// cout << "create term" << endl;
|
|
|
|
Solid *s1, *s2;
|
|
char str[100];
|
|
|
|
s1 = CreateSolidPrim (ist, solids);
|
|
ReadString (ist, str);
|
|
if (strcmp (str, "AND") == 0)
|
|
{
|
|
// cout << " AND ";
|
|
s2 = CreateSolidTerm (ist, solids);
|
|
return new Solid (Solid::SECTION, s1, s2);
|
|
}
|
|
|
|
|
|
// cout << "no AND found, put back string: " << str << endl;
|
|
for (int i = int(strlen(str))-1; i >= 0; i--)
|
|
ist.putback (str[i]);
|
|
|
|
return s1;
|
|
}
|
|
|
|
Solid * CreateSolidPrim (istream & ist, const SYMBOLTABLE<Solid*> & solids)
|
|
{
|
|
Solid * s1;
|
|
char ch;
|
|
char str[100];
|
|
|
|
ist >> ch;
|
|
if (ch == '(')
|
|
{
|
|
s1 = CreateSolidExpr (ist, solids);
|
|
ist >> ch; // ')'
|
|
// cout << "close back " << ch << endl;
|
|
return s1;
|
|
}
|
|
ist.putback (ch);
|
|
|
|
ReadString (ist, str);
|
|
if (strcmp (str, "NOT") == 0)
|
|
{
|
|
// cout << " NOT ";
|
|
s1 = CreateSolidPrim (ist, solids);
|
|
return new Solid (Solid::SUB, s1);
|
|
}
|
|
|
|
(*testout) << "get terminal " << str << endl;
|
|
s1 = solids.Get(str);
|
|
if (s1)
|
|
{
|
|
// cout << "primitive: " << str << endl;
|
|
return s1;
|
|
}
|
|
cerr << "syntax error" << endl;
|
|
|
|
return NULL;
|
|
}
|
|
|
|
|
|
Solid * Solid :: CreateSolid (istream & ist, const SYMBOLTABLE<Solid*> & solids)
|
|
{
|
|
Solid * nsol = CreateSolidExpr (ist, solids);
|
|
nsol = new Solid (ROOT, nsol);
|
|
(*testout) << "Print new sol: ";
|
|
nsol -> Print (*testout);
|
|
(*testout) << endl;
|
|
return nsol;
|
|
}
|
|
|
|
|
|
|
|
void Solid :: Boundaries (const Point<3> & p, Array<int> & bounds) const
|
|
{
|
|
int in, strin;
|
|
bounds.SetSize (0);
|
|
RecBoundaries (p, bounds, in, strin);
|
|
}
|
|
|
|
void Solid :: RecBoundaries (const Point<3> & p, Array<int> & bounds,
|
|
int & in, int & strin) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
/*
|
|
double val;
|
|
val = surf->CalcFunctionValue (p);
|
|
in = (val < 1e-6);
|
|
strin = (val < -1e-6);
|
|
if (in && !strin) bounds.Append (id);
|
|
*/
|
|
if (prim->PointInSolid (p, 1e-6) == DOES_INTERSECT)
|
|
bounds.Append (prim->GetSurfaceId (1));
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
int i, in1, in2, strin1, strin2;
|
|
Array<int> bounds1, bounds2;
|
|
|
|
s1 -> RecBoundaries (p, bounds1, in1, strin1);
|
|
s2 -> RecBoundaries (p, bounds2, in2, strin2);
|
|
|
|
if (in1 && in2)
|
|
{
|
|
for (i = 1; i <= bounds1.Size(); i++)
|
|
bounds.Append (bounds1.Get(i));
|
|
for (i = 1; i <= bounds2.Size(); i++)
|
|
bounds.Append (bounds2.Get(i));
|
|
}
|
|
in = (in1 && in2);
|
|
strin = (strin1 && strin2);
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
int i, in1, in2, strin1, strin2;
|
|
Array<int> bounds1, bounds2;
|
|
|
|
s1 -> RecBoundaries (p, bounds1, in1, strin1);
|
|
s2 -> RecBoundaries (p, bounds2, in2, strin2);
|
|
|
|
if (!strin1 && !strin2)
|
|
{
|
|
for (i = 1; i <= bounds1.Size(); i++)
|
|
bounds.Append (bounds1.Get(i));
|
|
for (i = 1; i <= bounds2.Size(); i++)
|
|
bounds.Append (bounds2.Get(i));
|
|
}
|
|
in = (in1 || in2);
|
|
strin = (strin1 || strin2);
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
int hin, hstrin;
|
|
s1 -> RecBoundaries (p, bounds, hin, hstrin);
|
|
in = !hstrin;
|
|
strin = !hin;
|
|
break;
|
|
}
|
|
|
|
case ROOT:
|
|
{
|
|
s1 -> RecBoundaries (p, bounds, in, strin);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void Solid :: TangentialSolid (const Point<3> & p, Solid *& tansol, Array<int> & surfids, double eps) const
|
|
{
|
|
int in, strin;
|
|
RecTangentialSolid (p, tansol, surfids, in, strin, eps);
|
|
surfids.SetSize (0);
|
|
if (tansol)
|
|
tansol -> GetTangentialSurfaceIndices (p, surfids, eps);
|
|
}
|
|
|
|
|
|
void Solid :: RecTangentialSolid (const Point<3> & p, Solid *& tansol, Array<int> & surfids,
|
|
int & in, int & strin, double eps) const
|
|
{
|
|
tansol = NULL;
|
|
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->PointInSolid(p, eps);
|
|
|
|
in = (ist == IS_INSIDE || ist == DOES_INTERSECT);
|
|
strin = (ist == IS_INSIDE);
|
|
|
|
if (ist == DOES_INTERSECT)
|
|
{
|
|
tansol = new Solid (prim);
|
|
tansol -> op = TERM_REF;
|
|
}
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1, * tansol2;
|
|
|
|
s1 -> RecTangentialSolid (p, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialSolid (p, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (in1 && in2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (SECTION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
in = (in1 && in2);
|
|
strin = (strin1 && strin2);
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1 = 0, * tansol2 = 0;
|
|
|
|
s1 -> RecTangentialSolid (p, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialSolid (p, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (!strin1 && !strin2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (UNION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
else
|
|
{
|
|
delete tansol1;
|
|
delete tansol2;
|
|
}
|
|
in = (in1 || in2);
|
|
strin = (strin1 || strin2);
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
int hin, hstrin;
|
|
Solid * tansol1;
|
|
|
|
s1 -> RecTangentialSolid (p, tansol1, surfids, hin, hstrin, eps);
|
|
|
|
if (tansol1)
|
|
tansol = new Solid (SUB, tansol1);
|
|
in = !hstrin;
|
|
strin = !hin;
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
s1 -> RecTangentialSolid (p, tansol, surfids, in, strin, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
void Solid :: TangentialSolid2 (const Point<3> & p,
|
|
const Vec<3> & t,
|
|
Solid *& tansol, Array<int> & surfids, double eps) const
|
|
{
|
|
int in, strin;
|
|
surfids.SetSize (0);
|
|
RecTangentialSolid2 (p, t, tansol, surfids, in, strin, eps);
|
|
if (tansol)
|
|
tansol -> GetTangentialSurfaceIndices2 (p, t, surfids, eps);
|
|
}
|
|
|
|
void Solid :: RecTangentialSolid2 (const Point<3> & p, const Vec<3> & t,
|
|
Solid *& tansol, Array<int> & surfids,
|
|
int & in, int & strin, double eps) const
|
|
{
|
|
tansol = NULL;
|
|
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
/*
|
|
double val;
|
|
val = surf->CalcFunctionValue (p);
|
|
in = (val < 1e-6);
|
|
strin = (val < -1e-6);
|
|
if (in && !strin)
|
|
tansol = new Solid (surf, id);
|
|
*/
|
|
|
|
INSOLID_TYPE ist = prim->PointInSolid(p, eps);
|
|
if (ist == DOES_INTERSECT)
|
|
ist = prim->VecInSolid (p, t, eps);
|
|
|
|
in = (ist == IS_INSIDE || ist == DOES_INTERSECT);
|
|
strin = (ist == IS_INSIDE);
|
|
|
|
if (ist == DOES_INTERSECT)
|
|
{
|
|
tansol = new Solid (prim);
|
|
tansol -> op = TERM_REF;
|
|
}
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1, * tansol2;
|
|
|
|
s1 -> RecTangentialSolid2 (p, t, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialSolid2 (p, t, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (in1 && in2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (SECTION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
in = (in1 && in2);
|
|
strin = (strin1 && strin2);
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1, * tansol2;
|
|
|
|
s1 -> RecTangentialSolid2 (p, t, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialSolid2 (p, t, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (!strin1 && !strin2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (UNION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
in = (in1 || in2);
|
|
strin = (strin1 || strin2);
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
int hin, hstrin;
|
|
Solid * tansol1;
|
|
|
|
s1 -> RecTangentialSolid2 (p, t, tansol1, surfids, hin, hstrin, eps);
|
|
|
|
if (tansol1)
|
|
tansol = new Solid (SUB, tansol1);
|
|
in = !hstrin;
|
|
strin = !hin;
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
s1 -> RecTangentialSolid2 (p, t, tansol, surfids, in, strin, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void Solid :: TangentialSolid3 (const Point<3> & p,
|
|
const Vec<3> & t, const Vec<3> & t2,
|
|
Solid *& tansol, Array<int> & surfids,
|
|
double eps) const
|
|
{
|
|
int in, strin;
|
|
surfids.SetSize (0);
|
|
RecTangentialSolid3 (p, t, t2, tansol, surfids, in, strin, eps);
|
|
|
|
if (tansol)
|
|
tansol -> GetTangentialSurfaceIndices3 (p, t, t2, surfids, eps);
|
|
}
|
|
|
|
void Solid :: RecTangentialSolid3 (const Point<3> & p,
|
|
const Vec<3> & t, const Vec<3> & t2,
|
|
Solid *& tansol, Array<int> & surfids,
|
|
int & in, int & strin, double eps) const
|
|
{
|
|
tansol = NULL;
|
|
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->PointInSolid(p, eps);
|
|
|
|
if (ist == DOES_INTERSECT)
|
|
ist = prim->VecInSolid3 (p, t, t2, eps);
|
|
in = (ist == IS_INSIDE || ist == DOES_INTERSECT);
|
|
strin = (ist == IS_INSIDE);
|
|
|
|
if (ist == DOES_INTERSECT)
|
|
{
|
|
tansol = new Solid (prim);
|
|
tansol -> op = TERM_REF;
|
|
}
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1, * tansol2;
|
|
|
|
s1 -> RecTangentialSolid3 (p, t, t2, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialSolid3 (p, t, t2, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (in1 && in2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (SECTION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
in = (in1 && in2);
|
|
strin = (strin1 && strin2);
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1, * tansol2;
|
|
|
|
s1 -> RecTangentialSolid3 (p, t, t2, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialSolid3 (p, t, t2, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (!strin1 && !strin2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (UNION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
in = (in1 || in2);
|
|
strin = (strin1 || strin2);
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
int hin, hstrin;
|
|
Solid * tansol1;
|
|
|
|
s1 -> RecTangentialSolid3 (p, t, t2, tansol1, surfids, hin, hstrin, eps);
|
|
|
|
if (tansol1)
|
|
tansol = new Solid (SUB, tansol1);
|
|
in = !hstrin;
|
|
strin = !hin;
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
s1 -> RecTangentialSolid3 (p, t, t2, tansol, surfids, in, strin, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void Solid :: TangentialEdgeSolid (const Point<3> & p,
|
|
const Vec<3> & t, const Vec<3> & t2, const Vec<3> & m,
|
|
Solid *& tansol, Array<int> & surfids,
|
|
double eps) const
|
|
{
|
|
int in, strin;
|
|
surfids.SetSize (0);
|
|
|
|
// *testout << "tangentialedgesolid,sol = " << (*this) << endl;
|
|
RecTangentialEdgeSolid (p, t, t2, m, tansol, surfids, in, strin, eps);
|
|
|
|
if (tansol)
|
|
tansol -> RecGetTangentialEdgeSurfaceIndices (p, t, t2, m, surfids, eps);
|
|
}
|
|
|
|
void Solid :: RecTangentialEdgeSolid (const Point<3> & p,
|
|
const Vec<3> & t, const Vec<3> & t2, const Vec<3> & m,
|
|
Solid *& tansol, Array<int> & surfids,
|
|
int & in, int & strin, double eps) const
|
|
{
|
|
tansol = NULL;
|
|
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->PointInSolid(p, eps);
|
|
|
|
/*
|
|
(*testout) << "tangedgesolid, p = " << p << ", t = " << t
|
|
<< " for prim " << typeid (*prim).name()
|
|
<< " with surf " << prim->GetSurface() << endl;
|
|
(*testout) << "ist = " << ist << endl;
|
|
*/
|
|
|
|
if (ist == DOES_INTERSECT)
|
|
ist = prim->VecInSolid4 (p, t, t2, m, eps);
|
|
|
|
// (*testout) << "ist2 = " << ist << endl;
|
|
|
|
in = (ist == IS_INSIDE || ist == DOES_INTERSECT);
|
|
strin = (ist == IS_INSIDE);
|
|
|
|
if (ist == DOES_INTERSECT)
|
|
{
|
|
tansol = new Solid (prim);
|
|
tansol -> op = TERM_REF;
|
|
}
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1, * tansol2;
|
|
|
|
s1 -> RecTangentialEdgeSolid (p, t, t2, m, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialEdgeSolid (p, t, t2, m, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (in1 && in2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (SECTION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
in = (in1 && in2);
|
|
strin = (strin1 && strin2);
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
int in1, in2, strin1, strin2;
|
|
Solid * tansol1, * tansol2;
|
|
|
|
s1 -> RecTangentialEdgeSolid (p, t, t2, m, tansol1, surfids, in1, strin1, eps);
|
|
s2 -> RecTangentialEdgeSolid (p, t, t2, m, tansol2, surfids, in2, strin2, eps);
|
|
|
|
if (!strin1 && !strin2)
|
|
{
|
|
if (tansol1 && tansol2)
|
|
tansol = new Solid (UNION, tansol1, tansol2);
|
|
else if (tansol1)
|
|
tansol = tansol1;
|
|
else if (tansol2)
|
|
tansol = tansol2;
|
|
}
|
|
in = (in1 || in2);
|
|
strin = (strin1 || strin2);
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
int hin, hstrin;
|
|
Solid * tansol1;
|
|
|
|
s1 -> RecTangentialEdgeSolid (p, t, t2, m, tansol1, surfids, hin, hstrin, eps);
|
|
|
|
if (tansol1)
|
|
tansol = new Solid (SUB, tansol1);
|
|
in = !hstrin;
|
|
strin = !hin;
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
s1 -> RecTangentialEdgeSolid (p, t, t2, m, tansol, surfids, in, strin, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
int Solid :: Edge (const Point<3> & p, const Vec<3> & v, double eps) const
|
|
{
|
|
int in, strin, faces;
|
|
RecEdge (p, v, in, strin, faces, eps);
|
|
return faces >= 2;
|
|
}
|
|
|
|
int Solid :: OnFace (const Point<3> & p, const Vec<3> & v, double eps) const
|
|
{
|
|
int in, strin, faces;
|
|
RecEdge (p, v, in, strin, faces, eps);
|
|
return faces >= 1;
|
|
}
|
|
|
|
|
|
void Solid :: RecEdge (const Point<3> & p, const Vec<3> & v,
|
|
int & in, int & strin, int & faces, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
INSOLID_TYPE ist = prim->VecInSolid (p, v, eps);
|
|
in = (ist == IS_INSIDE || ist == DOES_INTERSECT);
|
|
strin = (ist == IS_INSIDE);
|
|
/*
|
|
in = VectorIn (p, v);
|
|
strin = VectorStrictIn (p, v);
|
|
*/
|
|
faces = 0;
|
|
|
|
if (in && ! strin)
|
|
{
|
|
// faces = 1;
|
|
int i;
|
|
Vec<3> grad;
|
|
for (i = 0; i < prim->GetNSurfaces(); i++)
|
|
{
|
|
double val = prim->GetSurface(i).CalcFunctionValue(p);
|
|
prim->GetSurface(i).CalcGradient (p, grad);
|
|
if (fabs (val) < eps && fabs (v * grad) < 1e-6)
|
|
faces++;
|
|
}
|
|
}
|
|
// else
|
|
// faces = 0;
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
int in1, in2, strin1, strin2, faces1, faces2;
|
|
|
|
s1 -> RecEdge (p, v, in1, strin1, faces1, eps);
|
|
s2 -> RecEdge (p, v, in2, strin2, faces2, eps);
|
|
|
|
faces = 0;
|
|
if (in1 && in2)
|
|
faces = faces1 + faces2;
|
|
in = in1 && in2;
|
|
strin = strin1 && strin2;
|
|
break;
|
|
}
|
|
case UNION:
|
|
{
|
|
int in1, in2, strin1, strin2, faces1, faces2;
|
|
|
|
s1 -> RecEdge (p, v, in1, strin1, faces1, eps);
|
|
s2 -> RecEdge (p, v, in2, strin2, faces2, eps);
|
|
|
|
faces = 0;
|
|
if (!strin1 && !strin2)
|
|
faces = faces1 + faces2;
|
|
in = in1 || in2;
|
|
strin = strin1 || strin2;
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
int in1, strin1;
|
|
s1 -> RecEdge (p, v, in1, strin1, faces, eps);
|
|
in = !strin1;
|
|
strin = !in1;
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
s1 -> RecEdge (p, v, in, strin, faces, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void Solid :: CalcSurfaceInverse ()
|
|
{
|
|
CalcSurfaceInverseRec (0);
|
|
}
|
|
|
|
void Solid :: CalcSurfaceInverseRec (int inv)
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
bool priminv;
|
|
for (int i = 0; i < prim->GetNSurfaces(); i++)
|
|
{
|
|
priminv = (prim->SurfaceInverted(i) != 0);
|
|
if (inv) priminv = !priminv;
|
|
prim->GetSurface(i).SetInverse (priminv);
|
|
}
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> CalcSurfaceInverseRec (inv);
|
|
s2 -> CalcSurfaceInverseRec (inv);
|
|
break;
|
|
}
|
|
case SUB:
|
|
{
|
|
s1 -> CalcSurfaceInverseRec (1 - inv);
|
|
break;
|
|
}
|
|
case ROOT:
|
|
{
|
|
s1 -> CalcSurfaceInverseRec (inv);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
Solid * Solid :: GetReducedSolid (const BoxSphere<3> & box) const
|
|
{
|
|
INSOLID_TYPE in;
|
|
return RecGetReducedSolid (box, in);
|
|
}
|
|
|
|
Solid * Solid :: RecGetReducedSolid (const BoxSphere<3> & box, INSOLID_TYPE & in) const
|
|
{
|
|
Solid * redsol = NULL;
|
|
|
|
switch (op)
|
|
{
|
|
case TERM:
|
|
case TERM_REF:
|
|
{
|
|
in = prim -> BoxInSolid (box);
|
|
if (in == DOES_INTERSECT)
|
|
{
|
|
redsol = new Solid (prim);
|
|
redsol -> op = TERM_REF;
|
|
}
|
|
break;
|
|
}
|
|
case SECTION:
|
|
{
|
|
INSOLID_TYPE in1, in2;
|
|
Solid * redsol1, * redsol2;
|
|
|
|
redsol1 = s1 -> RecGetReducedSolid (box, in1);
|
|
redsol2 = s2 -> RecGetReducedSolid (box, in2);
|
|
|
|
if (in1 == IS_OUTSIDE || in2 == IS_OUTSIDE)
|
|
{
|
|
if (in1 == DOES_INTERSECT) delete redsol1;
|
|
if (in2 == DOES_INTERSECT) delete redsol2;
|
|
in = IS_OUTSIDE;
|
|
}
|
|
else
|
|
{
|
|
if (in1 == DOES_INTERSECT || in2 == DOES_INTERSECT)
|
|
in = DOES_INTERSECT;
|
|
else
|
|
in = IS_INSIDE;
|
|
|
|
if (in1 == DOES_INTERSECT && in2 == DOES_INTERSECT)
|
|
redsol = new Solid (SECTION, redsol1, redsol2);
|
|
else if (in1 == DOES_INTERSECT)
|
|
redsol = redsol1;
|
|
else if (in2 == DOES_INTERSECT)
|
|
redsol = redsol2;
|
|
}
|
|
break;
|
|
}
|
|
|
|
case UNION:
|
|
{
|
|
INSOLID_TYPE in1, in2;
|
|
Solid * redsol1, * redsol2;
|
|
|
|
redsol1 = s1 -> RecGetReducedSolid (box, in1);
|
|
redsol2 = s2 -> RecGetReducedSolid (box, in2);
|
|
|
|
if (in1 == IS_INSIDE || in2 == IS_INSIDE)
|
|
{
|
|
if (in1 == DOES_INTERSECT) delete redsol1;
|
|
if (in2 == DOES_INTERSECT) delete redsol2;
|
|
in = IS_INSIDE;
|
|
}
|
|
else
|
|
{
|
|
if (in1 == DOES_INTERSECT || in2 == DOES_INTERSECT) in = DOES_INTERSECT;
|
|
else in = IS_OUTSIDE;
|
|
|
|
if (in1 == DOES_INTERSECT && in2 == DOES_INTERSECT)
|
|
redsol = new Solid (UNION, redsol1, redsol2);
|
|
else if (in1 == DOES_INTERSECT)
|
|
redsol = redsol1;
|
|
else if (in2 == DOES_INTERSECT)
|
|
redsol = redsol2;
|
|
}
|
|
break;
|
|
}
|
|
|
|
case SUB:
|
|
{
|
|
INSOLID_TYPE in1;
|
|
Solid * redsol1 = s1 -> RecGetReducedSolid (box, in1);
|
|
|
|
switch (in1)
|
|
{
|
|
case IS_OUTSIDE: in = IS_INSIDE; break;
|
|
case IS_INSIDE: in = IS_OUTSIDE; break;
|
|
case DOES_INTERSECT: in = DOES_INTERSECT; break;
|
|
}
|
|
|
|
if (redsol1)
|
|
redsol = new Solid (SUB, redsol1);
|
|
break;
|
|
}
|
|
|
|
case ROOT:
|
|
{
|
|
INSOLID_TYPE in1;
|
|
redsol = s1 -> RecGetReducedSolid (box, in1);
|
|
in = in1;
|
|
break;
|
|
}
|
|
}
|
|
|
|
/*
|
|
if (redsol)
|
|
(*testout) << "getrecsolid, redsol = " << endl << (*redsol) << endl;
|
|
else
|
|
(*testout) << "redsol is null" << endl;
|
|
*/
|
|
|
|
return redsol;
|
|
}
|
|
|
|
|
|
int Solid :: NumPrimitives () const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
return 1;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
return s1->NumPrimitives () + s2 -> NumPrimitives();
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
return s1->NumPrimitives ();
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void Solid :: GetSurfaceIndices (Array<int> & surfind) const
|
|
{
|
|
surfind.SetSize (0);
|
|
RecGetSurfaceIndices (surfind);
|
|
}
|
|
|
|
void Solid :: RecGetSurfaceIndices (Array<int> & surfind) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
/*
|
|
int i;
|
|
for (i = 1; i <= surfind.Size(); i++)
|
|
if (surfind.Get(i) == prim->GetSurfaceId())
|
|
return;
|
|
surfind.Append (prim->GetSurfaceId());
|
|
break;
|
|
*/
|
|
for (int j = 0; j < prim->GetNSurfaces(); j++)
|
|
if (prim->SurfaceActive (j))
|
|
{
|
|
bool found = 0;
|
|
int siprim = prim->GetSurfaceId(j);
|
|
|
|
for (int i = 0; i < surfind.Size(); i++)
|
|
if (surfind[i] == siprim)
|
|
{
|
|
found = 1;
|
|
break;
|
|
}
|
|
if (!found) surfind.Append (siprim);
|
|
}
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> RecGetSurfaceIndices (surfind);
|
|
s2 -> RecGetSurfaceIndices (surfind);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> RecGetSurfaceIndices (surfind);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
void Solid :: GetTangentialSurfaceIndices (const Point<3> & p, Array<int> & surfind, double eps) const
|
|
{
|
|
surfind.SetSize (0);
|
|
RecGetTangentialSurfaceIndices (p, surfind, eps);
|
|
}
|
|
|
|
void Solid :: RecGetTangentialSurfaceIndices (const Point<3> & p, Array<int> & surfind, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
/*
|
|
for (int j = 0; j < prim->GetNSurfaces(); j++)
|
|
if (fabs (prim->GetSurface(j).CalcFunctionValue (p)) < eps)
|
|
if (!surfind.Contains (prim->GetSurfaceId(j)))
|
|
surfind.Append (prim->GetSurfaceId(j));
|
|
*/
|
|
prim->GetTangentialSurfaceIndices (p, surfind, eps);
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> RecGetTangentialSurfaceIndices (p, surfind, eps);
|
|
s2 -> RecGetTangentialSurfaceIndices (p, surfind, eps);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> RecGetTangentialSurfaceIndices (p, surfind, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void Solid :: GetTangentialSurfaceIndices2 (const Point<3> & p, const Vec<3> & v,
|
|
Array<int> & surfind, double eps) const
|
|
{
|
|
surfind.SetSize (0);
|
|
RecGetTangentialSurfaceIndices2 (p, v, surfind, eps);
|
|
}
|
|
|
|
void Solid :: RecGetTangentialSurfaceIndices2 (const Point<3> & p, const Vec<3> & v,
|
|
Array<int> & surfind, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
for (int j = 0; j < prim->GetNSurfaces(); j++)
|
|
{
|
|
if (fabs (prim->GetSurface(j).CalcFunctionValue (p)) < eps)
|
|
{
|
|
Vec<3> grad;
|
|
prim->GetSurface(j).CalcGradient (p, grad);
|
|
if (sqr (grad * v) < 1e-6 * v.Length2() * grad.Length2())
|
|
{
|
|
if (!surfind.Contains (prim->GetSurfaceId(j)))
|
|
surfind.Append (prim->GetSurfaceId(j));
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> RecGetTangentialSurfaceIndices2 (p, v, surfind, eps);
|
|
s2 -> RecGetTangentialSurfaceIndices2 (p, v, surfind, eps);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> RecGetTangentialSurfaceIndices2 (p, v, surfind, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void Solid :: GetTangentialSurfaceIndices3 (const Point<3> & p, const Vec<3> & v, const Vec<3> & v2,
|
|
Array<int> & surfind, double eps) const
|
|
{
|
|
surfind.SetSize (0);
|
|
RecGetTangentialSurfaceIndices3 (p, v, v2, surfind, eps);
|
|
}
|
|
|
|
void Solid :: RecGetTangentialSurfaceIndices3 (const Point<3> & p, const Vec<3> & v, const Vec<3> & v2,
|
|
Array<int> & surfind, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
for (int j = 0; j < prim->GetNSurfaces(); j++)
|
|
{
|
|
if (fabs (prim->GetSurface(j).CalcFunctionValue (p)) < eps)
|
|
{
|
|
Vec<3> grad;
|
|
prim->GetSurface(j).CalcGradient (p, grad);
|
|
if (sqr (grad * v) < 1e-6 * v.Length2() * grad.Length2())
|
|
{
|
|
Mat<3> hesse;
|
|
prim->GetSurface(j).CalcHesse (p, hesse);
|
|
double hv2 = v2 * grad + v * (hesse * v);
|
|
|
|
if (fabs (hv2) < 1e-6)
|
|
{
|
|
if (!surfind.Contains (prim->GetSurfaceId(j)))
|
|
surfind.Append (prim->GetSurfaceId(j));
|
|
}
|
|
/*
|
|
else
|
|
{
|
|
*testout << "QUAD NOT OK" << endl;
|
|
*testout << "v = " << v << ", v2 = " << v2 << endl;
|
|
*testout << "v * grad = " << v*grad << endl;
|
|
*testout << "v2 * grad = " << v2*grad << endl;
|
|
*testout << "v H v = " << v*(hesse*v) << endl;
|
|
*testout << "grad = " << grad << endl;
|
|
*testout << "hesse = " << hesse << endl;
|
|
*testout << "hv2 = " << v2 * grad + v * (hesse * v) << endl;
|
|
}
|
|
*/
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> RecGetTangentialSurfaceIndices3 (p, v, v2, surfind, eps);
|
|
s2 -> RecGetTangentialSurfaceIndices3 (p, v, v2, surfind, eps);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> RecGetTangentialSurfaceIndices3 (p, v, v2, surfind, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void Solid :: RecGetTangentialEdgeSurfaceIndices (const Point<3> & p, const Vec<3> & v, const Vec<3> & v2, const Vec<3> & m,
|
|
Array<int> & surfind, double eps) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
// *testout << "check vecinsolid4, p = " << p << ", v = " << v << "; m = " << m << endl;
|
|
if (prim->VecInSolid4 (p, v, v2, m, eps) == DOES_INTERSECT)
|
|
{
|
|
prim->GetTangentialVecSurfaceIndices2 (p, v, m, surfind, eps);
|
|
/*
|
|
for (int j = 0; j < prim->GetNSurfaces(); j++)
|
|
{
|
|
if (fabs (prim->GetSurface(j).CalcFunctionValue (p)) < eps)
|
|
{
|
|
Vec<3> grad;
|
|
prim->GetSurface(j).CalcGradient (p, grad);
|
|
*testout << "grad = " << grad << endl;
|
|
if (sqr (grad * v) < 1e-6 * v.Length2() * grad.Length2() &&
|
|
sqr (grad * m) < 1e-6 * m.Length2() * grad.Length2() ) // new, 18032006 JS
|
|
|
|
{
|
|
*testout << "add surf " << prim->GetSurfaceId(j) << endl;
|
|
if (!surfind.Contains (prim->GetSurfaceId(j)))
|
|
surfind.Append (prim->GetSurfaceId(j));
|
|
}
|
|
}
|
|
}
|
|
*/
|
|
}
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> RecGetTangentialEdgeSurfaceIndices (p, v, v2, m, surfind, eps);
|
|
s2 -> RecGetTangentialEdgeSurfaceIndices (p, v, v2, m, surfind, eps);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> RecGetTangentialEdgeSurfaceIndices (p, v, v2, m, surfind, eps);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void Solid :: GetSurfaceIndices (IndexSet & iset) const
|
|
{
|
|
iset.Clear();
|
|
RecGetSurfaceIndices (iset);
|
|
}
|
|
|
|
void Solid :: RecGetSurfaceIndices (IndexSet & iset) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
/*
|
|
int i;
|
|
for (i = 1; i <= surfind.Size(); i++)
|
|
if (surfind.Get(i) == prim->GetSurfaceId())
|
|
return;
|
|
surfind.Append (prim->GetSurfaceId());
|
|
break;
|
|
*/
|
|
for (int j = 0; j < prim->GetNSurfaces(); j++)
|
|
if (prim->SurfaceActive (j))
|
|
{
|
|
int siprim = prim->GetSurfaceId(j);
|
|
iset.Add (siprim);
|
|
}
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> RecGetSurfaceIndices (iset);
|
|
s2 -> RecGetSurfaceIndices (iset);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> RecGetSurfaceIndices (iset);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void Solid :: CalcOnePrimitiveSpecialPoints (const Box<3> & box, Array<Point<3> > & pts) const
|
|
{
|
|
double eps = 1e-8 * box.Diam ();
|
|
|
|
pts.SetSize (0);
|
|
this -> RecCalcOnePrimitiveSpecialPoints (pts);
|
|
for (int i = pts.Size()-1; i >= 0; i--)
|
|
{
|
|
if (!IsIn (pts[i],eps) || IsStrictIn (pts[i],eps))
|
|
pts.Delete (i);
|
|
}
|
|
}
|
|
|
|
void Solid :: RecCalcOnePrimitiveSpecialPoints (Array<Point<3> > & pts) const
|
|
{
|
|
switch (op)
|
|
{
|
|
case TERM: case TERM_REF:
|
|
{
|
|
prim -> CalcSpecialPoints (pts);
|
|
break;
|
|
}
|
|
case UNION:
|
|
case SECTION:
|
|
{
|
|
s1 -> RecCalcOnePrimitiveSpecialPoints (pts);
|
|
s2 -> RecCalcOnePrimitiveSpecialPoints (pts);
|
|
break;
|
|
}
|
|
case SUB:
|
|
case ROOT:
|
|
{
|
|
s1 -> RecCalcOnePrimitiveSpecialPoints (pts);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
BlockAllocator Solid :: ball(sizeof (Solid));
|
|
}
|