mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
Integration of OCCT 6.5.0 from SVN
This commit is contained in:
29
src/IFSelect/IFSelect_SelectUnknownEntities.cdl
Executable file
29
src/IFSelect/IFSelect_SelectUnknownEntities.cdl
Executable file
@@ -0,0 +1,29 @@
|
||||
-- File: SelectUnknownEntities.cdl
|
||||
-- Created: Wed Nov 18 09:55:55 1992
|
||||
-- Author: Christian CAILLET
|
||||
-- <cky@topsn2>
|
||||
---Copyright: Matra Datavision 1992
|
||||
|
||||
|
||||
class SelectUnknownEntities from IFSelect inherits SelectExtract
|
||||
|
||||
---Purpose : A SelectUnknownEntities sorts the Entities which are qualified
|
||||
-- as "Unknown" (their Type has not been recognized)
|
||||
|
||||
uses AsciiString from TCollection, InterfaceModel
|
||||
|
||||
is
|
||||
|
||||
Create returns mutable SelectUnknownEntities;
|
||||
---Purpose : Creates a SelectUnknownEntities
|
||||
|
||||
Sort (me; rank : Integer; ent : Transient; model : InterfaceModel)
|
||||
returns Boolean;
|
||||
---Purpose : Returns True for an Entity which is qualified as "Unknown",
|
||||
-- i.e. if <model> known <ent> (through its Number) as Unknown
|
||||
|
||||
|
||||
ExtractLabel (me) returns AsciiString from TCollection;
|
||||
---Purpose : Returns a text defining the criterium : "Recognized Entities"
|
||||
|
||||
end SelectUnknownEntities;
|
Reference in New Issue
Block a user