class complexscalar {
 public:
    unsigned int * *cs;
    complexscalar();
};

complexscalar::complexscalar()               //constructor for complex s
  {int i;
   cs = new unsigned int *[2];
   for (i=0;i<2;i++) cs[i]=new unsigned int [zprecpad];
  } 
                        //realvectormp is a 2-dimension array of integers
class complexvector {
  public:
     unsigned int * * *cv;        
     complexvector();    //this is a default constructor (has no argument)
     ~complexvector();
};                           

complexvector::complexvector()                         //constructor
{int i,j;
 cv = new unsigned int * *[cmaxsizepad];
 for (j=0;j<cmaxsizepad;j++) 
   {cv[j] = new unsigned int *[2];
    for (i=0;i<2;i++) cv[j][i] = new unsigned int [zprecpad];
   }
}

complexvector::~complexvector()                       //destructor
  {delete[] cv;}

class complexmatrix {
  public:
     unsigned int * * * *cm;
     complexmatrix();
     ~complexmatrix();
};

complexmatrix::complexmatrix()                   //constructor
{int i,j,k;
     cm= new unsigned int * * *[cmaxsizepad];
     for (i=0;i<cmaxsizepad;i++) 
       {cm[i] = new unsigned int * *[cmaxsizepad];
        for (k=0;k<cmaxsizepad;k++)
          {cm[i][k]= new unsigned int *[2];
           for (j=0;j<2;j++) cm[i][k][j] = new unsigned int [zprecpad];
          }
       }
}

complexmatrix::~complexmatrix()                   //destructor
  {delete[] cm;}

class cpade
{public:
 complexscalar *cnum;
 complexscalar *cden;
 cpade();
};

cpade::cpade()
  {cnum=new complexscalar[cmaxsizepad];
   cden=new complexscalar[cmaxsizepad];
  }

class cpoly
{public:
  unsigned int cp;
  cpoly() {}
};

class cwpoly
{public:
  unsigned int cwp;
  cwpoly() {}
};