Trisurf Monte Carlo simulator
Samo Penic
2014-04-10 632960fbf1ebde72860966058354f7a6b61f5267
src/vesicle.c
@@ -5,10 +5,12 @@
#include "bond.h"
#include "cell.h"
#include "stdlib.h"
#include "poly.h"
#include "sh.h"
ts_vesicle *init_vesicle(ts_uint N, ts_uint ncmax1, ts_uint ncmax2, ts_uint
ncmax3, ts_double stepsize){
    ts_vesicle *vesicle=(ts_vesicle *)malloc(sizeof(ts_vesicle));
    ts_vesicle *vesicle=(ts_vesicle *)calloc(1,sizeof(ts_vesicle));
    vesicle->vlist=init_vertex_list(N);
    vesicle->blist=init_bond_list();
    vesicle->tlist=init_triangle_list();
@@ -33,24 +35,27 @@
    bond_list_free(vesicle->blist);
    triangle_list_free(vesicle->tlist);
    cell_list_free(vesicle->clist);
    poly_list_free(vesicle->poly_list);
    sph_free(vesicle->sphHarmonics);
    free(vesicle);
    return TS_SUCCESS;
}
/* @brief Function makes a sum of partial volumes of each triangle. Volumes of
 *
 * Partial volumes are calculated when we calculate normals of triangles. It is
 * relatively easy to calculate the volume of vesicle if we take into account
 * that the volume of the whole vertex is simply sum of all partial volumes of
 * all the triangles.
 */
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;
    volume=volume+tria[i]->volume;
    }
    vesicle->volume=volume;
    return TS_SUCCESS;
}