| | |
| | | #include "poly.h" |
| | | #include "sh.h" |
| | | #include "shcomplex.h" |
| | | #include "plugins.h" |
| | | |
| | | ts_vesicle *init_vesicle(ts_uint N, ts_uint ncmax1, ts_uint ncmax2, ts_uint |
| | | ncmax3, ts_double stepsize){ |
| | |
| | | poly_list_free(vesicle->poly_list); |
| | | poly_list_free(vesicle->filament_list); |
| | | complex_sph_free(vesicle->sphHarmonics); |
| | | plugin_list_free(vesicle->plist); |
| | | free(vesicle); |
| | | return TS_SUCCESS; |
| | | } |
| | |
| | | vesicle->area=area; |
| | | return TS_SUCCESS; |
| | | } |
| | | |
| | | ts_double vesicle_meancurvature(ts_vesicle *vesicle){ |
| | | // Integrates (H dA) over vesicle area A, where H=(C1+C2)/2. |
| | | // (To be devided by A outside of function) |
| | | ts_double mc; |
| | | ts_uint i; |
| | | mc=0; |
| | | for(i=0;i<vesicle->vlist->n;i++){ |
| | | mc=mc+vesicle->vlist->vtx[i]->curvature; |
| | | } |
| | | return mc/2.0; |
| | | } |