===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/engine/nd.c,v
retrieving revision 1.82
retrieving revision 1.83
diff -u -p -r1.82 -r1.83
--- OpenXM_contrib2/asir2000/engine/nd.c	2003/10/15 03:21:44	1.82
+++ OpenXM_contrib2/asir2000/engine/nd.c	2003/10/17 05:15:20	1.83
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.81 2003/10/11 02:14:19 noro Exp $ */
+/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.82 2003/10/15 03:21:44 noro Exp $ */
 
 #include "ca.h"
 #include "parse.h"
@@ -2899,7 +2899,9 @@ void nd_setup_parameters(int nvar,int max) {
 
 	nd_nvar = nvar;
 	if ( max ) {
-		if ( max < 2 ) nd_bpe = 1;
+		/* XXX */
+		if ( do_weyl ) nd_bpe = 32;
+		else if ( max < 2 ) nd_bpe = 1;
 		else if ( max < 4 ) nd_bpe = 2;
 		else if ( max < 8 ) nd_bpe = 3;
 		else if ( max < 16 ) nd_bpe = 4;