===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/engine/nd.c,v
retrieving revision 1.236
retrieving revision 1.237
diff -u -p -r1.236 -r1.237
--- OpenXM_contrib2/asir2000/engine/nd.c	2017/03/27 09:05:46	1.236
+++ OpenXM_contrib2/asir2000/engine/nd.c	2017/04/09 02:23:12	1.237
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.235 2017/02/28 07:06:28 noro Exp $ */
+/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.236 2017/03/27 09:05:46 noro Exp $ */
 
 #include "nd.h"
 
@@ -7084,7 +7084,11 @@ init_eg(&eg_search);
     else if ( m == -2 )
         r0 = nd_f4_red_lf_main(m,sp0,nsp,trace,s0vect,col,rvect,rhead,imat,nred);
     else
+#if defined(VISUAL)
+        r0 = nd_f4_red_q_main(sp0,nsp,trace,s0vect,col,rvect,rhead,imat,nred);
+#else
         r0 = nd_f4_red_gz_main(sp0,nsp,trace,s0vect,col,rvect,rhead,imat,nred);
+#endif
     if ( DP_Print ) print_eg("search",&eg_search);
     return r0;
 }