| | |
| | | /* vim: set ts=4 sts=4 sw=4 noet : */ |
| | | #include<general.h> |
| | | #include "vesicle.h" |
| | | #include "vertex.h" |
| | |
| | | #include "cell.h" |
| | | #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){ |
| | |
| | | triangle_list_free(vesicle->tlist); |
| | | cell_list_free(vesicle->clist); |
| | | poly_list_free(vesicle->poly_list); |
| | | poly_list_free(vesicle->filament_list); |
| | | complex_sph_free(vesicle->sphHarmonics); |
| | | free(vesicle); |
| | | return TS_SUCCESS; |
| | | } |
| | |
| | | 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; |
| | | } |