2012-04-13 11:48:26 +06:00
|
|
|
-- Copyright (C) 2007-2012 CEA/DEN, EDF R&D, OPEN CASCADE
|
2008-03-07 12:45:34 +05:00
|
|
|
--
|
2011-06-06 13:23:11 +06:00
|
|
|
-- Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
|
|
|
|
-- CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
|
2009-02-13 17:16:39 +05:00
|
|
|
--
|
2011-06-06 13:23:11 +06:00
|
|
|
-- 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.
|
2009-02-13 17:16:39 +05:00
|
|
|
--
|
2011-06-06 13:23:11 +06:00
|
|
|
-- 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.
|
2009-02-13 17:16:39 +05:00
|
|
|
--
|
2011-06-06 13:23:11 +06:00
|
|
|
-- 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
|
2009-02-13 17:16:39 +05:00
|
|
|
--
|
2011-06-06 13:23:11 +06:00
|
|
|
-- See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
|
2009-02-13 17:16:39 +05:00
|
|
|
--
|
2010-05-14 21:15:28 +06:00
|
|
|
|
2009-02-13 17:16:39 +05:00
|
|
|
-- File: NMTDS_IndexRange.cdl
|
|
|
|
-- Created: Fri Nov 28 10:31:05 2003
|
|
|
|
-- Author: Peter KURNEV
|
2008-03-07 12:45:34 +05:00
|
|
|
--
|
2004-12-01 15:39:14 +05:00
|
|
|
class IndexRange from NMTDS
|
|
|
|
|
|
|
|
---Purpose:
|
|
|
|
|
|
|
|
--uses
|
|
|
|
--raises
|
|
|
|
|
|
|
|
is
|
|
|
|
Create
|
|
|
|
returns IndexRange from NMTDS;
|
|
|
|
|
|
|
|
SetFirst(me:out;
|
|
|
|
aFirst:Integer from Standard);
|
|
|
|
|
|
|
|
SetLast(me:out;
|
|
|
|
aLast:Integer from Standard);
|
|
|
|
|
|
|
|
First(me)
|
|
|
|
returns Integer from Standard;
|
|
|
|
|
|
|
|
Last(me)
|
|
|
|
returns Integer from Standard;
|
|
|
|
|
|
|
|
IsInRange(me;
|
|
|
|
aIndex:Integer from Standard)
|
|
|
|
returns Boolean from Standard;
|
|
|
|
|
|
|
|
fields
|
|
|
|
myFirst : Integer from Standard is protected;
|
|
|
|
myLast : Integer from Standard is protected;
|
|
|
|
|
|
|
|
end IndexRange;
|