| 7fd59977 |
1 | -- File: ShapeCustom_SweptToElementary.cdl |
| 2 | -- Created: Wed Dec 10 17:04:23 2003 |
| 3 | -- Author: Sergey KUUL |
| 4 | -- <skl@petrox.nnov.matra-dtv.fr> |
| 5 | ---Copyright: Matra Datavision 2003 |
| 6 | |
| 7 | private class SweptToElementary from ShapeCustom inherits Modification from BRepTools |
| 8 | |
| 9 | ---Purpose: implements a modification for the BRepTools |
| 10 | -- Modifier algortihm. Converts all elementary |
| 11 | -- surfaces into surfaces of revolution. |
| 12 | |
| 13 | uses |
| 14 | Vertex from TopoDS, |
| 15 | Edge from TopoDS, |
| 16 | Face from TopoDS, |
| 17 | Location from TopLoc, |
| 18 | |
| 19 | Shape from GeomAbs, |
| 20 | |
| 21 | Pnt from gp, |
| 22 | Curve from Geom, |
| 23 | Curve from Geom2d, |
| 24 | Surface from Geom |
| 25 | |
| 26 | is |
| 27 | |
| 28 | Create returns mutable SweptToElementary from ShapeCustom; |
| 29 | |
| 30 | NewSurface(me: mutable; F : Face from TopoDS; |
| 31 | S : out Surface from Geom; |
| 32 | L : out Location from TopLoc; |
| 33 | Tol: out Real from Standard; |
| 34 | RevWires : out Boolean from Standard; |
| 35 | RevFace : out Boolean from Standard) |
| 36 | returns Boolean from Standard; |
| 37 | ---Purpose: Returns Standard_True if the face <F> has been |
| 38 | -- modified. In this case, <S> is the new geometric |
| 39 | -- support of the face, <L> the new location, <Tol> |
| 40 | -- the new tolerance. Otherwise, returns |
| 41 | -- Standard_False, and <S>, <L>, <Tol> are not |
| 42 | -- significant. |
| 43 | |
| 44 | NewCurve(me: mutable; E : Edge from TopoDS; |
| 45 | C : out Curve from Geom; |
| 46 | L : out Location from TopLoc; |
| 47 | Tol: out Real from Standard) |
| 48 | returns Boolean from Standard; |
| 49 | ---Purpose: Returns Standard_True if the edge <E> has been |
| 50 | -- modified. In this case, <C> is the new geometric |
| 51 | -- support of the edge, <L> the new location, <Tol> |
| 52 | -- the new tolerance. Otherwise, returns |
| 53 | -- Standard_False, and <C>, <L>, <Tol> are not |
| 54 | -- significant. |
| 55 | |
| 56 | NewPoint(me: mutable; V : Vertex from TopoDS; |
| 57 | P : out Pnt from gp; |
| 58 | Tol: out Real from Standard) |
| 59 | returns Boolean from Standard; |
| 60 | ---Purpose: Returns Standard_True if the vertex <V> has been |
| 61 | -- modified. In this case, <P> is the new geometric |
| 62 | -- support of the vertex, <Tol> the new tolerance. |
| 63 | -- Otherwise, returns Standard_False, and <P>, <Tol> |
| 64 | -- are not significant. |
| 65 | |
| 66 | NewCurve2d(me: mutable; E : Edge from TopoDS; |
| 67 | F : Face from TopoDS; |
| 68 | NewE : Edge from TopoDS; |
| 69 | NewF : Face from TopoDS; |
| 70 | C : out Curve from Geom2d; |
| 71 | Tol : out Real from Standard) |
| 72 | returns Boolean from Standard; |
| 73 | ---Purpose: Returns Standard_True if the edge <E> has a new |
| 74 | -- curve on surface on the face <F>.In this case, <C> |
| 75 | -- is the new geometric support of the edge, <L> the |
| 76 | -- new location, <Tol> the new tolerance. |
| 77 | -- |
| 78 | -- Otherwise, returns Standard_False, and <C>, <L>, |
| 79 | -- <Tol> are not significant. |
| 80 | -- |
| 81 | -- <NewE> is the new edge created from <E>. <NewF> |
| 82 | -- is the new face created from <F>. They may be usefull. |
| 83 | |
| 84 | NewParameter(me: mutable; V : Vertex from TopoDS; |
| 85 | E : Edge from TopoDS; |
| 86 | P : out Real from Standard; |
| 87 | Tol: out Real from Standard) |
| 88 | returns Boolean from Standard; |
| 89 | ---Purpose: Returns Standard_True if the Vertex <V> has a new |
| 90 | -- parameter on the edge <E>. In this case, <P> is |
| 91 | -- the parameter, <Tol> the new tolerance. |
| 92 | -- Otherwise, returns Standard_False, and <P>, <Tol> |
| 93 | -- are not significant. |
| 94 | |
| 95 | Continuity(me: mutable; E : Edge from TopoDS; |
| 96 | F1,F2 : Face from TopoDS; |
| 97 | NewE : Edge from TopoDS; |
| 98 | NewF1,NewF2: Face from TopoDS) |
| 99 | returns Shape from GeomAbs; |
| 100 | ---Purpose: Returns the continuity of <NewE> between <NewF1> |
| 101 | -- and <NewF2>. |
| 102 | -- |
| 103 | -- <NewE> is the new edge created from <E>. <NewF1> |
| 104 | -- (resp. <NewF2>) is the new face created from <F1> |
| 105 | -- (resp. <F2>). |
| 106 | |
| 107 | end SweptToElementary; |
projects / occt.git / blame