version 1.3, 2001/05/04 01:06:26 |
version 1.4, 2003/07/17 09:10:54 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/Kan/switch.c,v 1.2 2000/01/16 07:55:41 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/Kan/switch.c,v 1.3 2001/05/04 01:06:26 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include "datatype.h" |
#include "datatype.h" |
#include "extern2.h" |
#include "extern2.h" |
Line 20 void print_switch_status(void) { |
|
Line 20 void print_switch_status(void) { |
|
printf("mmLarger [matrix,lexicographic,tower] %s\n",F_mmLarger); |
printf("mmLarger [matrix,lexicographic,tower] %s\n",F_mmLarger); |
printf("mpMult [poly,diff,difference] %s\n",F_mpMult); |
printf("mpMult [poly,diff,difference] %s\n",F_mpMult); |
printf("monomialAdd [poly] %s\n",F_monomialAdd); |
printf("monomialAdd [poly] %s\n",F_monomialAdd); |
printf("red@ [standard,module1,module2,module1rev]\n"); |
printf("red@ [standard,module1,module2,module1rev,ecart]\n"); |
printf(" %s\n",F_red); |
printf(" %s\n",F_red); |
printf("isSameComponent [x,xd] %s\n",F_isSameComponent); |
printf("isSameComponent [x,xd] %s\n",F_isSameComponent); |
printf("sp [standard] %s\n",F_sp); |
printf("sp [standard] %s\n",F_sp); |
Line 202 void switch_red(arg) |
|
Line 202 void switch_red(arg) |
|
lcm = lcm_module; |
lcm = lcm_module; |
switch_grade("standard"); |
switch_grade("standard"); |
F_red = "module2"; |
F_red = "module2"; |
|
}else if (strcmp(arg,"ecart") == 0) { |
|
switch_sp("standard"); |
|
isReducible = isReducible_module; |
|
reduction1 = reduction1_gen; |
|
reduction = reduction_ecart; |
|
|
|
isCdrReducible = isCdrReducible_gen; |
|
reduction1Cdr = reduction1Cdr_gen; |
|
reductionCdr = reductionCdr_gen; |
|
|
|
lcm = lcm_module; |
|
switch_grade("module1"); |
|
F_red = "ecart"; |
}else if (strcmp(arg,"debug") == 0) { |
}else if (strcmp(arg,"debug") == 0) { |
reduction1 = reduction1_gen_debug; |
reduction1 = reduction1_gen_debug; |
F_red = "debug"; |
F_red = "debug"; |