2005-12-05 21:23:52 +05:00
|
|
|
// Copyright (C) 2005 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
|
|
|
|
// CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
|
|
|
|
//
|
|
|
|
// This library is free software; you can redistribute it and/or
|
|
|
|
// modify it under the terms of the GNU Lesser General Public
|
|
|
|
// License as published by the Free Software Foundation; either
|
|
|
|
// version 2.1 of the License.
|
|
|
|
//
|
|
|
|
// This library is distributed in the hope that it will be useful
|
|
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
// Lesser General Public License for more details.
|
|
|
|
//
|
|
|
|
// You should have received a copy of the GNU Lesser General Public
|
|
|
|
// License along with this library; if not, write to the Free Software
|
|
|
|
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
|
|
//
|
2006-06-01 17:32:40 +06:00
|
|
|
-- See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
|
2005-12-05 21:23:52 +05:00
|
|
|
//
|
2004-12-17 16:18:33 +05:00
|
|
|
-- File: GEOMAlgo_PassKey.cdl
|
|
|
|
-- Created:
|
|
|
|
-- Author: Peter KURNEV
|
|
|
|
-- <pkv@irinox>
|
|
|
|
---Copyright:
|
|
|
|
|
|
|
|
|
|
|
|
class PassKey from GEOMAlgo
|
|
|
|
|
|
|
|
---Purpose:
|
|
|
|
|
|
|
|
uses
|
|
|
|
Shape from TopoDS,
|
2005-03-23 12:27:20 +05:00
|
|
|
ListOfInteger from TColStd
|
2004-12-17 16:18:33 +05:00
|
|
|
|
|
|
|
--raises
|
|
|
|
|
|
|
|
is
|
|
|
|
Create
|
|
|
|
returns PassKey from GEOMAlgo;
|
2005-03-23 12:27:20 +05:00
|
|
|
|
2004-12-17 16:18:33 +05:00
|
|
|
Assign(me:out;
|
2005-03-23 12:27:20 +05:00
|
|
|
Other : PassKey from GEOMAlgo)
|
2004-12-17 16:18:33 +05:00
|
|
|
returns PassKey from GEOMAlgo;
|
|
|
|
---C++: alias operator =
|
|
|
|
---C++: return &
|
2005-03-23 12:27:20 +05:00
|
|
|
--
|
2004-12-17 16:18:33 +05:00
|
|
|
SetIds(me:out;
|
2005-03-23 12:27:20 +05:00
|
|
|
aI1 :Integer from Standard);
|
|
|
|
|
2004-12-17 16:18:33 +05:00
|
|
|
SetIds(me:out;
|
2005-03-23 12:27:20 +05:00
|
|
|
aI1 :Integer from Standard;
|
|
|
|
aI2 :Integer from Standard);
|
|
|
|
|
2004-12-17 16:18:33 +05:00
|
|
|
SetIds(me:out;
|
2005-03-23 12:27:20 +05:00
|
|
|
aI1 :Integer from Standard;
|
|
|
|
aI2 :Integer from Standard;
|
|
|
|
aI3 :Integer from Standard);
|
|
|
|
|
|
|
|
SetIds(me:out;
|
|
|
|
aI1 :Integer from Standard;
|
|
|
|
aI2 :Integer from Standard;
|
|
|
|
aI3 :Integer from Standard;
|
|
|
|
aI4 :Integer from Standard);
|
|
|
|
|
2004-12-17 16:18:33 +05:00
|
|
|
SetIds(me:out;
|
2005-03-23 12:27:20 +05:00
|
|
|
aLS :ListOfInteger from TColStd);
|
2004-12-17 16:18:33 +05:00
|
|
|
|
|
|
|
NbMax(me)
|
|
|
|
returns Integer from Standard;
|
|
|
|
|
|
|
|
Clear(me:out);
|
|
|
|
|
|
|
|
Compute(me:out);
|
|
|
|
|
|
|
|
IsEqual(me;
|
|
|
|
aOther:PassKey from GEOMAlgo)
|
|
|
|
returns Boolean from Standard;
|
|
|
|
|
|
|
|
Key(me)
|
|
|
|
returns Address from Standard;
|
|
|
|
|
|
|
|
HashCode(me;
|
|
|
|
Upper : Integer from Standard)
|
|
|
|
returns Integer from Standard;
|
|
|
|
|
2005-03-23 12:27:20 +05:00
|
|
|
Id(me;
|
|
|
|
aIndex: Integer from Standard)
|
|
|
|
returns Integer from Standard;
|
|
|
|
|
|
|
|
|
2004-12-17 16:18:33 +05:00
|
|
|
Dump(me);
|
|
|
|
|
|
|
|
fields
|
|
|
|
|
|
|
|
myNbIds: Integer from Standard is protected;
|
|
|
|
myNbMax: Integer from Standard is protected;
|
|
|
|
mySum : Integer from Standard is protected;
|
|
|
|
myIds : Integer from Standard [8] is protected;
|
|
|
|
|
|
|
|
end PassKey;
|