mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-26 10:19:45 +03:00
d5f74e42d6
License statement text corrected; compiler warnings caused by Bison 2.41 disabled for MSVC; a few other compiler warnings on 54-bit Windows eliminated by appropriate type cast Wrong license statements corrected in several files. Copyright and license statements added in XSD and GLSL files. Copyright year updated in some files. Obsolete documentation files removed from DrawResources.
115 lines
3.9 KiB
Plaintext
115 lines
3.9 KiB
Plaintext
-- Created on: 2002-12-10
|
|
-- Created by: data exchange team
|
|
-- Copyright (c) 2002-2014 OPEN CASCADE SAS
|
|
--
|
|
-- This file is part of Open CASCADE Technology software library.
|
|
--
|
|
-- This library is free software; you can redistribute it and/or modify it under
|
|
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
|
-- by the Free Software Foundation, with special exception defined in the file
|
|
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
|
-- distribution for complete text of the license and disclaimer of any warranty.
|
|
--
|
|
-- Alternatively, this file may be used under the terms of Open CASCADE
|
|
-- commercial license or contractual agreement.
|
|
|
|
-- Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V2.0
|
|
|
|
class ElementAspect from StepElement
|
|
inherits SelectType from StepData
|
|
|
|
---Purpose: Representation of STEP SELECT type ElementAspect
|
|
|
|
uses
|
|
SelectMember from StepData,
|
|
ElementVolume from StepElement,
|
|
CurveEdge from StepElement
|
|
|
|
is
|
|
Create returns ElementAspect from StepElement;
|
|
---Purpose: Empty constructor
|
|
|
|
CaseNum (me; ent: Transient) returns Integer;
|
|
---Purpose: Recognizes a kind of ElementAspect select type
|
|
-- return 0
|
|
|
|
CaseMem (me; ent: SelectMember from StepData) returns Integer is redefined;
|
|
---Purpose: Recognizes a items of select member ElementAspectMember
|
|
-- 1 -> ElementVolume
|
|
-- 2 -> Volume3dFace
|
|
-- 3 -> Volume2dFace
|
|
-- 4 -> Volume3dEdge
|
|
-- 5 -> Volume2dEdge
|
|
-- 6 -> Surface3dFace
|
|
-- 7 -> Surface2dFace
|
|
-- 8 -> Surface3dEdge
|
|
-- 9 -> Surface2dEdge
|
|
-- 10 -> CurveEdge
|
|
-- 0 else
|
|
|
|
|
|
NewMember(me) returns SelectMember from StepData is redefined;
|
|
---Purpose: Returns a new select member the type ElementAspectMember
|
|
|
|
SetElementVolume(me: in out; aVal :ElementVolume from StepElement);
|
|
---Purpose: Set Value for ElementVolume
|
|
|
|
ElementVolume (me) returns ElementVolume from StepElement;
|
|
---Purpose: Returns Value as ElementVolume (or Null if another type)
|
|
|
|
SetVolume3dFace(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Volume3dFace
|
|
|
|
Volume3dFace (me) returns Integer;
|
|
---Purpose: Returns Value as Volume3dFace (or Null if another type)
|
|
|
|
SetVolume2dFace(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Volume2dFace
|
|
|
|
Volume2dFace (me) returns Integer;
|
|
---Purpose: Returns Value as Volume2dFace (or Null if another type)
|
|
|
|
SetVolume3dEdge(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Volume3dEdge
|
|
|
|
Volume3dEdge (me) returns Integer;
|
|
---Purpose: Returns Value as Volume3dEdge (or Null if another type)
|
|
|
|
SetVolume2dEdge(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Volume2dEdge
|
|
|
|
Volume2dEdge (me) returns Integer;
|
|
---Purpose: Returns Value as Volume2dEdge (or Null if another type)
|
|
|
|
SetSurface3dFace(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Surface3dFace
|
|
|
|
Surface3dFace (me) returns Integer;
|
|
---Purpose: Returns Value as Surface3dFace (or Null if another type)
|
|
|
|
SetSurface2dFace(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Surface2dFace
|
|
|
|
Surface2dFace (me) returns Integer;
|
|
---Purpose: Returns Value as Surface2dFace (or Null if another type)
|
|
|
|
SetSurface3dEdge(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Surface3dEdge
|
|
|
|
Surface3dEdge (me) returns Integer;
|
|
---Purpose: Returns Value as Surface3dEdge (or Null if another type)
|
|
|
|
SetSurface2dEdge(me: in out; aVal :Integer);
|
|
---Purpose: Set Value for Surface2dEdge
|
|
|
|
Surface2dEdge (me) returns Integer;
|
|
---Purpose: Returns Value as Surface2dEdge (or Null if another type)
|
|
|
|
SetCurveEdge(me: in out; aVal :CurveEdge from StepElement);
|
|
---Purpose: Set Value for CurveEdge
|
|
|
|
CurveEdge (me) returns CurveEdge from StepElement;
|
|
---Purpose: Returns Value as CurveEdge (or Null if another type)
|
|
|
|
end ElementAspect;
|