Starting tests. Doing tests of co coefficients.

Samo Penic

2012-06-07 5bb11d36948f9ccc243711d4e9caf4b19b3c384b

 src/vesicle.c

@@ -21,9 +21,9 @@
   ts_vertex **vtx=vesicle->vlist->vtx;
   ts_uint nn=vesicle->vlist->n;
   for(i=0;i<nn;i++){
      vtx[i]->data->x+=x;
      vtx[i]->data->y+=y;
      vtx[i]->data->z+=z;
      vtx[i]->x+=x;
      vtx[i]->y+=y;
      vtx[i]->z+=z;
   }
   return TS_SUCCESS;
}
@@ -36,3 +36,21 @@
    free(vesicle);
    return TS_SUCCESS;
}

ts_bool vesicle_volume(ts_vesicle *vesicle){
    ts_double volume;
    ts_double vol;
    ts_uint i;
    ts_triangle **tria=vesicle->tlist->tria;
    volume=0;
    for(i=0; i<vesicle->tlist->n;i++){
        vol=(tria[i]->vertex[0]->x+ tria[i]->vertex[1]->x + tria[i]->vertex[2]->x) * tria[i]->xnorm + 
       (tria[i]->vertex[0]->y+ tria[i]->vertex[1]->y + tria[i]->vertex[2]->y) * tria[i]->ynorm + 
    (tria[i]->vertex[0]->z+ tria[i]->vertex[1]->z + tria[i]->vertex[2]->z) *
tria[i]->znorm;
    volume=volume-vol/18.0;
    }

    vesicle->volume=volume;
    return TS_SUCCESS;
}