mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-31 11:15:31 +03:00
217 lines
6.4 KiB
Plaintext
Executable File
217 lines
6.4 KiB
Plaintext
Executable File
-- Created on: 1999-03-05
|
|
-- Created by: Fabrice SERVANT
|
|
-- Copyright (c) 1999 Matra Datavision
|
|
-- Copyright (c) 1999-2012 OPEN CASCADE SAS
|
|
--
|
|
-- The content of this file is subject to the Open CASCADE Technology Public
|
|
-- License Version 6.5 (the "License"). You may not use the content of this file
|
|
-- except in compliance with the License. Please obtain a copy of the License
|
|
-- at http://www.opencascade.org and read it completely before using this file.
|
|
--
|
|
-- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
|
|
-- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
|
|
--
|
|
-- The Original Code and all software distributed under the License is
|
|
-- distributed on an "AS IS" basis, without warranty of any kind, and the
|
|
-- Initial Developer hereby disclaims all such warranties, including without
|
|
-- limitation, any warranties of merchantability, fitness for a particular
|
|
-- purpose or non-infringement. Please see the License for the specific terms
|
|
-- and conditions governing the rights and limitations under the License.
|
|
|
|
|
|
|
|
|
|
class Triangle from IntPolyh
|
|
|
|
uses
|
|
|
|
HSurface from Adaptor3d,
|
|
Point from IntPolyh,
|
|
ArrayOfPoints from IntPolyh,
|
|
StartPoint from IntPolyh,
|
|
ArrayOfEdges from IntPolyh,
|
|
ArrayOfCouples from IntPolyh,
|
|
ArrayOfTriangles from IntPolyh,
|
|
Box from Bnd
|
|
|
|
is
|
|
|
|
Create;
|
|
|
|
Create(i1,i2,i3: Integer from Standard);
|
|
|
|
FirstPoint(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
SecondPoint(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
ThirdPoint(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
FirstEdge(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
FirstEdgeOrientation(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
SecondEdge(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
SecondEdgeOrientation(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
ThirdEdge(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
ThirdEdgeOrientation(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
GetFleche(me)
|
|
returns Real from Standard
|
|
is static;
|
|
|
|
IndiceIntersectionPossible(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
IndiceIntersection(me)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
SetFirstPoint(me: in out; v: Integer from Standard)
|
|
is static;
|
|
|
|
SetSecondPoint(me: in out; v: Integer from Standard)
|
|
is static;
|
|
|
|
SetThirdPoint(me: in out; v: Integer from Standard)
|
|
is static;
|
|
|
|
SetFirstEdge(me: in out; v,s: Integer from Standard)
|
|
is static;
|
|
|
|
SetSecondEdge(me: in out; v,s: Integer from Standard)
|
|
is static;
|
|
|
|
SetThirdEdge(me: in out; v,s: Integer from Standard)
|
|
is static;
|
|
|
|
SetFleche(me: in out; v: Real from Standard)
|
|
is static;
|
|
|
|
SetIndiceIntersectionPossible(me: in out; v: Integer from Standard)
|
|
is static;
|
|
|
|
SetIndiceIntersection(me: in out; v: Integer from Standard)
|
|
is static;
|
|
|
|
GetEdgeNumber(me;v: Integer from Standard )
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
SetEdge(me: in out; v,en: Integer from Standard )
|
|
is static;
|
|
|
|
GetEdgeOrientation(me;v: Integer from Standard )
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
SetEdgeOrientation(me: in out; v,oe: Integer from Standard )
|
|
is static;
|
|
|
|
TriangleDeflection(me : in out; MaSurface:HSurface from Adaptor3d;
|
|
TP : ArrayOfPoints from IntPolyh)
|
|
is static;
|
|
|
|
CheckCommonEdge(me; PE1,PE2,P3,Index: Integer from Standard;
|
|
TTriangles: ArrayOfTriangles from IntPolyh)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
-- GetNextTriangle(me; NumTri,PE1,PE2,P3,FinTT,NbSamplesU,NbSamplesV: Integer from Standard;
|
|
-- TTriangles: ArrayOfTriangles from IntPolyh)
|
|
-- returns Integer from Standard
|
|
-- is static;
|
|
|
|
GetNextTriangle2(me; NumTri,NumEdge: Integer from Standard;
|
|
TEdges: ArrayOfEdges from IntPolyh)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
MiddleRefinement(me: in out; TriangleNumber: Integer from Standard;
|
|
MySurface:HSurface from Adaptor3d;
|
|
TPoints: in out ArrayOfPoints from IntPolyh;
|
|
TTriangles: in out ArrayOfTriangles from IntPolyh;
|
|
TEdges: in out ArrayOfEdges from IntPolyh)
|
|
is static;
|
|
|
|
|
|
MultipleMiddleRefinement(me: in out;
|
|
NombreAffinages,TriangleNumber: Integer from Standard;
|
|
MySurface:HSurface from Adaptor3d;
|
|
TPoints: in out ArrayOfPoints from IntPolyh;
|
|
TTriangles: in out ArrayOfTriangles from IntPolyh;
|
|
TEdges: in out ArrayOfEdges from IntPolyh)
|
|
is static;
|
|
|
|
CompareBoxTriangle(me; b: Box from Bnd;
|
|
TPoints: ArrayOfPoints from IntPolyh)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
MultipleMiddleRefinement2(me: in out;
|
|
RefineCriterion: Real from Standard;
|
|
thebox: Box from Bnd;
|
|
TriangleNumber: Integer from Standard;
|
|
MySurface:HSurface from Adaptor3d;
|
|
TPoints: in out ArrayOfPoints from IntPolyh;
|
|
TTriangles: in out ArrayOfTriangles from IntPolyh;
|
|
TEdges: in out ArrayOfEdges from IntPolyh)
|
|
is static;
|
|
|
|
GetNextChainTriangle(me; SPIni: StartPoint from IntPolyh; LastTTC: Integer from Standard;
|
|
TriContactsArray: in out ArrayOfCouples from IntPolyh;
|
|
TTriangles1, TTriangles2: ArrayOfTriangles from IntPolyh;
|
|
NumContact,NextTriangle: in out Integer from Standard)
|
|
returns Integer from Standard
|
|
is static;
|
|
|
|
LinkEdges2Triangle(me: in out; TEdges: ArrayOfEdges from IntPolyh;
|
|
ed1,ed2,ed3: Integer from Standard)
|
|
is static;
|
|
|
|
SetEdgeandOrientation(me: in out; Edge: Integer from Standard;
|
|
TEdges: ArrayOfEdges from IntPolyh)
|
|
is static;
|
|
|
|
Dump(me; v: Integer from Standard)
|
|
is static;
|
|
|
|
DumpFleche(me; v: Integer from Standard)
|
|
is static;
|
|
|
|
fields
|
|
|
|
p1,p2,p3,e1,oe1,e2,oe2,e3,oe3,II,IP : Integer from Standard;
|
|
Fleche : Real from Standard;
|
|
|
|
end Triangle from IntPolyh;
|
|
|
|
|
|
|
|
-- The code is inside, but as it is not used for my algorythms I leave
|
|
-- it as a comment.
|
|
--
|
|
-- RefinementG(me: in out; SurfID: Integer from Standard; T: in out
|
|
-- Triangle from IntPolyh) is static;
|