mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-06-26 23:07:01 +08:00
139 lines
5.6 KiB
Plaintext
Executable File
139 lines
5.6 KiB
Plaintext
Executable File
-- Created on: 1993-01-09
|
|
-- Created by: CKY / Contract Toubro-Larsen ( SIVA )
|
|
-- Copyright (c) 1993-1999 Matra Datavision
|
|
-- Copyright (c) 1999-2012 OPEN CASCADE SAS
|
|
--
|
|
-- The content of this file is subject to the Open CASCADE Technology Public
|
|
-- License Version 6.5 (the "License"). You may not use the content of this file
|
|
-- except in compliance with the License. Please obtain a copy of the License
|
|
-- at http://www.opencascade.org and read it completely before using this file.
|
|
--
|
|
-- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
|
|
-- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
|
|
--
|
|
-- The Original Code and all software distributed under the License is
|
|
-- distributed on an "AS IS" basis, without warranty of any kind, and the
|
|
-- Initial Developer hereby disclaims all such warranties, including without
|
|
-- limitation, any warranties of merchantability, fitness for a particular
|
|
-- purpose or non-infringement. Please see the License for the specific terms
|
|
-- and conditions governing the rights and limitations under the License.
|
|
|
|
|
|
class TabularData from IGESDefs inherits IGESEntity
|
|
|
|
---Purpose: Defines IGES Tabular Data, Type <406> Form <11>,
|
|
-- in package IGESDefs
|
|
-- This Class is used to provide a Structure to accomodate
|
|
-- point form data.
|
|
|
|
uses
|
|
|
|
HArray1OfInteger from TColStd,
|
|
HArray1OfReal from TColStd,
|
|
HArray1OfHArray1OfReal from IGESBasic
|
|
|
|
raises DimensionMismatch, OutOfRange
|
|
|
|
is
|
|
|
|
Create returns mutable TabularData;
|
|
|
|
-- Specific methods for the entity
|
|
|
|
Init (me : mutable;
|
|
nbProps : Integer;
|
|
propType : Integer;
|
|
typesInd : HArray1OfInteger;
|
|
nbValuesInd : HArray1OfInteger;
|
|
valuesInd : HArray1OfHArray1OfReal;
|
|
valuesDep : HArray1OfHArray1OfReal)
|
|
raises DimensionMismatch;
|
|
---Purpose : This method is used to set the fields of the class
|
|
-- TabularData
|
|
-- - nbProps : Number of property values
|
|
-- - propType : Property Type
|
|
-- - typesInd : Type of independent variables
|
|
-- - nbValuesInd : Number of values of independent variables
|
|
-- - valuesInd : Values of independent variables
|
|
-- - valuesDep : Values of dependent variables
|
|
-- raises exception if lengths of typeInd and nbValuesInd are not same
|
|
|
|
NbPropertyValues(me) returns Integer;
|
|
---Purpose : returns the number of property values (recorded)
|
|
|
|
ComputedNbPropertyValues (me) returns Integer;
|
|
---Purpose : determines the number of property values required
|
|
|
|
OwnCorrect (me : mutable) returns Boolean;
|
|
---Purpose : checks, and correct as necessary, the number of property
|
|
-- values. Returns True if corrected, False if already OK
|
|
|
|
PropertyType(me) returns Integer;
|
|
---Purpose : returns the property type
|
|
|
|
NbDependents(me) returns Integer;
|
|
---Purpose : returns the number of dependent variables
|
|
|
|
NbIndependents(me) returns Integer;
|
|
---Purpose : returns the number of independent variables
|
|
|
|
TypeOfIndependents(me; num: Integer) returns Integer
|
|
raises OutOfRange;
|
|
---Purpose : returns the type of the num'th independent variable
|
|
-- raises exception if num <= 0 or num > NbIndependents()
|
|
|
|
NbValues(me; num : Integer) returns Integer
|
|
raises OutOfRange;
|
|
---Purpose : returns the number of different values of the num'th indep. variable
|
|
-- raises exception if num <= 0 or num > NbIndependents()
|
|
|
|
IndependentValue(me; variablenum : Integer; valuenum : Integer)
|
|
returns Real
|
|
raises OutOfRange;
|
|
-- returns valuenum'th value of the variablenum'th independent variable
|
|
-- raises exception if
|
|
-- variablenum <= 0 or variablenum > NbIndependents()
|
|
-- valuenum <= 0 or valuenum > NbValues(variablenum)
|
|
|
|
DependentValues (me; num : Integer) returns HArray1OfReal from TColStd
|
|
raises OutOfRange;
|
|
-- returns the entire list of recorded Dependent Values
|
|
-- UNRESOLVED. Temporarily, all dependent values are attached to
|
|
-- <num> = 1, the other values remain undefined
|
|
|
|
DependentValue(me; variablenum: Integer; valuenum: Integer)
|
|
returns Real
|
|
raises OutOfRange;
|
|
-- RESERVED, unresolved
|
|
-- valuenum'th value of the variablenum'th dependent variable
|
|
-- raises exception if
|
|
-- variablenum <= 0 or variablenum > NbIndependents()
|
|
-- valuenum <= 0 or valuenum > NbValues(variablenum)
|
|
|
|
fields
|
|
|
|
--
|
|
-- Class : IGESDefs_TabularData
|
|
--
|
|
-- Purpose : Declaration of variables specific to the definition
|
|
-- of the Class TabularData.
|
|
--
|
|
-- Reminder : A TabularData instance is defined by :
|
|
-- - The number of properties
|
|
-- - The property type, an integer
|
|
-- - The property type, an integer
|
|
-- - The number of dependent variables
|
|
-- - The type of independent variables, a single array of Int
|
|
-- - The single array of integer values
|
|
-- - The single array of independent values
|
|
-- - The single array of dependent values
|
|
|
|
theNbPropertyValues : Integer;
|
|
thePropertyType : Integer;
|
|
theTypeOfIndependentVariables : HArray1OfInteger;
|
|
theNbValues : HArray1OfInteger;
|
|
theIndependentValues : HArray1OfHArray1OfReal;
|
|
theDependentValues : HArray1OfHArray1OfReal;
|
|
|
|
end TabularData;
|