src/StepData/StepData_SelectArrReal.cdl

   1 -- Created on: 2002-12-18
   2 -- Created by: data exchange team
   3 -- Copyright (c) 2002-2014 OPEN CASCADE SAS
   4 --
   5 -- This file is part of Open CASCADE Technology software library.
   6 --
   7 -- This library is free software; you can redistribute it and/or modify it under
   8 -- the terms of the GNU Lesser General Public License version 2.1 as published
   9 -- by the Free Software Foundation, with special exception defined in the file
  10 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  11 -- distribution for complete text of the license and disclaimer of any warranty.
  12 --
  13 -- Alternatively, this file may be used under the terms of Open CASCADE
  14 -- commercial license or contractual agreement.
  15
  16 class SelectArrReal from StepData inherits SelectNamed from StepData
  17
  18     ---Purpose :
  19
  20
  21 uses
  22
  23     AsciiString from TCollection,
  24     HArray1OfReal from TColStd
  25
  26 is
  27
  28     Create returns SelectArrReal;
  29
  30 --    HasName (me) returns Boolean  is redefined;
  31
  32 --    Name (me) returns CString  is redefined;
  33
  34 --    SetName (me : mutable; name : CString)  returns Boolean  is redefined;
  35     -- redefined to accept any name
  36
  37     Kind(me) returns Integer  is redefined;
  38     --  fixed kind : ArrReal
  39
  40     ArrReal(me) returns HArray1OfReal from TColStd;
  41
  42     SetArrReal(me:mutable; arr : HArray1OfReal from TColStd);
  43
  44 fields
  45
  46     theArr  : HArray1OfReal from TColStd;
  47
  48 end SelectArrReal;