mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-06-24 05:08:04 +08:00
Integration of OCCT 6.5.0 from SVN
This commit is contained in:
37
src/StepShape/StepShape_VertexLoop.cdl
Executable file
37
src/StepShape/StepShape_VertexLoop.cdl
Executable file
@@ -0,0 +1,37 @@
|
||||
-- File: VertexLoop.cdl
|
||||
-- Created: Fri Dec 1 11:11:31 1995
|
||||
-- Author: EXPRESS->CDL V0.2 Translator
|
||||
-- Copyright: Matra-Datavision 1993
|
||||
|
||||
|
||||
class VertexLoop from StepShape
|
||||
|
||||
inherits Loop from StepShape
|
||||
|
||||
uses
|
||||
|
||||
Vertex from StepShape,
|
||||
HAsciiString from TCollection
|
||||
is
|
||||
|
||||
Create returns mutable VertexLoop;
|
||||
---Purpose: Returns a VertexLoop
|
||||
|
||||
|
||||
Init (me : mutable;
|
||||
aName : mutable HAsciiString from TCollection) is redefined;
|
||||
|
||||
Init (me : mutable;
|
||||
aName : mutable HAsciiString from TCollection;
|
||||
aLoopVertex : mutable Vertex from StepShape) is virtual;
|
||||
|
||||
-- Specific Methods for Field Data Access --
|
||||
|
||||
SetLoopVertex(me : mutable; aLoopVertex : mutable Vertex);
|
||||
LoopVertex (me) returns mutable Vertex;
|
||||
|
||||
fields
|
||||
|
||||
loopVertex : Vertex from StepShape;
|
||||
|
||||
end VertexLoop;
|
||||
Reference in New Issue
Block a user