mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-06-15 04:04:07 +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.
149 lines
5.2 KiB
Plaintext
149 lines
5.2 KiB
Plaintext
-- Created by: DAUTRY Philippe
|
|
-- Copyright (c) 1997-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.
|
|
|
|
-- ----------------------
|
|
|
|
---Version: 0.0
|
|
--Version Date Purpose
|
|
-- 0.0 Sep 4 1997 Creation
|
|
|
|
|
|
class ComparisonTool from TDF
|
|
|
|
---Purpose: This class provides services to compare sets of
|
|
-- information. The use of this tool can works after
|
|
-- a copy, acted by a CopyTool.
|
|
--
|
|
-- * Compare(...) compares two DataSet and returns
|
|
-- the result.
|
|
--
|
|
-- * SourceUnbound(...) builds the difference between
|
|
-- a relocation dictionnary and a source set of
|
|
-- information.
|
|
--
|
|
-- * TargetUnbound(...) does the same between a
|
|
-- relocation dictionnary and a target set of
|
|
-- information.
|
|
--
|
|
-- * Cut(aDataSet, anLabel) removes a set of
|
|
-- attributes.
|
|
--
|
|
-- * IsSelfContained(...) returns true if all the
|
|
-- labels of the attributes of the given DataSet are
|
|
-- descendant of the given label.
|
|
|
|
uses
|
|
|
|
Boolean from Standard,
|
|
Label from TDF,
|
|
Attribute from TDF,
|
|
DataSet from TDF,
|
|
RelocationTable from TDF,
|
|
AttributeMap from TDF,
|
|
IDFilter from TDF
|
|
|
|
-- raises
|
|
|
|
is
|
|
|
|
Compare(myclass;
|
|
aSourceDataSet : DataSet from TDF;
|
|
aTargetDataSet : DataSet from TDF;
|
|
aFilter : IDFilter from TDF;
|
|
aRelocationTable : RelocationTable from TDF);
|
|
---Purpose: Compares <aSourceDataSet> with <aTargetDataSet>,
|
|
-- updating <aRelocationTable> with labels and
|
|
-- attributes found in both sets.
|
|
|
|
SourceUnbound(myclass;
|
|
aRefDataSet : DataSet from TDF;
|
|
aRelocationTable : RelocationTable from TDF;
|
|
aFilter : IDFilter from TDF;
|
|
aDiffDataSet : DataSet from TDF;
|
|
anOption : Integer from Standard = 2)
|
|
returns Boolean from Standard;
|
|
---Purpose: Finds from <aRefDataSet> all the keys not bound
|
|
-- into <aRelocationTable> and put them into
|
|
-- <aDiffDataSet>. Returns True if the difference
|
|
-- contains at least one key. (A key is a source
|
|
-- object).
|
|
--
|
|
-- <anOption> may take the following values:
|
|
-- 1 : labels treatment only;
|
|
-- 2 : attributes treatment only (default value);
|
|
-- 3 : both labels & attributes treatment.
|
|
|
|
TargetUnbound(myclass;
|
|
aRefDataSet : DataSet from TDF;
|
|
aRelocationTable : RelocationTable from TDF;
|
|
aFilter : IDFilter from TDF;
|
|
aDiffDataSet : DataSet from TDF;
|
|
anOption : Integer from Standard = 2)
|
|
returns Boolean from Standard;
|
|
---Purpose: Substracts from <aRefDataSet> all the items bound
|
|
-- into <aRelocationTable>. The result is put into
|
|
-- <aDiffDataSet>. Returns True if the difference
|
|
-- contains at least one item. (An item is a target
|
|
-- object).
|
|
--
|
|
-- <anOption> may take the following values:
|
|
-- 1 : labels treatment only;
|
|
-- 2 : attributes treatment only(default value);
|
|
-- 3 : both labels & attributes treatment.
|
|
|
|
Cut(myclass;
|
|
aDataSet : DataSet from TDF);
|
|
---Purpose: Removes attributes from <aDataSet>.
|
|
|
|
|
|
IsSelfContained(myclass;
|
|
aLabel : Label from TDF;
|
|
aDataSet : DataSet from TDF)
|
|
returns Boolean from Standard;
|
|
---Purpose: Returns true if all the labels of <aDataSet> are
|
|
-- descendant of <aLabel>.
|
|
|
|
-- ----------------------------------------------------------------------
|
|
--
|
|
-- Private methods
|
|
--
|
|
-- ----------------------------------------------------------------------
|
|
|
|
Compare(myclass;
|
|
aSrcLabel : Label from TDF;
|
|
aTrgLabel : Label from TDF;
|
|
aSourceDataSet : DataSet from TDF;
|
|
aTargetDataSet : DataSet from TDF;
|
|
aFilter : IDFilter from TDF;
|
|
aRelocationTable : RelocationTable from TDF)
|
|
is private;
|
|
---Purpose: Internal comparison method used by Compare(...).
|
|
|
|
|
|
Unbound(myclass;
|
|
aRefDataSet : DataSet from TDF;
|
|
aRelocationTable : RelocationTable from TDF;
|
|
aFilter : IDFilter from TDF;
|
|
aDiffDataSet : DataSet from TDF;
|
|
anOption : Integer from Standard;
|
|
theSource : Boolean from Standard)
|
|
returns Boolean from Standard
|
|
is private;
|
|
---Purpose: Internal function used by SourceUnbound() and
|
|
-- TargetUnbound().
|
|
|
|
|
|
end ComparisonTool;
|