Integration of OCCT 6.5.0 from SVN

src/PDataStd/PDataStd.cdl

@@ -0,0 +1,101 @@
+-- File:	PDataStd.cdl
+-- Created:	Wed May 10 10:48:16 1995
+-- Author:	Denis PASCAL
+---Copyright:	 Matra Datavision 1995
+
+
+
+package PDataStd 
+
+	---Purpose: 
+
+
+uses Standard,
+     PDF,
+     PCollection,
+     PColStd,
+     TColStd
+
+
+is
+
+
+    ---Purpose: General Data
+    --          ============
+
+    class Name;
+    
+    class Comment;
+    
+    ---Purpose: Basic Data for Modeling
+    --          =======================
+
+    class Integer; 
+    
+    class IntegerArray; 
+     
+    class IntegerArray_1; 
+    
+    class Real;
+
+    class RealArray; 
+    
+    class RealArray_1;     
+    
+    class ExtStringArray; 
+     
+    class ExtStringArray_1;
+
+    class TreeNode;	    
+    
+    class Expression;
+    
+    class Relation;
+    
+    class Variable;
+    
+    ---Purpose: Document Data for Modeling
+    --          ==========================
+    
+    class NoteBook; 
+ 
+    class UAttribute;
+        
+    class Directory;
+
+     
+    -- Extension    
+    class Tick;
+    
+    -- Lists:
+    class IntegerList;
+    class RealList;
+    class ExtStringList;
+    class BooleanList;
+    class ReferenceList;
+
+    -- Arrays:
+    class BooleanArray;
+    class ReferenceArray;
+    class ByteArray;
+    class ByteArray_1; 
+    
+    class NamedData; 
+    class AsciiString; 
+    class IntPackedMap;  
+    class IntPackedMap_1;
+     
+
+    class HArray1OfHAsciiString instantiates
+    	    	    HArray1 from PCollection (HAsciiString from PCollection);
+
+        class HArray1OfHArray1OfInteger instantiates HArray1 from  PCollection( 
+		HArray1OfInteger  from  PColStd); 
+		 
+	class HArray1OfHArray1OfReal instantiates HArray1 from  PCollection( 
+		HArray1OfReal  from  PColStd); 
+		 
+	class HArray1OfByte instantiates HArray1 from  PCollection( 
+		Byte  from  Standard);   
+		
+end PDataStd;

src/PDataStd/PDataStd_AsciiString.cdl

@@ -0,0 +1,32 @@
+-- File:	PDataStd_AsciiString.cdl
+-- Created:	Wed Aug 22 15:50:29 2007
+-- Author:	Sergey ZARITCHNY
+--		<sergey.zaritchny@opencascade.com>
+---Copyright:	Open CasCade SA 2007
+
+
+class AsciiString from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistance attribute of  TDataStd_AsciiString
+
+uses  HAsciiString from PCollection
+
+is
+    Create returns mutable  AsciiString from  PDataStd;
+    
+    
+    Create (V : HAsciiString from PCollection) 
+    returns mutable  AsciiString from PDataStd;
+    
+    
+    Get (me) returns HAsciiString from PCollection;
+    
+    
+    Set (me : mutable; V : HAsciiString from PCollection);
+    
+fields
+
+    myValue : HAsciiString from PCollection;
+
+
+end AsciiString;

src/PDataStd/PDataStd_AsciiString.cxx

@@ -0,0 +1,35 @@
+// File:	PDataStd_AsciiString.cxx
+// Created:	Wed Aug 22 16:30:32 2007
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CASCADE SA 2007
+
+#include <PDataStd_AsciiString.ixx>
+#include <PCollection_HAsciiString.hxx>
+//=======================================================================
+//function : PDataStd_AsciiString
+//purpose  : Constructor
+//=======================================================================
+PDataStd_AsciiString::PDataStd_AsciiString() {}
+
+//=======================================================================
+//function : PDataStd_AsciiString
+//purpose  : Constructor
+//=======================================================================
+PDataStd_AsciiString::PDataStd_AsciiString(const Handle(PCollection_HAsciiString)& V)
+: myValue (V) {}
+
+//=======================================================================
+//function : Get
+//purpose  : 
+//=======================================================================
+Handle(PCollection_HAsciiString) PDataStd_AsciiString::Get() const
+{ return myValue; }
+
+//=======================================================================
+//function : Set
+//purpose  : 
+//=======================================================================
+void PDataStd_AsciiString::Set(const Handle(PCollection_HAsciiString)& V) 
+{ myValue = V; }
+

src/PDataStd/PDataStd_BooleanArray.cdl

@@ -0,0 +1,44 @@
+-- File:        PDataStd_BooleanArray.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class BooleanArray from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HArray1OfInteger from PColStd
+
+is
+
+    Create 
+    returns mutable BooleanArray from PDataStd;
+
+    SetLower (me : mutable;
+    	      lower : Integer from Standard);
+	      
+    SetUpper (me : mutable;
+    	      upper : Integer from Standard);
+
+    Lower (me) 
+    returns Integer from Standard;      
+
+    Upper (me) 
+    returns Integer from Standard;   
+
+    Set (me : mutable;
+    	 values : HArray1OfInteger from PColStd);
+	 
+    Get (me)
+    ---C++: return const &
+    returns HArray1OfInteger from PColStd;
+
+fields
+
+    myValues : HArray1OfInteger from PColStd;
+    myLower  : Integer from Standard;
+    myUpper  : Integer from Standard;
+
+
+end BooleanArray;

src/PDataStd/PDataStd_BooleanArray.cxx

@@ -0,0 +1,70 @@
+// File:        PDataStd_BooleanArray.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_BooleanArray.ixx>
+
+//=======================================================================
+//function : PDataStd_BooleanArray
+//purpose  : 
+//=======================================================================
+PDataStd_BooleanArray::PDataStd_BooleanArray() 
+{ 
+
+}
+
+//=======================================================================
+//function : SetLower
+//purpose  : 
+//=======================================================================
+void PDataStd_BooleanArray::SetLower(const Standard_Integer lower)
+{
+  myLower = lower;
+}
+
+//=======================================================================
+//function : SetUpper
+//purpose  : 
+//=======================================================================
+void PDataStd_BooleanArray::SetUpper(const Standard_Integer upper)
+{
+  myUpper = upper;
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_BooleanArray::Lower (void) const 
+{ 
+  return myLower;
+}
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_BooleanArray::Upper (void) const 
+{ 
+  return myUpper;
+}
+
+//=======================================================================
+//function : Set
+//purpose  : 
+//=======================================================================
+void PDataStd_BooleanArray::Set(const Handle(PColStd_HArray1OfInteger)& values)
+{
+  myValues = values;
+}
+
+//=======================================================================
+//function : Get
+//purpose  : 
+//=======================================================================
+const Handle(PColStd_HArray1OfInteger)& PDataStd_BooleanArray::Get() const
+{
+  return myValues;
+}

src/PDataStd/PDataStd_BooleanList.cdl

@@ -0,0 +1,40 @@
+-- File:        PDataStd_BooleanList.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class BooleanList from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HArray1OfInteger from PColStd
+
+is
+
+    Create 
+    returns mutable BooleanList from PDataStd;
+
+    Init (me : mutable; 
+    	  lower, upper : Integer from Standard);
+
+    SetValue (me: mutable; 
+    	      index : Integer from Standard; 
+    	      value : Integer from Standard);
+
+    Value (me;  
+    	   index : Integer from Standard) 
+    returns Integer from Standard;
+
+    Lower (me) 
+    returns Integer from Standard;      
+
+    Upper (me) 
+    returns Integer from Standard;   
+
+fields
+
+    myValue     :  HArray1OfInteger from PColStd;
+
+
+end BooleanList;

src/PDataStd/PDataStd_BooleanList.cxx

@@ -0,0 +1,67 @@
+// File:        PDataStd_BooleanList.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_BooleanList.ixx>
+
+//=======================================================================
+//function : PDataStd_BooleanList
+//purpose  : 
+//=======================================================================
+PDataStd_BooleanList::PDataStd_BooleanList() 
+{ 
+
+}
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+void PDataStd_BooleanList::Init(const Standard_Integer lower,
+				const Standard_Integer upper)
+{
+  if (upper >= lower)
+    myValue = new PColStd_HArray1OfInteger(lower, upper);
+}
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_BooleanList::SetValue(const Standard_Integer index, const Standard_Integer value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_BooleanList::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_BooleanList::Lower (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Lower(); 
+  return 0;
+}
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_BooleanList::Upper (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Upper(); 
+  return -1;
+}

src/PDataStd/PDataStd_ByteArray.cdl

@@ -0,0 +1,30 @@
+-- File:        PDataStd_ByteArray.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class ByteArray from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HArray1OfInteger from PColStd
+
+is
+
+    Create 
+    returns mutable ByteArray from PDataStd;
+
+    Set (me : mutable;
+    	 values : HArray1OfInteger from PColStd);
+	 
+    Get (me)
+    ---C++: return const &
+    returns HArray1OfInteger from PColStd;
+
+fields
+
+    myValues : HArray1OfInteger from PColStd;
+
+
+end ByteArray;

src/PDataStd/PDataStd_ByteArray.cxx

@@ -0,0 +1,34 @@
+// File:        PDataStd_ByteArray.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_ByteArray.ixx>
+
+//=======================================================================
+//function : PDataStd_ByteArray
+//purpose  : 
+//=======================================================================
+PDataStd_ByteArray::PDataStd_ByteArray() 
+{ 
+
+}
+
+//=======================================================================
+//function : Set
+//purpose  : 
+//=======================================================================
+void PDataStd_ByteArray::Set(const Handle(PColStd_HArray1OfInteger)& values)
+{
+  myValues = values;
+}
+
+//=======================================================================
+//function : Get
+//purpose  : 
+//=======================================================================
+const Handle(PColStd_HArray1OfInteger)& PDataStd_ByteArray::Get() const
+{
+  return myValues;
+}

src/PDataStd/PDataStd_ByteArray_1.cdl

@@ -0,0 +1,36 @@
+-- File:	PDataStd_ByteArray_1.cdl
+-- Created:	Wed Mar 26 18:01:54 2008
+-- Author:	Sergey ZARITCHNY
+--		<sergey.zaritchny@opencascade.com>
+---Copyright:	Open CasCade SA 2008
+
+
+class ByteArray_1 from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistence
+uses 
+
+    HArray1OfInteger from PColStd
+
+is
+
+    Create 
+    returns mutable ByteArray_1 from PDataStd;
+
+    Set (me : mutable;
+    	 values : HArray1OfInteger from PColStd);
+	 
+    Get (me)
+    ---C++: return const &
+    returns HArray1OfInteger from PColStd; 
+     
+    SetDelta(me : mutable; delta : Boolean from Standard); 
+     
+    GetDelta(me) returns Boolean from Standard;
+
+fields
+
+    myValues : HArray1OfInteger from PColStd;
+    myDelta  : Boolean from Standard;
+
+end ByteArray_1;

src/PDataStd/PDataStd_ByteArray_1.cxx

@@ -0,0 +1,49 @@
+// File:	PDataStd_ByteArray_1.cxx
+// Created:	Wed Mar 26 18:11:22 2008
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CasCade SA 2008
+
+#include <PDataStd_ByteArray_1.ixx>
+
+//=======================================================================
+//function : PDataStd_ByteArray_1
+//purpose  : 
+//=======================================================================
+PDataStd_ByteArray_1::PDataStd_ByteArray_1() {}
+
+//=======================================================================
+//function : Set
+//purpose  : 
+//=======================================================================
+void PDataStd_ByteArray_1::Set(const Handle(PColStd_HArray1OfInteger)& values)
+{
+  myValues = values;
+}
+
+//=======================================================================
+//function : Get
+//purpose  : 
+//=======================================================================
+const Handle(PColStd_HArray1OfInteger)& PDataStd_ByteArray_1::Get() const
+{
+  return myValues;
+}
+
+//=======================================================================
+//function : SetDelta
+//purpose  : 
+//=======================================================================
+void PDataStd_ByteArray_1::SetDelta(const Standard_Boolean delta)
+{
+  myDelta = delta;
+}
+
+//=======================================================================
+//function : GetDelta
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_ByteArray_1::GetDelta() const
+{
+  return myDelta;
+}

src/PDataStd/PDataStd_Comment.cdl

@@ -0,0 +1,32 @@
+-- File:	PDataStd_Comment.cdl
+-- Created:	Thu Jan 15 11:45:08 1998
+-- Author:	Denis PASCAL
+--		<dp@dingox.paris1.matra-dtv.fr>
+---Copyright:	 Matra Datavision 1998
+
+
+
+class Comment from PDataStd inherits Attribute from PDF
+
+uses HExtendedString from PCollection
+
+is
+
+    Create returns mutable Comment from  PDataStd;
+    
+    
+    Create (V : HExtendedString from PCollection) 
+    returns mutable Comment from PDataStd;
+    
+    
+    Get (me) returns HExtendedString from PCollection;
+    
+    
+    Set (me : mutable; V : HExtendedString from PCollection);
+
+
+fields
+
+    myValue : HExtendedString from PCollection;
+
+end Comment;

src/PDataStd/PDataStd_Comment.cxx

@@ -0,0 +1,20 @@
+// File:	PDataStd_Comment.cxx
+// Created:	Thu Jan 15 11:19:02 1998
+// Author:	Denis PASCAL
+//		<dp@dingox.paris1.matra-dtv.fr>
+
+
+#include <PDataStd_Comment.ixx>
+
+
+PDataStd_Comment::PDataStd_Comment() {}
+
+PDataStd_Comment::PDataStd_Comment(const Handle(PCollection_HExtendedString)& V)
+: myValue (V) {}
+
+Handle(PCollection_HExtendedString) PDataStd_Comment::Get() const
+{ return myValue; }
+
+void PDataStd_Comment::Set(const Handle(PCollection_HExtendedString)& V) 
+{ myValue = V; }
+

src/PDataStd/PDataStd_Directory.cdl

@@ -0,0 +1,15 @@
+-- File:	PDataStd_Directory.cdl
+-- Created:	Fri Jun 25 13:59:31 1999
+-- Author:	Sergey RUIN
+---Copyright:	 Matra Datavision 1999
+
+
+
+class Directory from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+is
+
+    Create returns mutable Directory from  PDataStd;
+
+end Directory;

src/PDataStd/PDataStd_Directory.cxx

@@ -0,0 +1,4 @@
+#include <PDataStd_Directory.ixx>
+
+PDataStd_Directory::PDataStd_Directory() {}
+

src/PDataStd/PDataStd_Expression.cdl

@@ -0,0 +1,33 @@
+-- File:	PDataStd_Expression.cdl
+-- Created:	Thu Jul 31 10:29:12 1997
+-- Author:	Denis PASCAL
+---Copyright:	 Matra Datavision 1997
+
+
+
+class Expression from PDataStd inherits Attribute from PDF
+
+uses HExtendedString  from PCollection,
+     HAttributeArray1 from PDF 
+
+is
+
+    Create returns mutable Expression from  PDataStd;
+    
+    Create (name : HExtendedString from PCollection) 
+    returns mutable Expression from PDataStd;
+    
+    GetName (me) returns HExtendedString from PCollection;
+    
+    SetName (me : mutable; name : HExtendedString from PCollection);
+
+    GetVariables (me) returns HAttributeArray1 from PDF;
+    
+    SetVariables (me : mutable; vars : HAttributeArray1 from PDF);
+    
+fields
+
+    myName       : HExtendedString  from PCollection;  
+    myVariables  : HAttributeArray1 from PDF;
+
+end Expression;

src/PDataStd/PDataStd_Expression.cxx

@@ -0,0 +1,67 @@
+// File:	PDataStd_Expression.cxx
+// Created:	Wed Dec 10 11:26:08 1997
+// Author:	Denis PASCAL
+//		<dp@dingox.paris1.matra-dtv.fr>
+
+#include <PDataStd_Expression.ixx>
+
+//=======================================================================
+//function : PDataStd_Expression
+//purpose  : 
+//=======================================================================
+
+PDataStd_Expression::PDataStd_Expression()
+{
+}
+
+//=======================================================================
+//function : PDataStd_Expression
+//purpose  : 
+//=======================================================================
+
+PDataStd_Expression::PDataStd_Expression(const Handle(PCollection_HExtendedString)& name)
+{
+  SetName(name);
+}
+
+//=======================================================================
+//function : GetName
+//purpose  : 
+//=======================================================================
+
+ Handle(PCollection_HExtendedString) PDataStd_Expression::GetName() const
+{
+  return myName;
+}
+
+//=======================================================================
+//function : SetName
+//purpose  : 
+//=======================================================================
+
+ void PDataStd_Expression::SetName(const Handle(PCollection_HExtendedString)& name) 
+{
+  myName = name;
+}
+
+
+//=======================================================================
+//function : GetVariables
+//purpose  : 
+//=======================================================================
+
+Handle(PDF_HAttributeArray1) PDataStd_Expression::GetVariables() const
+{ 
+  return myVariables; 
+}
+
+
+//=======================================================================
+//function : SetVariables
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Expression::SetVariables(const Handle(PDF_HAttributeArray1)& vars) 
+{ 
+  myVariables = vars; 
+}

src/PDataStd/PDataStd_ExtStringArray.cdl

@@ -0,0 +1,31 @@
+-- File:	PDataStd_ExtStringArray.cdl
+-- Created:	Wed Jan 16 11:27:52 2002
+-- Author:	Michael PONIKAROV
+--		<mpv@covox>
+---Copyright:	 Matra Datavision 2002
+
+class ExtStringArray from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+
+uses HExtendedString          from PCollection,
+     HArray1OfExtendedString from PColStd
+     
+     
+is
+
+    Create returns mutable ExtStringArray from PDataStd;
+
+    Init(me : mutable; lower, upper : Integer from Standard);
+
+    SetValue(me: mutable; Index : Integer from Standard; Value : HExtendedString from PCollection);
+    
+    Value(me;  Index : Integer from Standard) returns HExtendedString from PCollection;
+   
+    Lower (me) returns Integer from Standard;      
+
+    Upper (me) returns Integer from Standard;   
+     
+fields
+    myValue     :  HArray1OfExtendedString from PColStd;
+end ExtStringArray;

src/PDataStd/PDataStd_ExtStringArray.cxx

@@ -0,0 +1,66 @@
+// File:	PDataStd_ExtStringArray.cxx
+// Created:	Wed Jan 16 11:28:25 2002
+// Author:	Michael PONIKAROV
+//		<mpv@covox>
+
+
+#include <PDataStd_ExtStringArray.ixx>
+
+//=======================================================================
+//function : PDataStd_ExtStringArray
+//purpose  : 
+//=======================================================================
+
+PDataStd_ExtStringArray::PDataStd_ExtStringArray () { }
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+
+void PDataStd_ExtStringArray::Init(const Standard_Integer lower,
+				   const Standard_Integer upper)
+{
+  myValue = new PColStd_HArray1OfExtendedString(lower, upper);
+}
+
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+
+void PDataStd_ExtStringArray::SetValue(const Standard_Integer index,
+				       const Handle(PCollection_HExtendedString)& value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+
+Handle(PCollection_HExtendedString) PDataStd_ExtStringArray::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ExtStringArray::Lower (void) const 
+{
+  return myValue->Lower();
+}
+
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ExtStringArray::Upper (void) const 
+{
+  return myValue->Upper();
+}

src/PDataStd/PDataStd_ExtStringArray_1.cdl

@@ -0,0 +1,40 @@
+-- File:	PDataStd_ExtStringArray_1.cdl
+-- Created:	Thu Mar 27 17:09:57 2008
+-- Author:	Sergey ZARITCHNY
+--		<sergey.zaritchny@opencascade.com>
+---Copyright:	Open CasCade SA 2008 
+
+class ExtStringArray_1 from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistence
+
+uses  HExtendedString          from PCollection,
+      HArray1OfExtendedString  from PColStd
+     
+     
+is
+
+    Create returns mutable ExtStringArray_1 from PDataStd;
+
+    Init(me : mutable; lower, upper : Integer from Standard);
+
+    SetValue(me: mutable; Index : Integer from Standard; Value : HExtendedString from PCollection);
+    
+    Value(me;  Index : Integer from Standard) returns HExtendedString from PCollection;
+   
+    Lower (me) returns Integer from Standard;      
+
+    Upper (me) returns Integer from Standard;   
+     
+    SetDelta(me : mutable; delta : Boolean from Standard); 
+     
+    GetDelta(me) returns Boolean from Standard;
+     
+fields
+    myValue     :  HArray1OfExtendedString from PColStd;
+    myDelta  : Boolean from Standard;
+
+end ExtStringArray_1;
+
+
+

src/PDataStd/PDataStd_ExtStringArray_1.cxx

@@ -0,0 +1,86 @@
+// File:	PDataStd_ExtStringArray_1.cxx
+// Created:	Thu Mar 27 17:12:47 2008
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CasCade SA 2008
+
+
+#include <PDataStd_ExtStringArray_1.ixx>
+
+//=======================================================================
+//function : PDataStd_ExtStringArray_1
+//purpose  : 
+//=======================================================================
+
+PDataStd_ExtStringArray_1::PDataStd_ExtStringArray_1 () { }
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+
+void PDataStd_ExtStringArray_1::Init(const Standard_Integer lower,
+				   const Standard_Integer upper)
+{
+  myValue = new PColStd_HArray1OfExtendedString(lower, upper);
+}
+
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+
+void PDataStd_ExtStringArray_1::SetValue(const Standard_Integer index,
+				       const Handle(PCollection_HExtendedString)& value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+
+Handle(PCollection_HExtendedString) PDataStd_ExtStringArray_1::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ExtStringArray_1::Lower (void) const 
+{
+  return myValue->Lower();
+}
+
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ExtStringArray_1::Upper (void) const 
+{
+  return myValue->Upper();
+}
+
+//=======================================================================
+//function : SetDelta
+//purpose  : 
+//=======================================================================
+void PDataStd_ExtStringArray_1::SetDelta(const Standard_Boolean delta)
+{
+  myDelta = delta;
+}
+
+//=======================================================================
+//function : GetDelta
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_ExtStringArray_1::GetDelta() const
+{
+  return myDelta;
+}
+

src/PDataStd/PDataStd_ExtStringList.cdl

@@ -0,0 +1,42 @@
+-- File:        PDataStd_ExtStringList.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class ExtStringList from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HExtendedString from PCollection,
+    HArray1OfExtendedString from PColStd
+
+is
+
+    Create 
+    returns mutable ExtStringList from PDataStd;
+
+    Init (me : mutable; 
+    	  lower, upper : Integer from Standard);
+
+    SetValue (me: mutable; 
+    	      index : Integer from Standard; 
+    	      value : HExtendedString from PCollection);
+
+    Value (me;  
+    	   index : Integer from Standard) 
+    returns HExtendedString from PCollection;
+
+    Lower (me) 
+    returns Integer from Standard;      
+
+    Upper (me) 
+    returns Integer from Standard;   
+
+
+fields
+
+    myValue     :  HArray1OfExtendedString from PColStd;
+
+
+end ExtStringList;

src/PDataStd/PDataStd_ExtStringList.cxx

@@ -0,0 +1,67 @@
+// File:        PDataStd_ExtStringList.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_ExtStringList.ixx>
+
+//=======================================================================
+//function : PDataStd_ExtStringList
+//purpose  : 
+//=======================================================================
+PDataStd_ExtStringList::PDataStd_ExtStringList() 
+{ 
+
+}
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+void PDataStd_ExtStringList::Init(const Standard_Integer lower,
+				  const Standard_Integer upper)
+{
+  if (upper >= lower)
+    myValue = new PColStd_HArray1OfExtendedString(lower, upper);
+}
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_ExtStringList::SetValue(const Standard_Integer index, const Handle(PCollection_HExtendedString)& value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+Handle(PCollection_HExtendedString) PDataStd_ExtStringList::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ExtStringList::Lower (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Lower(); 
+  return 0;
+}
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ExtStringList::Upper (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Upper(); 
+  return -1;
+}

src/PDataStd/PDataStd_IntPackedMap.cdl

@@ -0,0 +1,45 @@
+-- File:	PDataStd_IntPackedMap.cdl
+-- Created:	Wed Aug 22 16:38:53 2007
+-- Author:	Sergey ZARITCHNY
+--		<sergey.zaritchny@opencascade.com>
+---Copyright:	Open CasCade SA 2007
+
+class IntPackedMap from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistance attribute of  TDataStd_IntPackedMap  
+
+uses   
+    HArray1OfInteger  from  PColStd
+
+
+is
+    Create returns mutable  IntPackedMap from  PDataStd;
+
+    Init (me : mutable; theLow,  theUp:  Integer  from Standard);
+    ---Purpose: Inits the internal container
+    --  if  (upper  -  lower)  ==  0  and (upper  |  lower) == 0, the corresponding  
+    --  array is empty (not requested)
+     
+    IsEmpty (me)
+    ---Purpose: Returns true if the internal container is empty
+    returns Boolean from Standard;  
+
+    Upper  (me)
+     ---Purpose: Returns an upper bound of the internal container
+    returns Integer from Standard;   
+
+    Lower  (me)
+     ---Purpose: Returns a lower bound of the internal container
+    returns Integer from Standard;   
+    
+    GetValue (me; theIndex : Integer from Standard)  
+    returns Integer from Standard;
+        
+    SetValue (me : mutable; theIndex : Integer from Standard;  
+    	    	    	    theValue : Integer from Standard);
+    
+fields 
+
+    myIntValues      :  HArray1OfInteger from PColStd;   
+    
+end IntPackedMap;

src/PDataStd/PDataStd_IntPackedMap.cxx

@@ -0,0 +1,71 @@
+// File:	PDataStd_IntPackedMap.cxx
+// Created:	Wed Aug 22 17:28:25 2007
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CASCADE SA 2007
+
+#include <PDataStd_IntPackedMap.ixx>
+#include <PColStd_HArray1OfInteger.hxx>
+//=======================================================================
+//function : PDataStd_IntPackedMap
+//purpose  : Constructor
+//=======================================================================
+PDataStd_IntPackedMap::PDataStd_IntPackedMap() {}
+
+//=======================================================================
+//function : Init
+//purpose  : Initializes the internal container
+//=======================================================================
+void PDataStd_IntPackedMap::Init(const Standard_Integer theLow, 
+const Standard_Integer theUp) {
+  myIntValues = new PColStd_HArray1OfInteger(theLow, theUp);
+}
+
+//=======================================================================
+//function : GetValue
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntPackedMap::GetValue(
+				   const Standard_Integer theIndex) const
+{ return myIntValues->Value(theIndex); }
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_IntPackedMap::SetValue(const Standard_Integer theIndx, 
+				     const Standard_Integer theValue) 
+{ 
+  myIntValues->SetValue(theIndx, theValue);
+}
+
+//=======================================================================
+//function : IsEmpty
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_IntPackedMap::IsEmpty() const
+{ 
+  if(myIntValues.IsNull()) return Standard_True;
+  if(!myIntValues->Upper() && !myIntValues->Lower()) return Standard_True;
+  return Standard_False;
+}
+
+//=======================================================================
+//function : Returns an upper bound of the internal container
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntPackedMap::Upper() const
+{ 
+  if(myIntValues.IsNull()) return 0;
+  return myIntValues->Upper();
+}
+
+//=======================================================================
+//function : Returns a lower bound of the internal container
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntPackedMap::Lower() const
+{ 
+  if(myIntValues.IsNull()) return 0;
+  return myIntValues->Lower();
+}

src/PDataStd/PDataStd_IntPackedMap_1.cdl

@@ -0,0 +1,52 @@
+-- File:	PDataStd_IntPackedMap_1.cdl
+-- Created:	Thu Mar 27 17:20:08 2008
+-- Author:	Sergey ZARITCHNY
+--		<sergey.zaritchny@opencascade.com>
+---Copyright:	Open CasCade SA 2008 
+
+class IntPackedMap_1 from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistence
+
+uses
+    HArray1OfInteger  from  PColStd
+
+
+is
+    Create returns mutable  IntPackedMap_1 from  PDataStd;
+
+    Init (me : mutable; theLow,  theUp:  Integer  from Standard);
+    ---Purpose: Inits the internal container
+    --  if  (upper  -  lower)  ==  0  and (upper  |  lower) == 0, the corresponding  
+    --  array is empty (not requested)
+     
+    IsEmpty (me)
+    ---Purpose: Returns true if the internal container is empty
+    returns Boolean from Standard;  
+
+    Upper  (me)
+     ---Purpose: Returns an upper bound of the internal container
+    returns Integer from Standard;   
+
+    Lower  (me)
+     ---Purpose: Returns a lower bound of the internal container
+    returns Integer from Standard;   
+    
+    GetValue (me; theIndex : Integer from Standard)  
+    returns Integer from Standard;
+        
+    SetValue (me : mutable; theIndex : Integer from Standard;  
+    	    	    	    theValue : Integer from Standard);
+     
+    SetDelta(me : mutable; delta : Boolean from Standard); 
+     
+    GetDelta(me) returns Boolean from Standard;
+    
+fields 
+
+    myIntValues      :  HArray1OfInteger from PColStd;       
+    myDelta  : Boolean from Standard;
+
+end IntPackedMap_1;
+
+

src/PDataStd/PDataStd_IntPackedMap_1.cxx

@@ -0,0 +1,91 @@
+// File:	PDataStd_IntPackedMap_1.cxx
+// Created:	Thu Mar 27 17:22:25 2008
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CasCade SA 2008
+
+
+#include <PDataStd_IntPackedMap_1.ixx>
+#include <PColStd_HArray1OfInteger.hxx>
+
+//=======================================================================
+//function : PDataStd_IntPackedMap_1
+//purpose  : Constructor
+//=======================================================================
+PDataStd_IntPackedMap_1::PDataStd_IntPackedMap_1() {}
+
+//=======================================================================
+//function : Init
+//purpose  : Initializes the internal container
+//=======================================================================
+void PDataStd_IntPackedMap_1::Init(const Standard_Integer theLow, 
+const Standard_Integer theUp) {
+  myIntValues = new PColStd_HArray1OfInteger(theLow, theUp);
+}
+
+//=======================================================================
+//function : GetValue
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntPackedMap_1::GetValue(
+				   const Standard_Integer theIndex) const
+{ return myIntValues->Value(theIndex); }
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_IntPackedMap_1::SetValue(const Standard_Integer theIndx, 
+				     const Standard_Integer theValue) 
+{ 
+  myIntValues->SetValue(theIndx, theValue);
+}
+
+//=======================================================================
+//function : IsEmpty
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_IntPackedMap_1::IsEmpty() const
+{ 
+  if(myIntValues.IsNull()) return Standard_True;
+  if(!myIntValues->Upper() && !myIntValues->Lower()) return Standard_True;
+  return Standard_False;
+}
+
+//=======================================================================
+//function : Returns an upper bound of the internal container
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntPackedMap_1::Upper() const
+{ 
+  if(myIntValues.IsNull()) return 0;
+  return myIntValues->Upper();
+}
+
+//=======================================================================
+//function : Returns a lower bound of the internal container
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntPackedMap_1::Lower() const
+{ 
+  if(myIntValues.IsNull()) return 0;
+  return myIntValues->Lower();
+}
+
+//=======================================================================
+//function : SetDelta
+//purpose  : 
+//=======================================================================
+void PDataStd_IntPackedMap_1::SetDelta(const Standard_Boolean delta)
+{
+  myDelta = delta;
+}
+
+//=======================================================================
+//function : GetDelta
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_IntPackedMap_1::GetDelta() const
+{
+  return myDelta;
+}

src/PDataStd/PDataStd_Integer.cdl

@@ -0,0 +1,33 @@
+-- File:	PDataStd_Integer.cdl
+-- Created:	Wed Apr  9 11:26:37 1997
+-- Author:	VAUTHIER Jean-Claude
+---Copyright:	 Matra Datavision 1997
+
+
+class Integer from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+
+uses Integer from Standard
+
+is
+
+
+    Create returns mutable Integer from PDataStd;
+
+
+    Create (V : Integer from Standard)
+    returns mutable Integer from PDataStd;
+    
+    
+    Get (me) returns Integer from Standard;
+
+
+    Set (me : mutable; V : Integer from Standard);
+    
+
+fields
+
+    myValue : Integer from Standard;
+
+end Integer;

src/PDataStd/PDataStd_Integer.cxx

@@ -0,0 +1,46 @@
+// File:	PDataStd_Integer.cxx
+// Created:	Wed Apr  9 13:23:12 1997
+// Author:	VAUTHIER Jean-Claude
+
+
+#include <PDataStd_Integer.ixx>
+
+
+//=======================================================================
+//function : PDataStd_Integer
+//purpose  : 
+//=======================================================================
+
+PDataStd_Integer::PDataStd_Integer () {}
+
+
+//=======================================================================
+//function : PDataStd_Integer
+//purpose  : 
+//=======================================================================
+
+PDataStd_Integer::PDataStd_Integer (const Standard_Integer V) : myValue (V) { }
+
+
+
+//=======================================================================
+//function : Set
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Integer::Set (const Standard_Integer V) 
+{
+  myValue = V;
+}
+
+
+//=======================================================================
+//function : Get
+//purpose  : 
+//=======================================================================
+
+Standard_Integer PDataStd_Integer::Get () const
+{
+  return myValue;
+}
+

src/PDataStd/PDataStd_IntegerArray.cdl

@@ -0,0 +1,30 @@
+-- File:	PDataStd_IntegerArray.cdl
+-- Created:	Fri Jun 11 11:41:53 1999
+-- Author:	Sergey RUIN
+---Copyright:	 Matra Datavision 1999
+
+
+class IntegerArray from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+
+uses HArray1OfInteger from PColStd
+     
+     
+is
+
+    Create returns mutable IntegerArray from PDataStd;
+
+    Init(me : mutable; lower, upper : Integer from Standard);
+
+    SetValue(me: mutable; Index : Integer from Standard; Value : Integer from Standard);
+    
+    Value(me;  Index : Integer from Standard) returns Integer  from Standard;
+   
+    Lower (me) returns Integer from Standard;      
+
+    Upper (me) returns Integer from Standard;   
+     
+fields
+    myValue     :  HArray1OfInteger from PColStd;
+end IntegerArray;

src/PDataStd/PDataStd_IntegerArray.cxx

@@ -0,0 +1,59 @@
+// File:	PDataStd_IntegerArray.cxx
+// Created:	Tue Jun  15 13:24:14 1999
+// Author:	Sergey RUIN
+
+#include <PDataStd_IntegerArray.ixx>
+
+//=======================================================================
+//function : PDataStd_IntegerArray
+//purpose  : 
+//=======================================================================
+
+PDataStd_IntegerArray::PDataStd_IntegerArray () { }
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+
+void PDataStd_IntegerArray::Init(const Standard_Integer lower,
+			    const Standard_Integer upper)
+{
+  myValue = new PColStd_HArray1OfInteger(lower, upper);
+}
+
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+
+void PDataStd_IntegerArray::SetValue(const Standard_Integer index, const Standard_Integer value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+
+Standard_Integer PDataStd_IntegerArray::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntegerArray::Lower (void) const 
+{ return myValue->Lower(); }
+
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntegerArray::Upper (void) const 
+{ return myValue->Upper(); }

src/PDataStd/PDataStd_IntegerArray_1.cdl

@@ -0,0 +1,36 @@
+-- File:	PDataStd_IntegerArray_1.cdl
+-- Created:	Wed Mar 26 18:21:04 2008
+-- Author:	Sergey ZARITCHNY
+--		<sergey.zaritchny@opencascade.com>
+---Copyright:	Open CasCade SA 2008 
+
+class IntegerArray_1 from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistence
+uses HArray1OfInteger from PColStd
+     
+     
+is
+
+    Create returns mutable IntegerArray_1 from PDataStd;
+
+    Init(me : mutable; lower, upper : Integer from Standard);
+
+    SetValue(me: mutable; Index : Integer from Standard; Value : Integer from Standard);
+    
+    Value(me;  Index : Integer from Standard) returns Integer  from Standard;
+   
+    Lower (me) returns Integer from Standard;      
+
+    Upper (me) returns Integer from Standard;   
+ 
+    SetDelta(me : mutable; delta : Boolean from Standard);  
+    
+    GetDelta(me) returns Boolean from Standard;          
+    
+fields
+    myValue  :  HArray1OfInteger from PColStd;
+    myDelta  : Boolean from Standard;
+end IntegerArray_1;
+
+

src/PDataStd/PDataStd_IntegerArray_1.cxx

@@ -0,0 +1,81 @@
+// File:	PDataStd_IntegerArray_1.cxx
+// Created:	Wed Mar 26 18:23:45 2008
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CasCade SA 2008
+
+#include <PDataStd_IntegerArray_1.ixx>
+
+//=======================================================================
+//function : PDataStd_IntegerArray_1
+//purpose  : 
+//=======================================================================
+
+PDataStd_IntegerArray_1::PDataStd_IntegerArray_1 () { }
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+
+void PDataStd_IntegerArray_1::Init(const Standard_Integer lower,
+			    const Standard_Integer upper)
+{
+  myValue = new PColStd_HArray1OfInteger(lower, upper);
+}
+
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+
+void PDataStd_IntegerArray_1::SetValue(const Standard_Integer index, 
+				       const Standard_Integer value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+
+Standard_Integer PDataStd_IntegerArray_1::Value
+                                   ( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntegerArray_1::Lower (void) const 
+{ return myValue->Lower(); }
+
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntegerArray_1::Upper (void) const 
+{ return myValue->Upper(); }
+
+//=======================================================================
+//function : SetDelta
+//purpose  : 
+//=======================================================================
+void PDataStd_IntegerArray_1::SetDelta(const Standard_Boolean delta)
+{
+  myDelta = delta;
+}
+
+//=======================================================================
+//function : GetDelta
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_IntegerArray_1::GetDelta() const
+{
+  return myDelta;
+}

src/PDataStd/PDataStd_IntegerList.cdl

@@ -0,0 +1,40 @@
+-- File:        PDataStd_IntegerList.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class IntegerList from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HArray1OfInteger from PColStd
+
+is
+
+    Create 
+    returns mutable IntegerList from PDataStd;
+
+    Init (me : mutable; 
+    	  lower, upper : Integer from Standard);
+
+    SetValue (me: mutable; 
+    	      index : Integer from Standard; 
+    	      value : Integer from Standard);
+
+    Value (me;  
+    	   index : Integer from Standard) 
+    returns Integer from Standard;
+
+    Lower (me) 
+    returns Integer from Standard;      
+
+    Upper (me) 
+    returns Integer from Standard;   
+
+fields
+
+    myValue     :  HArray1OfInteger from PColStd;
+
+
+end IntegerList;

src/PDataStd/PDataStd_IntegerList.cxx

@@ -0,0 +1,67 @@
+// File:        PDataStd_IntegerList.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_IntegerList.ixx>
+
+//=======================================================================
+//function : PDataStd_IntegerList
+//purpose  : 
+//=======================================================================
+PDataStd_IntegerList::PDataStd_IntegerList() 
+{ 
+
+}
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+void PDataStd_IntegerList::Init(const Standard_Integer lower,
+				const Standard_Integer upper)
+{
+  if (upper >= lower)
+    myValue = new PColStd_HArray1OfInteger(lower, upper);
+}
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_IntegerList::SetValue(const Standard_Integer index, const Standard_Integer value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntegerList::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntegerList::Lower (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Lower(); 
+  return 0;
+}
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_IntegerList::Upper (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Upper(); 
+  return -1;
+}

src/PDataStd/PDataStd_Name.cdl

@@ -0,0 +1,31 @@
+-- File:	PDataStd_Name.cdl
+-- Created:	Thu Jul 31 10:29:12 1997
+-- Author:	Denis PASCAL
+---Copyright:	 Matra Datavision 1997
+
+
+
+class Name from PDataStd inherits Attribute from PDF
+
+uses HExtendedString from PCollection
+
+is
+
+    Create returns mutable Name from  PDataStd;
+    
+    
+    Create (V : HExtendedString from PCollection) 
+    returns mutable Name from PDataStd;
+    
+    
+    Get (me) returns HExtendedString from PCollection;
+    
+    
+    Set (me : mutable; V : HExtendedString from PCollection);
+
+    
+fields
+
+    myValue : HExtendedString from PCollection;
+
+end Name;

src/PDataStd/PDataStd_Name.cxx

@@ -0,0 +1,13 @@
+#include <PDataStd_Name.ixx>
+
+PDataStd_Name::PDataStd_Name() {}
+
+PDataStd_Name::PDataStd_Name(const Handle(PCollection_HExtendedString)& V)
+: myValue (V) {}
+
+Handle(PCollection_HExtendedString) PDataStd_Name::Get() const
+{ return myValue; }
+
+void PDataStd_Name::Set(const Handle(PCollection_HExtendedString)& V) 
+{ myValue = V; }
+

src/PDataStd/PDataStd_NamedData.cdl

@@ -0,0 +1,175 @@
+-- File:	PDataStd_NamedData.cdl
+-- Created:	Tue Jun 26 14:23:20 2007
+-- Author:	Sergey ZARITCHNY
+--		<szy@friendox>
+---Copyright:	 Open CASCADE 2007
+
+
+class NamedData from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistence of NamedData
+
+uses
+    HExtendedString from PCollection,
+    HArray1OfExtendedString from PColStd, 
+    HArray2OfInteger  from  PColStd, 
+    HArray1OfInteger  from  PColStd, 
+    HArray1OfReal  from  PColStd, 
+    HArray1OfByte  from  PDataStd, 
+    HArray2OfInteger  from TColStd, 
+    HArray1OfHArray1OfInteger from PDataStd, 
+    HArray1OfHArray1OfReal from PDataStd
+is
+
+    Create 
+    returns mutable NamedData from PDataStd;
+
+    Init (me : mutable; theDimension:  HArray2OfInteger  from TColStd);
+    ---Purpose: 6 pairs of (lower, upper) <theDimension> should be  initialized
+    --  if  (upper  -  lower)  ==  0  and (upper  |  lower) == 0, the corresponding  
+    --  array is empty (not requested) 
+    
+    SetIntDataItem (me: mutable; 
+    	      index : Integer from Standard; 
+    	      key   : HExtendedString from PCollection; 
+    	      value : Integer from Standard); 
+     
+    IntDataItemValue(me; 
+	      index : Integer from Standard; 
+	      key   : out HExtendedString from PCollection) 
+    returns Integer from Standard;        
+     
+    SetRealDataItem (me: mutable; 
+    	      index : Integer from Standard; 
+    	      key   : HExtendedString from PCollection; 
+    	      value : Real from Standard); 
+     
+    RealDataItemValue(me; 
+	      index : Integer from Standard; 
+	      key   : out HExtendedString from PCollection) 
+    returns Real from Standard;        
+         
+    SetStrDataItem (me: mutable; 
+    	      index : Integer from Standard; 
+    	      key   : HExtendedString from PCollection; 
+    	      value : HExtendedString from PCollection); 
+     
+    StrDataItemValue(me; 
+	      index : Integer from Standard; 
+	      key   : out HExtendedString from PCollection) 
+    returns HExtendedString from PCollection; 
+     
+    SetByteDataItem (me: mutable; 
+    	      index : Integer from Standard; 
+    	      key   : HExtendedString from PCollection; 
+    	      value : Byte from Standard); 
+     
+    ByteDataItemValue(me; 
+	      index : Integer from Standard; 
+	      key   : out HExtendedString from PCollection) 
+    returns Byte from Standard;        
+     
+    SetArrIntDataItem (me: mutable; 
+    	      index : Integer from Standard; 
+    	      key   : HExtendedString from PCollection; 
+    	      value : HArray1OfInteger from PColStd); 
+     
+    ArrIntDataItemValue(me; 
+	      index : Integer from Standard; 
+	      key   : out HExtendedString from PCollection) 
+    returns HArray1OfInteger from PColStd;
+
+    SetArrRealDataItem (me: mutable; 
+    	      index : Integer from Standard; 
+    	      key   : HExtendedString from PCollection; 
+    	      value : HArray1OfReal from PColStd); 
+     
+    ArrRealDataItemValue(me; 
+	      index : Integer from Standard; 
+	      key   : out HExtendedString from PCollection) 
+    returns HArray1OfReal from PColStd;
+
+
+    LowerI (me) 
+    returns Integer from Standard;      
+
+    UpperI (me) 
+    returns Integer from Standard; 
+     
+    LowerR (me) 
+    returns Integer from Standard;      
+
+    UpperR (me) 
+    returns Integer from Standard;     
+
+    LowerS (me) 
+    returns Integer from Standard;      
+
+    UpperS (me) 
+    returns Integer from Standard; 
+
+    LowerB (me) 
+    returns Integer from Standard;      
+
+    UpperB (me) 
+    returns Integer from Standard;  
+     
+    LowerAI (me) 
+    returns Integer from Standard;      
+
+    UpperAI (me) 
+    returns Integer from Standard;  
+
+    LowerAR (me) 
+    returns Integer from Standard;      
+
+    UpperAR (me) 
+    returns Integer from Standard; 
+     
+    HasIntegers (me)
+    ---Purpose: Returns true if at least one named integer value is kept. 
+    returns Boolean from Standard;  
+     
+    HasReals (me)
+    ---Purpose: Returns true if at least one named real value is kept. 
+    returns Boolean from Standard; 
+     
+    HasStrings (me)
+    ---Purpose: Returns true if at least one named string value is kept.
+    returns Boolean from Standard; 
+     
+    HasBytes (me)
+    ---Purpose: Returns true if at least one named byte value is kept.
+    returns Boolean from Standard; 
+     
+    HasArraysOfIntegers (me)
+    ---Purpose: Returns true if at least one named array of integer values is kept.
+    returns Boolean from Standard; 
+     
+    HasArraysOfReals (me)
+    ---Purpose: Returns true if at least one named array of real values is kept.
+    returns Boolean from Standard;
+     
+fields
+ 
+    myDimensions     :  HArray2OfInteger  from  PColStd; 
+    
+    myIntKeys        :  HArray1OfExtendedString from PColStd;  
+    myIntValues      :  HArray1OfInteger from PColStd;   
+    
+    myRealKeys       :  HArray1OfExtendedString from PColStd;  
+    myRealValues     :  HArray1OfReal from PColStd;    
+    
+    myStrKeys        :  HArray1OfExtendedString from PColStd; 
+    myStrValues      :  HArray1OfExtendedString from PColStd; 
+     
+    myByteKeys       :  HArray1OfExtendedString from PColStd;   
+    myByteValues     :  HArray1OfByte from PDataStd;    
+     
+    myArrIntKeys     :  HArray1OfExtendedString from PColStd;  
+    myArrIntValues   :  HArray1OfHArray1OfInteger from PDataStd; 
+     
+    myArrRealKeys    :  HArray1OfExtendedString from PColStd;  
+    myArrRealValues  :  HArray1OfHArray1OfReal from PDataStd;  
+    
+end NamedData;

src/PDataStd/PDataStd_NamedData.cxx

@@ -0,0 +1,396 @@
+// File:	PDataStd_NamedData.cxx
+// Created:	Wed Jun 27 12:16:21 2007
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CASCADE SA 2007
+
+#include <PDataStd_NamedData.ixx>
+#define ROW_NUMBER 6
+//=======================================================================
+//function : PDataStd_NamedData
+//purpose  : 
+//=======================================================================
+PDataStd_NamedData::PDataStd_NamedData() { }
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+void PDataStd_NamedData::Init(const Handle(TColStd_HArray2OfInteger)& theDim)
+{
+  if(theDim.IsNull()) return;
+  if(theDim->RowLength() > 0 && (theDim->UpperRow() - theDim->LowerRow() + 1) == ROW_NUMBER ) {
+    myDimensions = new PColStd_HArray2OfInteger(theDim->LowerRow(),theDim->UpperRow(),theDim->LowerCol(),theDim->UpperCol(), 0);
+    Standard_Integer i, j = theDim->LowerCol();
+
+    for(i = theDim->LowerRow();i<=theDim->UpperRow(); i++) {
+      myDimensions->SetValue(i,j, theDim->Value(i,j));
+      myDimensions->SetValue(i,j+1, theDim->Value(i,j+1));
+    }
+  
+    i = theDim->LowerRow();
+    //1.Integers
+    Standard_Integer aSize = theDim->Value(i,j+1) - theDim->Value(i,j);
+    if(aSize>=0 && (theDim->Value(i,j) | theDim->Value(i,j+1))) {
+      myIntKeys = new  PColStd_HArray1OfExtendedString (theDim->Value(i,j), theDim->Value(i,j+1));
+      myIntValues = new PColStd_HArray1OfInteger(theDim->Value(i,j), theDim->Value(i,j+1));
+    }
+    //2.Reals
+    i++;
+    aSize = theDim->Value(i,j+1) - theDim->Value(i,j);
+    if(aSize>=0 && (theDim->Value(i,j) | theDim->Value(i,j+1))) {
+      myRealKeys = new  PColStd_HArray1OfExtendedString (theDim->Value(i,j), theDim->Value(i,j+1));
+      myRealValues = new PColStd_HArray1OfReal(theDim->Value(i,j), theDim->Value(i,j+1));
+    }
+    //3.Strings
+    i++;
+    aSize = theDim->Value(i,j+1) - theDim->Value(i,j);
+    if(aSize>=0 && (theDim->Value(i,j) | theDim->Value(i,j+1))) {
+      myStrKeys   = new PColStd_HArray1OfExtendedString (theDim->Value(i,j), theDim->Value(i,j+1));
+      myStrValues = new PColStd_HArray1OfExtendedString (theDim->Value(i,j), theDim->Value(i,j+1));
+    }
+
+    //4.Bytes
+    i++;
+    aSize = theDim->Value(i,j+1) - theDim->Value(i,j);
+    if(aSize>=0 && (theDim->Value(i,j) | theDim->Value(i,j+1))) {
+      myByteKeys   = new PColStd_HArray1OfExtendedString (theDim->Value(i,j), theDim->Value(i,j+1));
+      myByteValues = new PDataStd_HArray1OfByte(theDim->Value(i,j), theDim->Value(i,j+1));
+    }
+
+    //5.ArraysOfIntegers
+    i++;
+    aSize = theDim->Value(i,j+1) - theDim->Value(i,j);
+    if(aSize>=0 && (theDim->Value(i,j) | theDim->Value(i,j+1))) {
+      myArrIntKeys   = new PColStd_HArray1OfExtendedString (theDim->Value(i,j), theDim->Value(i,j+1));
+      myArrIntValues = new PDataStd_HArray1OfHArray1OfInteger(theDim->Value(i,j), theDim->Value(i,j+1));
+    }
+
+    //6.
+    i++;
+    aSize = theDim->Value(i,j+1) - theDim->Value(i,j);
+    if(aSize>=0 && (theDim->Value(i,j) | theDim->Value(i,j+1))) {
+      myArrRealKeys   = new PColStd_HArray1OfExtendedString (theDim->Value(i,j), theDim->Value(i,j+1));
+      myArrRealValues = new PDataStd_HArray1OfHArray1OfReal(theDim->Value(i,j), theDim->Value(i,j+1));
+    }
+
+  }
+}
+
+//=======================================================================
+//function : LowerI
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::LowerI() const
+{
+  return myDimensions->Value(myDimensions->LowerRow(),myDimensions->LowerCol());
+}
+
+//=======================================================================
+//function : UpperI
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::UpperI() const
+{
+  return myDimensions->Value(myDimensions->LowerRow(),myDimensions->UpperCol());
+}
+
+//=======================================================================
+//function : LowerR
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::LowerR() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+1,myDimensions->LowerCol());
+}
+
+//=======================================================================
+//function : UpperR
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::UpperR() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+1,myDimensions->UpperCol());
+}
+
+//=======================================================================
+//function : LowerS
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::LowerS() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+2,myDimensions->LowerCol());
+}
+
+//=======================================================================
+//function : UpperS
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::UpperS() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+2,myDimensions->UpperCol());
+}
+
+//=======================================================================
+//function : LowerB
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::LowerB() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+3,myDimensions->LowerCol());
+}
+
+//=======================================================================
+//function : UpperB
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::UpperB() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+3,myDimensions->UpperCol());
+}
+
+//=======================================================================
+//function : LowerAI
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::LowerAI() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+4,myDimensions->LowerCol());
+}
+
+//=======================================================================
+//function : UpperAI
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::UpperAI() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+4,myDimensions->UpperCol());
+}
+
+//=======================================================================
+//function : LowerAR
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::LowerAR() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+5,myDimensions->LowerCol());
+}
+
+//=======================================================================
+//function : UpperAR
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::UpperAR() const
+{
+  return myDimensions->Value(myDimensions->LowerRow()+5,myDimensions->UpperCol());
+}
+
+
+//=======================================================================
+//function : SetIntDataItem
+//purpose  : 
+//=======================================================================
+void PDataStd_NamedData::SetIntDataItem(const Standard_Integer index, 
+					const Handle(PCollection_HExtendedString)& key,
+					const Standard_Integer value)
+{
+  if(myIntKeys.IsNull() || myIntValues.IsNull()) return;
+  myIntKeys->SetValue(index, key);
+  myIntValues->SetValue(index, value);
+}
+
+//=======================================================================
+//function : IntDataItemValue
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_NamedData::IntDataItemValue(const Standard_Integer index, 
+						      Handle(PCollection_HExtendedString)& key) const
+{
+  if(myIntKeys.IsNull() || myIntValues.IsNull()) return 0;
+  key = myIntKeys->Value(index);
+  return myIntValues->Value(index);
+}
+
+//=======================================================================
+//function : SetRealDataItem
+//purpose  : 
+//=======================================================================
+void PDataStd_NamedData::SetRealDataItem(const Standard_Integer index, 
+					const Handle(PCollection_HExtendedString)& key,
+					const Standard_Real value)
+{
+  if(myRealKeys.IsNull() || myRealValues.IsNull()) return;
+  myRealKeys->SetValue(index, key);
+  myRealValues->SetValue(index, value);
+}
+
+//=======================================================================
+//function : RealDataItemValue
+//purpose  : 
+//=======================================================================
+Standard_Real PDataStd_NamedData::RealDataItemValue(const Standard_Integer index, 
+						      Handle(PCollection_HExtendedString)& key) const
+{
+  if(myRealKeys.IsNull() || myRealValues.IsNull()) return 0.;
+  key = myRealKeys->Value(index);
+  return myRealValues->Value(index);
+}
+
+//=======================================================================
+//function : SetStrDataItem
+//purpose  : 
+//=======================================================================
+void PDataStd_NamedData::SetStrDataItem(const Standard_Integer index, 
+					const Handle(PCollection_HExtendedString)& key,
+					const Handle(PCollection_HExtendedString)& value)
+{
+  if(myStrKeys.IsNull() || myStrValues.IsNull()) return;
+  myStrKeys->SetValue(index, key);
+  myStrValues->SetValue(index, value);
+}
+
+//=======================================================================
+//function : StrDataItemValue
+//purpose  : 
+//=======================================================================
+Handle(PCollection_HExtendedString) PDataStd_NamedData::StrDataItemValue
+                                           (const Standard_Integer index, 
+ 	                  Handle(PCollection_HExtendedString)& key) const
+{
+  Handle(PCollection_HExtendedString) aVal;
+  if(myStrKeys.IsNull() || myStrValues.IsNull()) return aVal;
+  key = myStrKeys->Value(index);
+  return myStrValues->Value(index);
+}
+
+//=======================================================================
+//function : SetByteDataItem
+//purpose  : 
+//=======================================================================
+void PDataStd_NamedData::SetByteDataItem(const Standard_Integer index, 
+					const Handle(PCollection_HExtendedString)& key,
+					const Standard_Byte value)
+{
+  if(myByteKeys.IsNull() || myByteValues.IsNull()) return;
+  myByteKeys->SetValue(index, key);
+  myByteValues->SetValue(index, value);
+}
+
+//=======================================================================
+//function : ByteDataItemValue
+//purpose  : 
+//=======================================================================
+Standard_Byte PDataStd_NamedData::ByteDataItemValue(const Standard_Integer index, 
+						    Handle(PCollection_HExtendedString)& key) const
+{
+  if(myByteKeys.IsNull() || myByteValues.IsNull()) return 0x00;
+  key = myByteKeys->Value(index);
+  return myByteValues->Value(index);
+}
+
+//=======================================================================
+//function : SetArrIntDataItem
+//purpose  : 
+//=======================================================================
+void PDataStd_NamedData::SetArrIntDataItem(const Standard_Integer index, 
+					   const Handle(PCollection_HExtendedString)& key,
+					   const Handle(PColStd_HArray1OfInteger)& value)
+{
+  if(myArrIntKeys.IsNull() || myArrIntValues.IsNull()) return;
+  myArrIntKeys->SetValue(index, key);
+  myArrIntValues->SetValue(index, value);
+}
+
+//=======================================================================
+//function : ArrIntDataItemValue
+//purpose  : 
+//=======================================================================
+Handle(PColStd_HArray1OfInteger) PDataStd_NamedData::ArrIntDataItemValue
+                                           (const Standard_Integer index, 
+ 	                  Handle(PCollection_HExtendedString)& key) const
+{
+  Handle(PColStd_HArray1OfInteger) aVal;
+  if(myArrIntKeys.IsNull() || myArrIntValues.IsNull()) return aVal;
+  key = myArrIntKeys->Value(index);
+  return myArrIntValues->Value(index);
+}
+
+//=======================================================================
+//function : SetArrRealDataItem
+//purpose  : 
+//=======================================================================
+void PDataStd_NamedData::SetArrRealDataItem(const Standard_Integer index, 
+					   const Handle(PCollection_HExtendedString)& key,
+					   const Handle(PColStd_HArray1OfReal)& value)
+{
+  if(myArrRealKeys.IsNull() || myArrRealValues.IsNull()) return;
+  myArrRealKeys->SetValue(index, key);
+  myArrRealValues->SetValue(index, value);
+}
+
+//=======================================================================
+//function : ArrRealDataItemValue
+//purpose  : 
+//=======================================================================
+Handle(PColStd_HArray1OfReal) PDataStd_NamedData::ArrRealDataItemValue
+                                           (const Standard_Integer index, 
+ 	                  Handle(PCollection_HExtendedString)& key) const
+{
+  Handle(PColStd_HArray1OfReal) aVal;
+  if(myArrRealKeys.IsNull() || myArrRealValues.IsNull()) return aVal;
+  key = myArrRealKeys->Value(index);
+  return myArrRealValues->Value(index);
+}
+
+//=======================================================================
+//function : HasIntegers
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_NamedData::HasIntegers() const
+{
+  return !myIntKeys.IsNull();
+}
+//=======================================================================
+//function : HasReals
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_NamedData::HasReals() const
+{
+  return !myRealKeys.IsNull();
+}
+
+//=======================================================================
+//function : HasStrings
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_NamedData::HasStrings() const
+{
+  return !myStrKeys.IsNull();
+}
+
+//=======================================================================
+//function : HasBytes
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_NamedData::HasBytes() const
+{
+  return !myByteKeys.IsNull();
+}
+
+//=======================================================================
+//function : HasArraysOfIntegers
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_NamedData::HasArraysOfIntegers() const
+{
+  return !myArrIntKeys.IsNull();
+}
+
+//=======================================================================
+//function : HasArraysOfReals
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_NamedData::HasArraysOfReals() const
+{
+  return !myArrRealKeys.IsNull();
+}

src/PDataStd/PDataStd_NoteBook.cdl

@@ -0,0 +1,15 @@
+-- File:	PDataStd_NoteBook.cdl
+-- Created:	Tue Jul 29 13:59:31 1997
+-- Author:	Denis PASCAL
+---Copyright:	 Matra Datavision 1997
+
+
+
+class NoteBook from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+is
+
+    Create returns mutable NoteBook from  PDataStd;
+
+end NoteBook;

src/PDataStd/PDataStd_NoteBook.cxx

@@ -0,0 +1,4 @@
+#include <PDataStd_NoteBook.ixx>
+
+PDataStd_NoteBook::PDataStd_NoteBook() {}
+

src/PDataStd/PDataStd_Real.cdl

@@ -0,0 +1,36 @@
+-- File:	PDataStd_Real.cdl
+-- Created:	Wed Apr  9 11:41:53 1997
+-- Author:	VAUTHIER Jean-Claude
+---Copyright:	 Matra Datavision 1997
+
+
+class Real from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+
+uses Real from Standard
+
+is
+
+    Create returns mutable Real from PDataStd;
+
+    
+    Create (Value     : Real from Standard;
+            Dimension : Integer from Standard)
+    returns mutable Real from PDataStd;
+    
+    Get (me) returns Real from Standard;
+
+    Set (me : mutable; V : Real from Standard);
+    
+    SetDimension (me : mutable; DIM : Integer from Standard);
+    
+    GetDimension (me)
+    returns Integer from Standard;
+
+fields
+
+    myValue     : Real    from Standard;
+    myDimension : Integer from Standard;
+
+end Real;

src/PDataStd/PDataStd_Real.cxx

@@ -0,0 +1,70 @@
+// File:	PDataStd_Real.cxx
+// Created:	Wed Apr  9 13:24:14 1997
+// Author:	VAUTHIER Jean-Claude
+
+#include <PDataStd_Real.ixx>
+
+
+//=======================================================================
+//function : PDataStd_Real
+//purpose  : 
+//=======================================================================
+
+PDataStd_Real::PDataStd_Real () { }
+
+
+
+//=======================================================================
+//function : PDataStd_Real
+//purpose  : 
+//=======================================================================
+
+PDataStd_Real::PDataStd_Real (const Standard_Real V, 
+			      const Standard_Integer D) : myValue (V), myDimension(D) { }
+
+
+//=======================================================================
+//function : Set
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Real::Set (const Standard_Real V) 
+{
+  myValue = V;
+}
+
+
+
+//=======================================================================
+//function : Get
+//purpose  : 
+//=======================================================================
+
+Standard_Real PDataStd_Real::Get () const
+{
+  return myValue;
+}
+
+//=======================================================================
+//function : SetDimension
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Real::SetDimension (const Standard_Integer D)
+{
+  myDimension = D;
+}
+
+
+
+//=======================================================================
+//function : GetDimension
+//purpose  : 
+//=======================================================================
+
+Standard_Integer PDataStd_Real::GetDimension () const
+{
+  return myDimension;
+}
+
+

src/PDataStd/PDataStd_RealArray.cdl

@@ -0,0 +1,30 @@
+-- File:	PDataStd_RealArray.cdl
+-- Created:	Fri Jun 11 11:41:53 1999
+-- Author:	Sergey RUIN
+---Copyright:	Matra Datavision 1999
+
+
+class RealArray from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+
+uses HArray1OfReal from PColStd
+     
+     
+is
+
+    Create returns mutable RealArray from PDataStd;
+
+    Init(me : mutable; lower, upper : Integer from Standard);
+
+    SetValue(me: mutable; Index : Integer from Standard; Value : Real from Standard);
+    
+    Value(me;  Index : Integer from Standard) returns Real  from Standard;
+   
+    Lower (me) returns Integer from Standard;      
+
+    Upper (me) returns Integer from Standard;   
+     
+fields
+    myValue     :  HArray1OfReal from PColStd;
+end RealArray;

src/PDataStd/PDataStd_RealArray.cxx

@@ -0,0 +1,59 @@
+// File:	PDataStd_RealArray.cxx
+// Created:	Tue Jun  15 13:24:14 1999
+// Author:	Sergey RUIN
+//Copyright:	Matra Datavision 1999
+#include <PDataStd_RealArray.ixx>
+
+//=======================================================================
+//function : PDataStd_RealArray
+//purpose  : 
+//=======================================================================
+
+PDataStd_RealArray::PDataStd_RealArray () { }
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+
+void PDataStd_RealArray::Init(const Standard_Integer lower,
+			    const Standard_Integer upper)
+{
+  myValue = new PColStd_HArray1OfReal(lower, upper);
+}
+
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+
+void PDataStd_RealArray::SetValue(const Standard_Integer index, const Standard_Real value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+
+Standard_Real PDataStd_RealArray::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_RealArray::Lower (void) const 
+{ return myValue->Lower(); }
+
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_RealArray::Upper (void) const 
+{ return myValue->Upper(); }

src/PDataStd/PDataStd_RealArray_1.cdl

@@ -0,0 +1,36 @@
+-- File:	PDataStd_RealArray_1.cdl
+-- Created:	Wed Mar 26 18:28:54 2008
+-- Author:	Sergey ZARITCHNY
+--		<sergey.zaritchny@opencascade.com>
+---Copyright:	Open CasCade SA 2008
+
+
+class RealArray_1 from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistence
+
+uses HArray1OfReal from PColStd
+     
+     
+is
+
+    Create returns mutable RealArray_1 from PDataStd;
+
+    Init(me : mutable; lower, upper : Integer from Standard);
+
+    SetValue(me: mutable; Index : Integer from Standard; Value : Real from Standard);
+    
+    Value(me;  Index : Integer from Standard) returns Real  from Standard;
+   
+    Lower (me) returns Integer from Standard;      
+
+    Upper (me) returns Integer from Standard; 
+     
+    SetDelta(me : mutable; delta : Boolean from Standard); 
+     
+    GetDelta(me) returns Boolean from Standard;      
+    
+fields
+    myValue  :  HArray1OfReal from PColStd;
+    myDelta  : Boolean from Standard;
+end RealArray_1;

src/PDataStd/PDataStd_RealArray_1.cxx

@@ -0,0 +1,79 @@
+// File:	PDataStd_RealArray_1.cxx
+// Created:	Wed Mar 26 18:31:09 2008
+// Author:	Sergey ZARITCHNY
+//		<sergey.zaritchny@opencascade.com>
+// Copyright:   Open CasCade SA 2008
+
+#include <PDataStd_RealArray_1.ixx>
+
+//=======================================================================
+//function : PDataStd_RealArray_1
+//purpose  : 
+//=======================================================================
+
+PDataStd_RealArray_1::PDataStd_RealArray_1 () { }
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+
+void PDataStd_RealArray_1::Init(const Standard_Integer lower,
+			    const Standard_Integer upper)
+{
+  myValue = new PColStd_HArray1OfReal(lower, upper);
+}
+
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+
+void PDataStd_RealArray_1::SetValue(const Standard_Integer index, const Standard_Real value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+
+Standard_Real PDataStd_RealArray_1::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_RealArray_1::Lower (void) const 
+{ return myValue->Lower(); }
+
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_RealArray_1::Upper (void) const 
+{ return myValue->Upper(); }
+
+//=======================================================================
+//function : SetDelta
+//purpose  : 
+//=======================================================================
+void PDataStd_RealArray_1::SetDelta(const Standard_Boolean delta)
+{
+  myDelta = delta;
+}
+
+//=======================================================================
+//function : GetDelta
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_RealArray_1::GetDelta() const
+{
+  return myDelta;
+}

src/PDataStd/PDataStd_RealList.cdl

@@ -0,0 +1,41 @@
+-- File:        PDataStd_RealList.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class RealList from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HArray1OfReal from PColStd
+
+is
+
+    Create 
+    returns mutable RealList from PDataStd;
+
+    Init (me : mutable; 
+    	  lower, upper : Integer from Standard);
+
+    SetValue (me: mutable; 
+    	      index : Integer from Standard; 
+    	      value : Real from Standard);
+
+    Value (me;  
+    	   index : Integer from Standard) 
+    returns Real from Standard;
+
+    Lower (me) 
+    returns Integer from Standard;      
+
+    Upper (me) 
+    returns Integer from Standard;   
+
+
+fields
+
+    myValue     :  HArray1OfReal from PColStd;
+
+
+end RealList;

src/PDataStd/PDataStd_RealList.cxx

@@ -0,0 +1,67 @@
+// File:        PDataStd_RealList.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_RealList.ixx>
+
+//=======================================================================
+//function : PDataStd_RealList
+//purpose  : 
+//=======================================================================
+PDataStd_RealList::PDataStd_RealList() 
+{ 
+
+}
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+void PDataStd_RealList::Init(const Standard_Integer lower,
+			     const Standard_Integer upper)
+{
+  if (upper >= lower)
+    myValue = new PColStd_HArray1OfReal(lower, upper);
+}
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_RealList::SetValue(const Standard_Integer index, const Standard_Real value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+Standard_Real PDataStd_RealList::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_RealList::Lower (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Lower(); 
+  return 0;
+}
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_RealList::Upper (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Upper(); 
+  return -1;
+}

src/PDataStd/PDataStd_ReferenceArray.cdl

@@ -0,0 +1,42 @@
+-- File:        PDataStd_ReferenceArray.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class ReferenceArray from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HExtendedString from PCollection,
+    HArray1OfExtendedString from PColStd
+
+is
+
+    Create 
+    returns mutable ReferenceArray from PDataStd;
+
+    Init (me : mutable; 
+    	  lower, upper : Integer from Standard);
+
+    SetValue (me: mutable; 
+    	      index : Integer from Standard; 
+    	      value : HExtendedString from PCollection);
+
+    Value (me;  
+    	   index : Integer from Standard) 
+    returns HExtendedString from PCollection;
+
+    Lower (me) 
+    returns Integer from Standard;      
+
+    Upper (me) 
+    returns Integer from Standard;   
+
+
+fields
+
+    myValue     :  HArray1OfExtendedString from PColStd;
+
+
+end ReferenceArray;

src/PDataStd/PDataStd_ReferenceArray.cxx

@@ -0,0 +1,67 @@
+// File:        PDataStd_ReferenceArray.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_ReferenceArray.ixx>
+
+//=======================================================================
+//function : PDataStd_ReferenceArray
+//purpose  : 
+//=======================================================================
+PDataStd_ReferenceArray::PDataStd_ReferenceArray() 
+{ 
+
+}
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+void PDataStd_ReferenceArray::Init(const Standard_Integer lower,
+				   const Standard_Integer upper)
+{
+  if (upper >= lower)
+    myValue = new PColStd_HArray1OfExtendedString(lower, upper);
+}
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_ReferenceArray::SetValue(const Standard_Integer index, const Handle(PCollection_HExtendedString)& value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+Handle(PCollection_HExtendedString) PDataStd_ReferenceArray::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ReferenceArray::Lower (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Lower(); 
+  return 0;
+}
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ReferenceArray::Upper (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Upper(); 
+  return -1;
+}

src/PDataStd/PDataStd_ReferenceList.cdl

@@ -0,0 +1,42 @@
+-- File:        PDataStd_ReferenceList.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class ReferenceList from PDataStd inherits Attribute from PDF
+
+uses 
+
+    HExtendedString from PCollection,
+    HArray1OfExtendedString from PColStd
+
+is
+
+    Create 
+    returns mutable ReferenceList from PDataStd;
+
+    Init (me : mutable; 
+    	  lower, upper : Integer from Standard);
+
+    SetValue (me: mutable; 
+    	      index : Integer from Standard; 
+    	      value : HExtendedString from PCollection);
+
+    Value (me;  
+    	   index : Integer from Standard) 
+    returns HExtendedString from PCollection;
+
+    Lower (me) 
+    returns Integer from Standard;      
+
+    Upper (me) 
+    returns Integer from Standard;   
+
+
+fields
+
+    myValue     :  HArray1OfExtendedString from PColStd;
+
+
+end ReferenceList;

src/PDataStd/PDataStd_ReferenceList.cxx

@@ -0,0 +1,67 @@
+// File:        PDataStd_ReferenceList.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_ReferenceList.ixx>
+
+//=======================================================================
+//function : PDataStd_ReferenceList
+//purpose  : 
+//=======================================================================
+PDataStd_ReferenceList::PDataStd_ReferenceList() 
+{ 
+
+}
+
+//=======================================================================
+//function : Init
+//purpose  : 
+//=======================================================================
+void PDataStd_ReferenceList::Init(const Standard_Integer lower,
+				  const Standard_Integer upper)
+{
+  if (upper >= lower)
+    myValue = new PColStd_HArray1OfExtendedString(lower, upper);
+}
+
+//=======================================================================
+//function : SetValue
+//purpose  : 
+//=======================================================================
+void PDataStd_ReferenceList::SetValue(const Standard_Integer index, const Handle(PCollection_HExtendedString)& value)
+{
+  myValue->SetValue(index, value);
+}
+
+//=======================================================================
+//function : Value
+//purpose  : 
+//=======================================================================
+Handle(PCollection_HExtendedString) PDataStd_ReferenceList::Value( const Standard_Integer index ) const
+{
+  return myValue->Value(index);
+}
+
+//=======================================================================
+//function : Lower
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ReferenceList::Lower (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Lower(); 
+  return 0;
+}
+
+//=======================================================================
+//function : Upper
+//purpose  : 
+//=======================================================================
+Standard_Integer PDataStd_ReferenceList::Upper (void) const 
+{ 
+  if (!myValue.IsNull())
+    return myValue->Upper(); 
+  return -1;
+}

src/PDataStd/PDataStd_Relation.cdl

@@ -0,0 +1,33 @@
+-- File:	PDataStd_Relation.cdl
+-- Created:	Thu Jul 31 10:29:12 1997
+-- Author:	Denis PASCAL
+---Copyright:	 Matra Datavision 1997
+
+
+
+class Relation from PDataStd inherits Attribute from PDF
+
+uses HExtendedString  from PCollection,
+     HAttributeArray1 from PDF 
+
+is
+
+    Create returns mutable Relation from  PDataStd;
+    
+    Create (name : HExtendedString from PCollection) 
+    returns mutable Relation from PDataStd;
+    
+    GetName (me) returns HExtendedString from PCollection;
+    
+    SetName (me : mutable; vars : HExtendedString from PCollection);
+
+    GetVariables (me) returns HAttributeArray1 from PDF;
+    
+    SetVariables (me : mutable; vars : HAttributeArray1 from PDF);
+    
+fields
+
+    myName      : HExtendedString from PCollection;    
+    myVariables : HAttributeArray1 from PDF;
+
+end Relation;

src/PDataStd/PDataStd_Relation.cxx

@@ -0,0 +1,67 @@
+// File:	PDataStd_Relation.cxx
+// Created:	Wed Dec 10 11:26:08 1997
+// Author:	Denis PASCAL
+//		<dp@dingox.paris1.matra-dtv.fr>
+
+#include <PDataStd_Relation.ixx>
+
+//=======================================================================
+//function : PDataStd_Relation
+//purpose  : 
+//=======================================================================
+
+PDataStd_Relation::PDataStd_Relation()
+{
+}
+
+//=======================================================================
+//function : PDataStd_Relation
+//purpose  : 
+//=======================================================================
+
+PDataStd_Relation::PDataStd_Relation(const Handle(PCollection_HExtendedString)& name)
+{
+  SetName(name);
+}
+
+//=======================================================================
+//function : GetName
+//purpose  : 
+//=======================================================================
+
+Handle(PCollection_HExtendedString) PDataStd_Relation::GetName() const
+{
+  return myName;
+}
+
+//=======================================================================
+//function : SetName
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Relation::SetName(const Handle(PCollection_HExtendedString)& name)
+{
+  myName = name;
+}
+
+
+//=======================================================================
+//function : GetVariables
+//purpose  : 
+//=======================================================================
+
+Handle(PDF_HAttributeArray1) PDataStd_Relation::GetVariables() const
+{ 
+  return myVariables; 
+}
+
+
+//=======================================================================
+//function : SetVariables
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Relation::SetVariables(const Handle(PDF_HAttributeArray1)& vars) 
+{ 
+  myVariables = vars; 
+}

src/PDataStd/PDataStd_Tick.cdl

@@ -0,0 +1,14 @@
+-- File:        PDataStd_Tick.cdl
+-- Created:     May 29 11:40:00 2007
+-- Author:      Vlad Romashko
+--  	    	<vladislav.romashko@opencascade.com>
+-- Copyright:   Open CASCADE
+
+class Tick from PDataStd inherits Attribute from PDF
+
+is
+
+    Create 
+    returns mutable Tick from  PDataStd;
+
+end Tick;

src/PDataStd/PDataStd_Tick.cxx

@@ -0,0 +1,12 @@
+// File:        PDataStd_Tick.cxx
+// Created:     May 29 11:40:00 2007
+// Author:      Vlad Romashko
+//  	    	<vladislav.romashko@opencascade.com>
+// Copyright:   Open CASCADE
+
+#include <PDataStd_Tick.ixx>
+
+PDataStd_Tick::PDataStd_Tick() 
+{
+
+}

src/PDataStd/PDataStd_TreeNode.cdl

@@ -0,0 +1,37 @@
+-- File:	PDataStd_TreeNode.cdl
+-- Created:	Thu Jun 17 10:56:43 1999
+-- Author:	Vladislav ROMASHKO
+--		<vro@flox.nnov.matra-dtv.fr>
+---Copyright:	 Matra Datavision 1999
+
+class TreeNode from PDataStd inherits Attribute from PDF 
+
+uses 
+     
+    Attribute from PDF, 
+    GUID      from Standard 
+
+is
+
+    Create returns mutable TreeNode from PDataStd;
+        
+    First(me) returns TreeNode from PDataStd;
+	 
+    SetFirst(me : mutable; F : TreeNode from PDataStd);    
+    
+    Next(me) returns TreeNode from PDataStd;
+        
+    SetNext(me : mutable; F : TreeNode from PDataStd);    
+    
+    SetTreeID(me : mutable; GUID : GUID from Standard);
+
+    GetTreeID(me) returns GUID from Standard;
+
+fields
+
+    myFirst  : TreeNode from PDataStd;  
+    myNext   : TreeNode from PDataStd;  
+    myTreeID : GUID     from Standard;
+
+end TreeNode;
+ 

src/PDataStd/PDataStd_TreeNode.cxx

@@ -0,0 +1,41 @@
+// File:	PDataStd_TreeNode.cxx
+// Created:	Thu Jun 17 11:03:48 1999
+// Author:	Vladislav ROMASHKO
+//		<vro@flox.nnov.matra-dtv.fr>
+
+
+#include <PDataStd_TreeNode.ixx>
+#include <Standard_GUID.hxx>
+
+PDataStd_TreeNode::PDataStd_TreeNode()
+{}
+
+Handle(PDataStd_TreeNode) PDataStd_TreeNode::First() const
+{
+  return myFirst;
+}
+
+void PDataStd_TreeNode::SetFirst(const Handle(PDataStd_TreeNode)& F)
+{
+  myFirst = F;
+}
+
+Handle(PDataStd_TreeNode) PDataStd_TreeNode::Next() const
+{
+  return myNext;
+}
+
+void PDataStd_TreeNode::SetNext(const Handle(PDataStd_TreeNode)& F )
+{
+  myNext = F;
+}
+
+void PDataStd_TreeNode::SetTreeID(const Standard_GUID& ID)
+{
+  myTreeID = ID;
+}
+
+Standard_GUID PDataStd_TreeNode::GetTreeID() const
+{
+  return myTreeID;
+}

src/PDataStd/PDataStd_UAttribute.cdl

@@ -0,0 +1,25 @@
+-- File:	PDataStd_UAttribute.cdl
+-- Created:	Fri Jun 11 11:41:53 1999
+-- Author:	Sergey RUIN
+---Copyright:	 Matra Datavision 1999
+
+
+class UAttribute from PDataStd inherits Attribute from PDF
+
+	---Purpose: 
+
+uses HExtendedString from PCollection
+     
+is
+
+    Create returns mutable UAttribute from PDataStd;
+
+    SetID(me: mutable; guid: HExtendedString from PCollection );
+    
+    GetID(me) returns HExtendedString from PCollection;
+    
+fields
+
+    myID     :  HExtendedString from PCollection;
+    
+end UAttribute;

src/PDataStd/PDataStd_UAttribute.cxx

@@ -0,0 +1,34 @@
+// File:	PDataStd_UAttribute.cxx
+// Created:	Tue Jun  15 13:24:14 1999
+// Author:	Sergey RUIN
+
+#include <PDataStd_UAttribute.ixx>
+#include <PCollection_HExtendedString.hxx>
+
+//=======================================================================
+//function : PDataStd_UAttribute
+//purpose  : 
+//=======================================================================
+
+PDataStd_UAttribute::PDataStd_UAttribute () { }
+
+
+//=======================================================================
+//function : SetID
+//purpose  : 
+//=======================================================================
+
+void PDataStd_UAttribute::SetID( const Handle(PCollection_HExtendedString)&  guid)
+{
+  myID = guid;
+}
+
+//=======================================================================
+//function : GetLocalID
+//purpose  : 
+//=======================================================================
+
+Handle(PCollection_HExtendedString) PDataStd_UAttribute::GetID( void ) const
+{
+  return myID;
+}

src/PDataStd/PDataStd_Variable.cdl

@@ -0,0 +1,35 @@
+-- File:	PDataStd_Variable.cdl
+-- Created:	Wed Dec 10 10:37:50 1997
+-- Author:	Denis PASCAL
+--		<dp@dingox.paris1.matra-dtv.fr>
+---Copyright:	 Matra Datavision 1997
+
+
+class Variable from PDataStd inherits Attribute from PDF
+
+	---Purpose: Persistant variable
+	--          ===================
+
+uses HAsciiString from PCollection
+is
+
+    Create returns mutable Variable from PDataStd;
+
+    
+    Create (constant : Boolean from Standard)
+    returns mutable Variable from PDataStd;
+    
+    Constant (me : mutable; status : Boolean from Standard);    
+    Constant (me)
+    returns Boolean from Standard;
+
+    Unit(me:mutable; unit : HAsciiString from PCollection);
+    Unit(me) 
+    returns HAsciiString from PCollection;
+
+fields
+
+    isConstant : Boolean      from Standard;
+    myUnit     : HAsciiString from PCollection;
+
+end Variable;

src/PDataStd/PDataStd_Variable.cxx

@@ -0,0 +1,60 @@
+// File:	PDataStd_Variable.cxx
+// Created:	Wed Dec 10 11:26:08 1997
+// Author:	Denis PASCAL
+//		<dp@dingox.paris1.matra-dtv.fr>
+
+#include <PDataStd_Variable.ixx>
+
+//=======================================================================
+//function : PDataStd_Variable
+//purpose  : 
+//=======================================================================
+
+PDataStd_Variable::PDataStd_Variable()
+{
+}
+
+//=======================================================================
+//function : PDataStd_Variable
+//purpose  : 
+//=======================================================================
+
+PDataStd_Variable::PDataStd_Variable(const Standard_Boolean constant)
+{
+  Constant(constant);
+}
+
+//=======================================================================
+//function : Constant
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Variable::Constant(const Standard_Boolean status) 
+{
+  isConstant = status;
+}
+//=======================================================================
+//function : Constant
+//purpose  : 
+//=======================================================================
+Standard_Boolean PDataStd_Variable::Constant() const
+{
+  return isConstant;
+}
+//=======================================================================
+//function : Unit
+//purpose  : 
+//=======================================================================
+
+void PDataStd_Variable::Unit(const Handle(PCollection_HAsciiString)& unit) 
+{
+  myUnit = unit;
+}
+//=======================================================================
+//function : Unit
+//purpose  : 
+//=======================================================================
+Handle(PCollection_HAsciiString) PDataStd_Variable::Unit() const
+{
+  return myUnit;
+}