First variant of constant volume constrant (a new one proposed by Miha afte...

Samo Penic

2014-09-05 1121faa13a2038facad22073f0fc610903d98691

 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++){