1 // Created on: 1997-07-29
2 // Created by: Jerome LEMONIER
3 // Copyright (c) 1997-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
6 // This file is part of Open CASCADE Technology software library.
8 // This library is free software; you can redistribute it and / or modify it
9 // under the terms of the GNU Lesser General Public version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
17 #include <BRepBlend_SurfPointEvolRadInv.ixx>
20 //=======================================================================
23 //=======================================================================
24 BRepBlend_SurfPointEvolRadInv::BRepBlend_SurfPointEvolRadInv
25 (const Handle(Adaptor3d_HSurface)& S,
26 const Handle(Adaptor3d_HCurve)& C,
27 const Handle(Law_Function)& Evol
32 //=======================================================================
35 //=======================================================================
36 void BRepBlend_SurfPointEvolRadInv::Set(const Standard_Integer Choix)
53 //=======================================================================
56 //=======================================================================
57 Standard_Integer BRepBlend_SurfPointEvolRadInv::NbEquations() const
62 //=======================================================================
65 //=======================================================================
66 Standard_Boolean BRepBlend_SurfPointEvolRadInv::Value(const math_Vector& X,math_Vector& F)
68 Standard_Real theD,norm,unsurnorm;
71 gp_XYZ nplan(0.,0.,0.),ns(0.,0.,0.),ref(0.,0.,0.);
72 curv->D1(X(1),ptcur,d1cur);
73 ray = sg1*tevol->Value(X(1));
74 nplan = d1cur.Normalized().XYZ();
75 theD = -(nplan.Dot(ptcur.XYZ()));
76 surf->D1(X(2),X(3),pts,d1u,d1v);
77 F(1) = nplan.Dot(point.XYZ()) + theD;
78 F(2) = nplan.Dot(pts.XYZ()) + theD;
79 ns = d1u.Crossed(d1v).XYZ();
80 norm = nplan.Crossed(ns).Modulus();
82 ns.SetLinearForm(nplan.Dot(ns),nplan, -1.,ns);
83 ns.Multiply(unsurnorm);
84 ref = pts.XYZ() - point.XYZ();
85 ref.SetLinearForm(ray,ns,ref);
86 F(3) = ref.SquareModulus() - ray*ray;
90 //=======================================================================
93 //=======================================================================
94 Standard_Boolean BRepBlend_SurfPointEvolRadInv::Derivatives(const math_Vector& X,math_Matrix& D)
97 gp_Vec d1cur,d2cur,nplan,dnplan,d1u,d1v,d2u,d2v,duv;
98 Standard_Real theD, dtheD, normd1cur, unsurnormd1cur,dray;
100 curv->D2(X(1),ptcur,d1cur,d2cur);
101 tevol->D1(X(1),ray,dray);
104 normd1cur = d1cur.Magnitude();
105 unsurnormd1cur = 1./normd1cur;
106 nplan = unsurnormd1cur * d1cur;
107 theD = -(nplan.XYZ().Dot(ptcur.XYZ()));
108 dnplan.SetLinearForm(-nplan.Dot(d2cur),nplan,d2cur);
109 dnplan.Multiply(unsurnormd1cur);
110 dtheD = - nplan.XYZ().Dot(d1cur.XYZ()) - dnplan.XYZ().Dot(ptcur.XYZ());
111 D(1,1) = dnplan.XYZ().Dot(point.XYZ()) + dtheD;
112 D(1,2) = D(1,3) = 0.;
113 surf->D2(X(2),X(3),pts,d1u,d1v,d2u,d2v,duv);
114 D(2,1) = dnplan.XYZ().Dot(pts.XYZ()) + dtheD;
115 D(2,2) = nplan.Dot(d1u);
116 D(2,3) = nplan.Dot(d1v);
118 gp_Vec nsurf = d1u.Crossed(d1v);
119 gp_Vec dunsurf = d2u.Crossed(d1v).Added(d1u.Crossed(duv));
120 gp_Vec dvnsurf = d1u.Crossed(d2v).Added(duv.Crossed(d1v));
122 gp_Vec nplancrosnsurf = nplan.Crossed(nsurf);
123 gp_Vec dwnplancrosnsurf = dnplan.Crossed(nsurf);
124 gp_Vec dunplancrosnsurf = nplan.Crossed(dunsurf);
125 gp_Vec dvnplancrosnsurf = nplan.Crossed(dvnsurf);
127 Standard_Real norm2 = nplancrosnsurf.SquareMagnitude();
128 Standard_Real norm = sqrt(norm2);
129 Standard_Real unsurnorm = 1./norm;
130 Standard_Real raysurnorm = ray*unsurnorm;
131 Standard_Real unsurnorm2 = unsurnorm * unsurnorm;
132 Standard_Real raysurnorm2 = ray*unsurnorm2;
133 Standard_Real dwnorm = unsurnorm*nplancrosnsurf.Dot(dwnplancrosnsurf);
134 Standard_Real dunorm = unsurnorm*nplancrosnsurf.Dot(dunplancrosnsurf);
135 Standard_Real dvnorm = unsurnorm*nplancrosnsurf.Dot(dvnplancrosnsurf);
137 Standard_Real nplandotnsurf = nplan.Dot(nsurf);
138 Standard_Real dwnplandotnsurf = dnplan.Dot(nsurf);
139 Standard_Real dunplandotnsurf = nplan.Dot(dunsurf);
140 Standard_Real dvnplandotnsurf = nplan.Dot(dvnsurf);
142 gp_Vec temp,dwtemp,dutemp,dvtemp;
143 temp.SetLinearForm(nplandotnsurf,nplan,-1.,nsurf);
144 dwtemp.SetLinearForm(nplandotnsurf,dnplan,dwnplandotnsurf,nplan);
145 dutemp.SetLinearForm(dunplandotnsurf,nplan,-1.,dunsurf);
146 dvtemp.SetLinearForm(dvnplandotnsurf,nplan,-1.,dvnsurf);
148 gp_Vec ref,dwref,duref,dvref,corde(point,pts);
149 ref.SetLinearForm(raysurnorm,temp,corde);
150 dwref.SetLinearForm(raysurnorm,dwtemp,-raysurnorm2*dwnorm,temp);
151 dwref.SetLinearForm(1.,dwref,dray*unsurnorm,temp);
152 duref.SetLinearForm(raysurnorm,dutemp,-raysurnorm2*dunorm,temp,d1u);
153 dvref.SetLinearForm(raysurnorm,dvtemp,-raysurnorm2*dvnorm,temp,d1v);
156 D(3,1) = ref.Dot(dwref) - 2.*dray*ray;
157 D(3,2) = ref.Dot(duref);
158 D(3,3) = ref.Dot(dvref);
160 return Standard_True;
163 //=======================================================================
166 //=======================================================================
167 Standard_Boolean BRepBlend_SurfPointEvolRadInv::Values(const math_Vector& X,math_Vector& F,math_Matrix& D)
170 gp_Vec d1cur,d2cur,nplan,dnplan,d1u,d1v,d2u,d2v,duv;
171 Standard_Real theD, dtheD, normd1cur, unsurnormd1cur,dray;
173 curv->D2(X(1),ptcur,d1cur,d2cur);
174 tevol->D1(X(1),ray,dray);
177 surf->D2(X(2),X(3),pts,d1u,d1v,d2u,d2v,duv);
178 normd1cur = d1cur.Magnitude();
179 unsurnormd1cur = 1./normd1cur;
180 nplan = unsurnormd1cur * d1cur;
181 theD = -(nplan.XYZ().Dot(ptcur.XYZ()));
182 F(1) = nplan.XYZ().Dot(point.XYZ()) + theD;
183 F(2) = nplan.XYZ().Dot(pts.XYZ()) + theD;
185 dnplan.SetLinearForm(-nplan.Dot(d2cur),nplan,d2cur);
186 dnplan.Multiply(unsurnormd1cur);
187 dtheD = - nplan.XYZ().Dot(d1cur.XYZ()) - dnplan.XYZ().Dot(ptcur.XYZ());
188 D(1,1) = dnplan.XYZ().Dot(point.XYZ()) + dtheD;
189 D(1,2) = D(1,3) = 0.;
190 D(2,1) = dnplan.XYZ().Dot(pts.XYZ()) + dtheD;
191 D(2,2) = nplan.Dot(d1u);
192 D(2,3) = nplan.Dot(d1v);
194 gp_Vec nsurf = d1u.Crossed(d1v);
195 gp_Vec dunsurf = d2u.Crossed(d1v).Added(d1u.Crossed(duv));
196 gp_Vec dvnsurf = d1u.Crossed(d2v).Added(duv.Crossed(d1v));
198 gp_Vec nplancrosnsurf = nplan.Crossed(nsurf);
199 gp_Vec dwnplancrosnsurf = dnplan.Crossed(nsurf);
200 gp_Vec dunplancrosnsurf = nplan.Crossed(dunsurf);
201 gp_Vec dvnplancrosnsurf = nplan.Crossed(dvnsurf);
203 Standard_Real norm2 = nplancrosnsurf.SquareMagnitude();
204 Standard_Real norm = sqrt(norm2);
205 Standard_Real unsurnorm = 1./norm;
206 Standard_Real raysurnorm = ray*unsurnorm;
207 Standard_Real unsurnorm2 = unsurnorm * unsurnorm;
208 Standard_Real raysurnorm2 = ray*unsurnorm2;
209 Standard_Real dwnorm = unsurnorm*nplancrosnsurf.Dot(dwnplancrosnsurf);
210 Standard_Real dunorm = unsurnorm*nplancrosnsurf.Dot(dunplancrosnsurf);
211 Standard_Real dvnorm = unsurnorm*nplancrosnsurf.Dot(dvnplancrosnsurf);
213 Standard_Real nplandotnsurf = nplan.Dot(nsurf);
214 Standard_Real dwnplandotnsurf = dnplan.Dot(nsurf);
215 Standard_Real dunplandotnsurf = nplan.Dot(dunsurf);
216 Standard_Real dvnplandotnsurf = nplan.Dot(dvnsurf);
218 gp_Vec temp,dwtemp,dutemp,dvtemp;
219 temp.SetLinearForm(nplandotnsurf,nplan,-1.,nsurf);
220 dwtemp.SetLinearForm(nplandotnsurf,dnplan,dwnplandotnsurf,nplan);
221 dutemp.SetLinearForm(dunplandotnsurf,nplan,-1.,dunsurf);
222 dvtemp.SetLinearForm(dvnplandotnsurf,nplan,-1.,dvnsurf);
224 gp_Vec ref,dwref,duref,dvref,corde(point,pts);
225 ref.SetLinearForm(raysurnorm,temp,corde);
226 F(3) = ref.SquareMagnitude() - ray*ray;
227 dwref.SetLinearForm(raysurnorm,dwtemp,-raysurnorm2*dwnorm,temp);
228 dwref.SetLinearForm(1.,dwref,dray*unsurnorm,temp);
229 duref.SetLinearForm(raysurnorm,dutemp,-raysurnorm2*dunorm,temp,d1u);
230 dvref.SetLinearForm(raysurnorm,dvtemp,-raysurnorm2*dvnorm,temp,d1v);
233 D(3,1) = ref.Dot(dwref) - 2.*dray*ray;
234 D(3,2) = ref.Dot(duref);
235 D(3,3) = ref.Dot(dvref);
237 return Standard_True;
240 //=======================================================================
243 //=======================================================================
244 void BRepBlend_SurfPointEvolRadInv::Set(const gp_Pnt& P)
249 //=======================================================================
252 //=======================================================================
253 void BRepBlend_SurfPointEvolRadInv::GetTolerance(math_Vector& Tolerance,const Standard_Real Tol) const
255 Tolerance(1) = curv->Resolution(Tol);
256 Tolerance(2) = surf->UResolution(Tol);
257 Tolerance(3) = surf->VResolution(Tol);
260 //=======================================================================
263 //=======================================================================
264 void BRepBlend_SurfPointEvolRadInv::GetBounds(math_Vector& InfBound,math_Vector& SupBound) const
266 InfBound(1) = curv->FirstParameter();
267 SupBound(1) = curv->LastParameter();
268 InfBound(2) = surf->FirstUParameter();
269 SupBound(2) = surf->LastUParameter();
270 InfBound(3) = surf->FirstVParameter();
271 SupBound(3) = surf->LastVParameter();
274 //=======================================================================
277 //=======================================================================
278 Standard_Boolean BRepBlend_SurfPointEvolRadInv::IsSolution(const math_Vector& Sol,const Standard_Real Tol)
280 math_Vector valsol(1,3);
282 if (Abs(valsol(1)) <= Tol &&
283 Abs(valsol(2)) <= Tol &&
284 Abs(valsol(3)) <= 2*Tol*Abs(ray) ) {
285 return Standard_True;
287 return Standard_False;