mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-12 11:06:26 +08:00
Redundant keyword 'mutable' removed in CDL files. In IGESConvGeom_GeomBuilder, unused methods MakeXY() and MakeXYZ() removed. Method StepAP214_AutoDesignGroupAssignment::Init() replicating same method of the base class is removed as it causes CDL extraction error after above (seemingly irrelevant) changes.
84 lines
3.7 KiB
Plaintext
84 lines
3.7 KiB
Plaintext
-- Created on: 1994-05-31
|
|
-- Created by: Modelistation
|
|
-- Copyright (c) 1994-1999 Matra Datavision
|
|
-- Copyright (c) 1999-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.
|
|
|
|
class CounterOfLevelNumber from IGESSelect inherits SignCounter
|
|
|
|
---Purpose : This class gives information about Level Number. It counts
|
|
-- entities according level number, considering also the
|
|
-- multiple level (see the class LevelList) for which an entity
|
|
-- is attached to each of the listed levels.
|
|
--
|
|
-- Data are available, as level number, or as their alphanumeric
|
|
-- counterparts ("LEVEL nnnnnnn", " NO LEVEL", " LEVEL LIST")
|
|
|
|
uses Integer, Transient, MapOfTransient, HAsciiString from TCollection,
|
|
HArray1OfInteger from TColStd, HSequenceOfInteger from TColStd,
|
|
Messenger from Message,
|
|
HSequenceOfTransient, InterfaceModel
|
|
|
|
is
|
|
|
|
Create (withmap : Boolean = Standard_True;
|
|
withlist : Boolean = Standard_False)
|
|
returns CounterOfLevelNumber;
|
|
---Purpose : Creates a CounterOfLevelNumber, clear, ready to work
|
|
-- <withmap> and <withlist> are transmitted to SignCounter
|
|
|
|
Clear (me : mutable) is redefined;
|
|
---Purpose : Resets already memorized informations : also numeric data
|
|
|
|
AddSign (me : mutable; ent : Transient; model : InterfaceModel)
|
|
is redefined;
|
|
---Purpose : Adds an entity by considering its lrvrl number(s)
|
|
-- A level is added both in numeric and alphanumeric form,
|
|
-- i.e. LevelList gives "LEVEL LIST", others (no level or
|
|
-- positive level) displays level number on 7 digits (C : %7d)
|
|
-- Remark : an entity attached to a Level List is added for
|
|
-- " LEVEL LIST", and for each of its constituant levels
|
|
|
|
AddLevel (me : mutable; ent : Transient; level : Integer);
|
|
---Purpose : The internal action to record a new level number, positive,
|
|
-- null (no level) or negative (level list)
|
|
|
|
HighestLevel (me) returns Integer;
|
|
---Purpose : Returns the highest value found for a level number
|
|
|
|
NbTimesLevel (me; level : Integer) returns Integer;
|
|
---Purpose : Returns the number of times a level is used,
|
|
-- 0 if it has not been recorded at all
|
|
-- <level> = 0 counts entities attached to no level
|
|
-- <level> < 0 counts entities attached to a LevelList
|
|
|
|
Levels (me) returns HSequenceOfInteger;
|
|
---Purpose : Returns the ordered list of used positive Level numbers
|
|
|
|
Sign (me; ent : Transient; model : InterfaceModel) returns HAsciiString is redefined;
|
|
---Purpose : Determines and returns the value of the signature for an
|
|
-- entity as an HAsciiString. Redefined, gives the same result
|
|
-- as AddSign, see this method ("LEVEL LIST" or "nnnnnnn")
|
|
|
|
PrintCount (me; S : Messenger from Message) is redefined;
|
|
---Purpose : Prints the counts of items (not the list) then the Highest
|
|
-- Level Number recorded
|
|
|
|
fields
|
|
|
|
thehigh : Integer;
|
|
thenblists : Integer;
|
|
thelevels : HArray1OfInteger;
|
|
|
|
end CounterOfLevelNumber;
|