Trisurf Monte Carlo simulator
Samo Penic
2010-11-28 a10dd5c18fbf0b6d5746827f7a9ebfc078563d4a
commit | author | age
d7639a 1 #include<stdlib.h>
SP 2 #include<math.h>
3 #include<stdio.h>
4 #include "general.h"
5 #include "vertex.h"
6 #include "bond.h"
7 #include "initial_timestep.h"
8
9 ts_bool initial_distribution(ts_vesicle *vesicle){
10     ts_fprintf(stderr,"Starting initial_distribution on vesicle with %u shells!...\n",vesicle->nshell);
11     ts_bool retval;
12     ts_vertex_list *vlist=&vesicle->vlist;
13     ts_bond_list *blist=&vesicle->blist;
14     ts_uint nshell=vesicle->nshell;
15     ts_uint no_vertices=5*nshell*nshell+2;
16
17
18     ts_fprintf(stderr,"Calling init_vertex_list...\n");
19     retval = init_vertex_list(vlist,no_vertices,2);
20     if(retval!=TS_SUCCESS) fatal("There was an error in calling init_vertex_list. Cannot continue.",1);
21
22     retval = vertex_set_global_values(vesicle);
23     ts_fprintf(stderr,"Calling init_bond_list...\n");
24     retval = init_bond_list(blist);
25      ts_fprintf(stderr,"initial_distribution finished!\n");
26     return TS_SUCCESS;
27
28