Trisurf Monte Carlo simulator
Samo Penic
2016-07-11 80f2a33e4b55c7259bdb4bff66a0ce12b96edd80
src/vesicle.c
@@ -1,3 +1,4 @@
/* vim: set ts=4 sts=4 sw=4 noet : */
#include<general.h>
#include "vesicle.h"
#include "vertex.h"
@@ -7,6 +8,7 @@
#include "stdlib.h"
#include "poly.h"
#include "sh.h"
#include "shcomplex.h"
ts_vesicle *init_vesicle(ts_uint N, ts_uint ncmax1, ts_uint ncmax2, ts_uint
ncmax3, ts_double stepsize){
@@ -36,7 +38,8 @@
    triangle_list_free(vesicle->tlist);
    cell_list_free(vesicle->clist);
    poly_list_free(vesicle->poly_list);
    sph_free(vesicle->sphHarmonics);
    poly_list_free(vesicle->filament_list);
    complex_sph_free(vesicle->sphHarmonics);
    free(vesicle);
    return TS_SUCCESS;
}
@@ -59,3 +62,20 @@
    vesicle->volume=volume;
    return TS_SUCCESS;
}
/* @brief Function makes a sum of partial areas of each triangle.
 *
 *
 *
 */
ts_bool vesicle_area(ts_vesicle *vesicle){
    ts_double area;
    ts_uint i;
    ts_triangle **tria=vesicle->tlist->tria;
    area=0;
    for(i=0;i<vesicle->tlist->n;i++){
        area=area+tria[i]->area;
    }
    vesicle->area=area;
    return TS_SUCCESS;
}