===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/lib/weight,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -p -r1.12 -r1.13
--- OpenXM_contrib2/asir2000/lib/weight	2003/12/08 07:18:14	1.12
+++ OpenXM_contrib2/asir2000/lib/weight	2003/12/08 07:30:43	1.13
@@ -249,7 +249,7 @@ def roundret(V){
 	VN=size(V)[0]$
 
 	RET0=V$
-	for(I=2;I<1000;I++){
+	for(I=1;I<1000;I++){
 		RET1=I*RET0$
 		for(J=0;J<VN;J++){
 			X=drint(RET1[J])$