Trisurf Monte Carlo simulator
mihaf
2014-03-19 b30f45332934a27d267bac995eb6a94cc7cf5d9d
src/bond.c
@@ -35,6 +35,17 @@
   return blist->bond[blist->n-1];
}
ts_bool bond_vector(ts_bond *bond){
   bond->x=bond->vtx1->x-bond->vtx2->x;
   bond->y=bond->vtx1->y-bond->vtx2->y;
   bond->z=bond->vtx1->z-bond->vtx2->z;
   return TS_SUCCESS;
}
ts_bool bond_list_free(ts_bond_list *blist){
    ts_uint i;
    for(i=0;i<blist->n;i++){