#include <IGESData_DirPart.ixx>
#include <Standard_PCharacter.hxx>



    IGESData_DirPart::IGESData_DirPart ()  {  }

    void IGESData_DirPart::Init
      (const Standard_Integer  i1, const Standard_Integer i2, const Standard_Integer i3, const Standard_Integer i4,
       const Standard_Integer  i5, const Standard_Integer i6, const Standard_Integer i7, const Standard_Integer i8,
       const Standard_Integer  i9, const Standard_Integer i10, const Standard_Integer i11,
       const Standard_Integer i12, const Standard_Integer i13, const Standard_Integer i14,
       const Standard_Integer i15, const Standard_Integer i16, const Standard_Integer i17,
       const Standard_CString res1, const Standard_CString res2,
       const Standard_CString label, const Standard_CString subscript)
{
  thevals[ 0] =  i1; thevals[ 1] =  i2; thevals[ 2] =  i3; thevals[ 3] =  i4;
  thevals[ 4] =  i5; thevals[ 5] =  i6; thevals[ 6] =  i7; thevals[ 7] =  i8;
  thevals[ 8] =  i9; thevals[ 9] = i10; thevals[10] = i11; thevals[11] = i12;
  thevals[12] = i13; thevals[13] = i14; thevals[14] = i15; thevals[15] = i16;
  thevals[16] = i17;
  for (Standard_Integer i = 0; i < 8; i ++) {
    theres1[i] = res1 [i];  theres2[i] = res2[i];
    thelabl[i] = label[i];  thesubs[i] = subscript[i]; 
  }
  theres1[8] = '\0'; theres2[8] = '\0'; thelabl[8] = '\0'; thesubs[8] = '\0';
}

//   CString : on modifie leur CONTENU, pas le POINTEUR LUI-MEME

//=======================================================================
//function : Values
//purpose  : 
//=======================================================================
void IGESData_DirPart::Values (Standard_Integer&  i1, 
			       Standard_Integer&  i2, 
			       Standard_Integer&  i3, 
			       Standard_Integer&  i4, 
			       Standard_Integer&  i5,
			       Standard_Integer&  i6, 
			       Standard_Integer&  i7, 
			       Standard_Integer&  i8, 
			       Standard_Integer&  i9, 
			       Standard_Integer& i10,
			       Standard_Integer& i11, 
			       Standard_Integer& i12, 
			       Standard_Integer& i13, 
			       Standard_Integer& i14, 
			       Standard_Integer& i15,
			       Standard_Integer& i16, 
			       Standard_Integer& i17,
			       const Standard_CString res1, 
			       const Standard_CString res2, 
			       const Standard_CString label, 
			       const Standard_CString subscript) const
{
  Standard_PCharacter pres1, pres2, plabel, psubscript;
  Standard_Integer i;
  //
  pres1=(Standard_PCharacter)res1;
  pres2=(Standard_PCharacter)res2;
  plabel=(Standard_PCharacter)label;
  psubscript=(Standard_PCharacter)subscript;
  //
  i1  = thevals[ 0]; i2  = thevals[ 1]; i3  = thevals[ 2]; i4  = thevals[ 3];
  i5  = thevals[ 4]; i6  = thevals[ 5]; i7  = thevals[ 6]; i8  = thevals[ 7];
  i9  = thevals[ 8]; i10 = thevals[ 9]; i11 = thevals[10]; i12 = thevals[11];
  i13 = thevals[12]; i14 = thevals[13]; i15 = thevals[14]; i16 = thevals[15];
  i17 = thevals[16];
  for (i = 0; i < 8; ++i) {
    pres1 [i] = theres1[i]; 
    pres2     [i] = theres2[i];
    plabel[i] = thelabl[i]; 
    psubscript[i] = thesubs[i];
  }
  pres1[8] = '\0'; 
  pres2[8] = '\0'; 
  plabel[8] = '\0'; 
  psubscript[8] = '\0';
}


    IGESData_IGESType IGESData_DirPart::Type () const
      {  return IGESData_IGESType(thevals[0],thevals[16]);  }  // type & forme