datablockWriteToFile(&db, ncdcfg->output_distmat_fname);
datablockWriteToFile(db, ncdcfg->output_distmat_fname);
static void customPrintProduct(struct DataBlockEnumeration *a, struct DataBlockEnumeration *b, const char *rowBegin, const char *rowEnd, const char *elemBegin, const char *elemEnd, struct GeneralConfig *cur){#if GSL_RDY  int n1c, n2c;  struct DataBlockEnumerationIterator *dei = a->newenumiter(a);  struct StringStack *labels = stringstackNew();  struct DataBlock *curdb;  struct NCDConfig *ncdcfg = (struct NCDConfig *) cur->ptr;  gsl_matrix *gres;  while ( ( curdb = a->istar(a, dei) ) ) {    stringstackPush(labels, a->ilabel(a, dei));    a->istep(a, dei);    datablockFreePtr(curdb);  }  a->ifree(dei);  gres = getNCDMatrix(a, b, cur);  if (cur->fSVD) {    gres = svdProject(gres);  }  if (cur->fBinary) {    struct DataBlock *dbdmtagged, *dblabelstagged, *dbcommandstagged, *dbenvmap, *db;    struct EnvMap *em = envmapNew();    int i;    for (i = 0; i < envmapSize(cur->em); i += 1) {      union PCTypes p;      p = envmapKeyValAt(cur->em, i);      if (envmapIsMarkedAt(cur->em, i) && !envmapIsPrivateAt(cur->em, i) )        envmapSetKeyVal(em, p.sp.key, p.sp.val);    }    if (envmapSize(em) > 0)      dbenvmap = envmapDump(em);    dbdmtagged = distmatrixDump(gres);    assert(labels);    dblabelstagged = labelsDump(labels);    dbcommandstagged = commandsDump(cur->cmdKeeper);    db = package_DataBlocks(TAGNUM_TAGMASTER, dbdmtagged, dblabelstagged, dbcommandstagged, dbenvmap, NULL);    datablockWriteToFile(&db, ncdcfg->output_distmat_fname);    datablockFreePtr(db);    datablockFreePtr(dblabelstagged);    datablockFreePtr(dbdmtagged);  }  for (n1c = 0; n1c < gres->size1; n1c++) {    printf(rowBegin);    if (cur->fShowLabels) {      printf(elemBegin);      printf("%s", stringstackReadAt(labels, n1c));      printf(elemEnd);    }    for (n2c = 0; n2c < gres->size2; n2c++) {      printf(elemBegin);      printf("%09.9f  ", gsl_matrix_get(gres, n1c, n2c));      printf(elemEnd);    }    printf(rowEnd);  }  gsl_matrix_free(gres);	stringstackFree(labels);#else	assert ( 0 && "GSL not supported");	exit(1);#endif}