Trisurf Monte Carlo simulator
Samo Penic
2013-12-08 d33abe246221255be91bacda79f5852b8c4ed8fd
src/initial_distribution.c
@@ -32,6 +32,7 @@
    retval = init_triangle_neighbours(vesicle);
    retval = init_common_vertex_triangle_neighbours(vesicle);
    retval = init_normal_vectors(vesicle->tlist);
    retval = init_bond_triangles(vesicle->blist);
    retval = mean_curvature_and_energy(vesicle);
 ts_fprintf(stderr,"initial_distribution finished!\n");
   if(retval);
@@ -382,3 +383,16 @@
   }
   return TS_SUCCESS;
}
ts_bool init_bond_triangles(ts_bond_list *blist){
   ts_uint i;
   ts_bool retval;
   for(i=0;i<blist->n;i++){
      retval=bond_assign_triangles(blist->bond[i]);
      if(retval==TS_FAIL){
         fatal("Bond %u does not have 2 triangles. Possible error in structure.",156);
      }
   }
   return TS_SUCCESS;
}