Trisurf Monte Carlo simulator
Samo Penic
2010-12-04 bb77ca8f6e18e5a3ee2996095db5394dcd49197a
commit | author | age
d7639a 1 #include<general.h>
SP 2 #include "vesicle.h"
bb77ca 3 #include "vertex.h"
SP 4 #include "triangle.h"
5 #include "bond.h"
6 #include "cell.h"
7
8
9 ts_vesicle *init_vesicle(ts_uint N, ts_uint ncmax1, ts_uint ncmax2, ts_uint
10 ncmax3, ts_double stepsize){
11     ts_vesicle *vesicle;
12     vesicle->vlist=init_vertex_list(N);
13     vesicle->blist=init_bond_list();
14     vesicle->tlist=init_triangle_list();
15     vesicle->clist=init_cell_list(ncmax1, ncmax2, ncmax3, stepsize);
16     return TS_SUCCESS;
17 }
18
d7639a 19 ts_bool vesicle_translate(ts_vesicle *vesicle,ts_double x, ts_double y, ts_double z){
SP 20     ts_uint i;
bb77ca 21     ts_vertex *vtx=vesicle->vlist->vertex;
SP 22     ts_uint nn=vesicle->vlist->n;
d7639a 23     for(i=0;i<nn;i++){
bb77ca 24         vtx[i]->data->x+=x;
SP 25         vtx[i]->data->y+=y;
26         vtx[i]->data->z+=z;
d7639a 27     }
SP 28     return TS_SUCCESS;
29 }
30
31 ts_bool vesicle_free(ts_vesicle *vesicle){
bb77ca 32     vertex_list_free(vesicle->vlist);
SP 33     bond_list_free(vesicle->blist);
34     triangle_list_free(vesicle->tlist);
35     cell_list_free(vesicle->clist);
d7639a 36     return TS_SUCCESS;
SP 37 }