src/IGESAppli/IGESAppli_Node.cdl

   1 -- Created on: 1993-01-11
   2 -- Created by: CKY / Contract Toubro-Larsen ( Arun MENON )
   3 -- Copyright (c) 1993-1999 Matra Datavision
   4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
   5 --
   6 -- This file is part of Open CASCADE Technology software library.
   7 --
   8 -- This library is free software; you can redistribute it and/or modify it under
   9 -- the terms of the GNU Lesser General Public License version 2.1 as published
  10 -- by the Free Software Foundation, with special exception defined in the file
  11 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  12 -- distribution for complete text of the license and disclaimer of any warranty.
  13 --
  14 -- Alternatively, this file may be used under the terms of Open CASCADE
  15 -- commercial license or contractual agreement.
  16
  17 class Node from IGESAppli  inherits IGESEntity
  18
  19         ---Purpose: defines Node, Type <134> Form <0>
  20         --          in package IGESAppli
  21         --          Geometric point used in the definition of a finite element.
  22
  23 uses
  24
  25         XYZ  from gp,
  26         Pnt  from gp,
  27         TransfEntity         from IGESData,
  28         TransformationMatrix from IGESGeom
  29
  30 is
  31
  32         Create returns Node;
  33
  34         -- Specific Methods pertaining to the class
  35
  36         Init (me           : mutable;
  37               aCoord       : XYZ;
  38               aCoordSystem : TransformationMatrix);
  39         ---Purpose : This method is used to set the fields of the class Node
  40         --       - aCoord       : Nodal Coordinates
  41         --       - aCoordSystem : the Nodal Displacement Coordinate
  42         --                        System Entity (default 0 is Global
  43         --                        Cartesian Coordinate system)
  44
  45         Coord (me) returns Pnt;
  46         ---Purpose : returns the nodal coordinates
  47
  48         System (me) returns TransfEntity;
  49         ---Purpose : returns TransfEntity if a Nodal Displacement Coordinate
  50         --           System Entity is defined
  51         -- else (for Global Cartesien) returns Null Handle
  52
  53         SystemType (me) returns Integer;
  54         ---Purpose : Computes & returns the Type of Coordinate System :
  55         -- 0 GlobalCartesian, 1 Cartesian, 2 Cylindrical, 3 Spherical
  56
  57         TransformedNodalCoord (me) returns Pnt;
  58         ---Purpose : returns the Nodal coordinates after transformation
  59
  60 fields
  61
  62 --
  63 -- Class    : IGESAppli_Node
  64 --
  65 -- Purpose  : Declaration of variables specific to the definition
  66 --            of the Class Node.
  67 --
  68 -- Reminder : A Node instance is defined by :
  69 --            - Nodal Coordinates
  70 --            - the Nodal Displacement Coordinate System Entity
  71
  72         theCoord  : XYZ;
  73         theSystem : TransformationMatrix;
  74
  75 end Node;