src/IGESGeom/IGESGeom_ToolSplineCurve.cdl

   1 -- File:        IGESGeom_ToolSplineCurve.cdl
   2 -- Created:     Thu Oct 14 19:16:58 1993
   3 -- Author:      Christian CAILLET
   4 --              <cky@bravox>
   5 ---Copyright:    Matra Datavision 1993
   6
   7
   8 class ToolSplineCurve  from IGESGeom
   9
  10     ---Purpose : Tool to work on a SplineCurve. Called by various Modules
  11     --           (ReadWriteModule, GeneralModule, SpecificModule)
  12
  13 uses SplineCurve from IGESGeom,
  14      IGESReaderData, ParamReader, IGESWriter, EntityIterator,
  15      DirChecker,     ShareTool,   Check,      CopyTool,   IGESDumper, Messenger from Message
  16
  17 raises DomainError
  18
  19 is
  20
  21     Create returns ToolSplineCurve;
  22     ---Purpose : Returns a ToolSplineCurve, ready to work
  23
  24
  25     ReadOwnParams (me; ent : mutable SplineCurve;
  26                    IR : IGESReaderData; PR : in out ParamReader)
  27         raises DomainError  is static;
  28     ---Purpose : Reads own parameters from file. <PR> gives access to them,
  29     --           <IR> detains parameter types and values
  30
  31     WriteOwnParams (me; ent : SplineCurve;
  32                     IW : in out IGESWriter)  is static;
  33     ---Purpose : Writes own parameters to IGESWriter
  34
  35
  36     OwnShared  (me; ent : SplineCurve;
  37                 iter : in out EntityIterator)  is static;
  38     ---Purpose : Lists the Entities shared by a SplineCurve <ent>, from
  39     --           its specific (own) parameters
  40
  41     DirChecker (me; ent : SplineCurve) returns DirChecker  is static;
  42     ---Purpose : Returns specific DirChecker
  43
  44     OwnCheck   (me; ent : SplineCurve;
  45                 shares  : ShareTool; ach : in out Check)  is static;
  46     ---Purpose : Performs Specific Semantic Check
  47
  48
  49     OwnCopy    (me; entfrom : SplineCurve; entto : mutable SplineCurve;
  50                 TC : in out CopyTool)  is static;
  51     ---Purpose : Copies Specific Parameters
  52
  53
  54     OwnDump (me; ent : SplineCurve;
  55              dumper  : IGESDumper;  S : Messenger from Message; own : Integer)
  56         is static;
  57     ---Purpose : Dump of Specific Parameters
  58
  59 end ToolSplineCurve;