30 static int Tcl_print(ClientData, Tcl_Interp *,
int,
const char **);
31 static int Tcl_atomid(ClientData, Tcl_Interp *,
int,
const char **);
32 static int Tcl_getstep(ClientData, Tcl_Interp *,
int,
const char **);
33 static int Tcl_addatom(ClientData, Tcl_Interp *,
int,
const char **);
34 static int Tcl_addgroup(ClientData, Tcl_Interp *,
int,
const char **);
35 static int Tcl_reconfig(ClientData, Tcl_Interp *,
int,
const char **);
36 static int Tcl_clearconfig(ClientData, Tcl_Interp *,
int,
const char **);
37 static int Tcl_loadcoords(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
38 static int Tcl_loadmasses(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
39 static int Tcl_loadforces(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
40 static int Tcl_enabletotalforces(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
41 static int Tcl_disabletotalforces(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
42 static int Tcl_loadtotalforces(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
43 static int Tcl_addforce(ClientData, Tcl_Interp *,
int, Tcl_Obj *
const []);
44 static int Tcl_addenergy(ClientData, Tcl_Interp *,
int,
const char **);