src/SMESHDS/SMESHDS_Command.cdl

   1 --  SMESH SMESHDS : management of mesh data and SMESH document
   2 --
   3 --  Copyright (C) 2003  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
   4 --  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
   5 --
   6 --  This library is free software; you can redistribute it and/or
   7 --  modify it under the terms of the GNU Lesser General Public
   8 --  License as published by the Free Software Foundation; either
   9 --  version 2.1 of the License.
  10 --
  11 --  This library is distributed in the hope that it will be useful,
  12 --  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 --  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 --  Lesser General Public License for more details.
  15 --
  16 --  You should have received a copy of the GNU Lesser General Public
  17 --  License along with this library; if not, write to the Free Software
  18 --  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  19 --
  20 --  See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
  21 --
  22 --
  23 --
  24 --  File   : SMESHDS_Script.cdl
  25 --  Author : Yves FRICAUD, OCC
  26 --  Module : SMESH
  27
  28 class Command from SMESHDS inherits TShared from MMgt
  29
  30 uses
  31
  32         Integer        from Standard,
  33         Real           from Standard,
  34         CommandType    from SMESHDS,
  35         ListOfReal     from TColStd,
  36         ListOfInteger  from TColStd
  37
  38 is
  39
  40         Create (aType : CommandType from SMESHDS) returns Command from SMESHDS;
  41
  42         AddNode(me: mutable; NewNodeID : Integer; x,y,z : Real);
  43
  44         AddEdge(me: mutable; NewEdgeID : Integer; idnode1, idnode2 : Integer);
  45
  46         AddFace(me: mutable; NewFaceID : Integer; idnode1, idnode2, idnode3 : Integer);
  47
  48         AddFace(me: mutable; NewFaceID : Integer; idnode1, idnode2, idnode3, idnode4 : Integer);
  49
  50         AddVolume(me: mutable; NewVolID : Integer; idnode1, idnode2, idnode3, idnode4 : Integer);
  51
  52         AddVolume(me: mutable; NewVolID : Integer; idnode1, idnode2, idnode3, idnode4, idnode5 : Integer);
  53
  54         AddVolume(me: mutable; NewVolID : Integer; idnode1, idnode2, idnode3, idnode4, idnode5, idnode6 : Integer);
  55
  56         AddVolume(me: mutable; NewVolID : Integer; idnode1, idnode2, idnode3, idnode4, idnode5, idnode6, idnode7, idnode8 : Integer);
  57
  58         MoveNode(me: mutable; NewNodeID : Integer; x,y,z : Real);
  59
  60         RemoveNode (me: mutable; NodeID : Integer);
  61
  62         RemoveElement(me: mutable; ElementID : Integer);
  63
  64         GetType (me: mutable) returns CommandType from SMESHDS;
  65
  66         GetNumber (me: mutable) returns Integer from Standard;
  67
  68         GetIndexes      (me: mutable)
  69         ---C++ :return const &
  70         returns  ListOfInteger  from TColStd;
  71
  72         GetCoords       (me: mutable)
  73         ---C++ :return const &
  74         returns  ListOfReal  from TColStd;
  75
  76
  77
  78 fields
  79         myType     : CommandType from SMESHDS;
  80         myNumber   : Integer from Standard;
  81         myReals    : ListOfReal from TColStd;
  82         myIntegers : ListOfInteger  from TColStd;
  83 end Script;