36 memset((
void*)drops.
begin(), 0, drops.
size()*
sizeof(char));
49 static int Tcl_print(ClientData, Tcl_Interp *,
int,
const char **);
50 static int Tcl_wrapmode(ClientData, Tcl_Interp *,
int,
const char **);
51 static int Tcl_cleardrops(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
52 static int Tcl_dropatom(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
53 static int Tcl_nextatom(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
54 static int Tcl_getcoord(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
55 static int Tcl_getcell(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
56 static int Tcl_getmass(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
57 static int Tcl_getcharge(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
58 static int Tcl_getid(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
59 static int Tcl_addforce(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
60 static int Tcl_addenergy(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
ComputeTclBC(ComputeID c)