Trisurf Monte Carlo simulator
Samo Penic
2016-09-15 bbe7df469c40beb309542c01f25c262340978629
src/restore.c
@@ -165,6 +165,16 @@
       if ((!xmlStrcmp(child->name, (const xmlChar *)"tristar"))){
         parseTrisurfTristar(vesicle, doc, child);
      }
       if ((!xmlStrcmp(child->name, (const xmlChar *)"nucleus"))){
         parseTrisurfNucleus(vesicle, doc, child);
      }
        if ((!xmlStrcmp(child->name, (const xmlChar *)"constant_volume"))){
         parseTrisurfConstantVolume(doc, child);
      }
        if ((!xmlStrcmp(child->name, (const xmlChar *)"constant_area"))){
         parseTrisurfConstantArea(doc, child);
      }
   child = child->next;
   }
@@ -179,6 +189,33 @@
/* Low level tags parsers */
ts_bool parseTrisurfConstantVolume(xmlDocPtr doc, xmlNodePtr cur){
   xmlChar *cvol = xmlNodeListGetString(doc, cur->xmlChildrenNode, 1);
   char *n=(char *)cvol;
   V0=atof(n);
   xmlFree(cvol);
   return TS_SUCCESS;
}
ts_bool parseTrisurfConstantArea(xmlDocPtr doc, xmlNodePtr cur){
   xmlChar *carea = xmlNodeListGetString(doc, cur->xmlChildrenNode, 1);
   char *n=(char *)carea;
   A0=atof(n);
   xmlFree(carea);
   return TS_SUCCESS;
}
ts_bool parseTrisurfNucleus(ts_vesicle *vesicle, xmlDocPtr doc, xmlNodePtr cur){
   xmlChar *coords = xmlNodeListGetString(doc, cur->xmlChildrenNode, 1);
   char *n=(char *)coords;
   char *token=strtok(n," ");
   ts_uint i;
   for(i=0;i<3;i++){
      vesicle->nucleus_center[i]=atof(token);
      token=strtok(NULL," ");
   }
   xmlFree(coords);
   return TS_SUCCESS;
}
ts_bool parseTrisurfVtxn(ts_vertex_list *vlist, xmlDocPtr doc, xmlNodePtr cur){
@@ -335,6 +372,7 @@
   char *b;
   int idx, polyidx;
   char *token[2];
   int temp_cnt=0;
   while (child != NULL) {
      conname=xmlGetProp(child, (xmlChar *)"Name");
      if ((!xmlStrcmp(child->name, (const xmlChar *)"DataArray")) && !xmlStrcmp(conname, (const xmlChar *)"connectivity") ){
@@ -346,11 +384,15 @@
         while(token[0]!=NULL){
            if(idx<3*(vesicle->vlist->n-2)){
               bond_add(vesicle->blist, vesicle->vlist->vtx[atoi(token[0])], vesicle->vlist->vtx[atoi(token[1])]);
               //fprintf(stderr,"Bonds in vesicle count idx=%d\n",idx);
            }
            else {
            //find grafted vtx
               if(vesicle->tape->npoly && vesicle->tape->nmono && (vesicle->tape->nmono-1)==(idx-3*(vesicle->vlist->n-2))%(vesicle->tape->nmono)
                  && idx<(3*vesicle->vlist->n-2+vesicle->tape->nmono*vesicle->tape->npoly+vesicle->tape->npoly)){
                  && idx<(3*vesicle->vlist->n-2+vesicle->tape->nmono*vesicle->tape->npoly)){
                  temp_cnt++;
                  //fprintf(stderr,"%d: Bonds in poly count idx=%d, t1=%s t2=%s\n",temp_cnt,idx, token[0], token[1]);
                  polyidx=(idx-3*(vesicle->vlist->n-2))/(vesicle->tape->nmono);
                  //fprintf(stderr,"poly=%d, vertex=%d\n",polyidx,atoi(token[0]));
                  vesicle->poly_list->poly[polyidx]->grafted_vtx=vesicle->vlist->vtx[atoi(token[0])];