make_hypercube()

static hypercube make_hypercube ( unsigned  dim, const double *  center, const double *  halfwidth  )

static

{
     unsigned i;
     hypercube h;
     h.dim = dim;
     h.data = (double *) malloc(sizeof(double) * dim * 2);
     h.vol = 0;
     if (h.data) {
          for (i = 0; i < dim; ++i) {
               h.data[i] = center[i];
               h.data[i + dim] = halfwidth[i];
          }
          h.vol = compute_vol(&h);
     }
     return h;
}