Changeset 7885020 in git for Singular/iparith.cc

Timestamp:

Aug 12, 1999, 12:57:37 PM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38077648e7239f98078663eb941c3c979511150a')

Children:

a28950c35e390ee5e90953643f06d81423c93dce

Parents:

f7ffaaf0716fd60773ab9f815de092568d8eb0ea

Message:

* hannes: integrated "spectrum" by Stefan Endrass, inactive by default
  (Makefile.in claptmpl.cc feResource.cc iparith.cc mod2.h.in
   tok.h GMPrat.h GMPrat.cc kmatrix.h multicnt.h multicnt.cc
   npolygon.h npolygon.cc semic.h semic.cc spectrum.h spectrum.cc
   splist.h splist.cc)


git-svn-id: file:///usr/local/Singular/svn/trunk@3423 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/iparith.cc (modified) (5 diffs)

Singular/iparith.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: iparith.cc,v 1.166 1999-08-06 14:06:39 obachman Exp $ */
+/* $Id: iparith.cc,v 1.167 1999-08-12 10:57:33 Singular Exp $ */
 
 /*
@@ -48 +48 @@
 #include "fglm.h"
 #endif
+#ifdef HAVE_SPECTRUM
+#include "spectrum.h"
+#endif
+
 #include "ipshell.h"
 
@@ -276 +280 @@
   { "size",        0, COUNT_CMD ,         CMD_1},
   { "sortvec",     0, SORTVEC_CMD ,       CMD_1},
+  #ifdef HAVE_SPECTRUM
+  { "spectrum",    0, SPECTRUM_CMD ,      CMD_1},
+  { "spectrumnd",  0, SPECTRUMF_CMD ,     CMD_1},
+  { "spadd",       0, SPADD_CMD ,         CMD_2},
+  { "spmul",       0, SPMUL_CMD ,         CMD_2},
+  { "semic",       0, SEMIC_CMD ,         CMD_2},
+  { "semicsqh",    0, SEMICH_CMD ,        CMD_2},
+  #endif
   #ifdef OLD_RES
   { "sres",        0, SRES_CMD ,          CMD_23},
@@ -2273 +2285 @@
 ,{jjSIMPL_ID,  SIMPLIFY_CMD,   IDEAL_CMD,      IDEAL_CMD,  INT_CMD PROFILER}
 ,{jjSIMPL_ID,  SIMPLIFY_CMD,   MODUL_CMD,      MODUL_CMD,  INT_CMD PROFILER}
+#ifdef HAVE_SPECTRUM
+,{spaddProc,   SPADD_CMD,      LIST_CMD,       LIST_CMD,   LIST_CMD PROFILER}
+,{spmulProc,   SPMUL_CMD,      LIST_CMD,       LIST_CMD,   INT_CMD  PROFILER}
+,{semicProc,   SEMIC_CMD,      INT_CMD,        LIST_CMD,   LIST_CMD PROFILER}
+,{semichProc,  SEMICH_CMD,     INT_CMD,        LIST_CMD,   LIST_CMD PROFILER}
+#endif
 //,{jjRES,       SRES_CMD,       LIST_CMD,       IDEAL_CMD,  INT_CMD PROFILER}
 //,{jjRES,       SRES_CMD,       LIST_CMD,       MODUL_CMD,  INT_CMD PROFILER}
@@ -3584 +3602 @@
 ,{jjSort_Id,    SORTVEC_CMD,     INTVEC_CMD,     IDEAL_CMD }
 ,{jjSort_Id,    SORTVEC_CMD,     INTVEC_CMD,     MODUL_CMD }
+#ifdef HAVE_SPECTRUM
+,{spectrumProc, SPECTRUM_CMD,    LIST_CMD,       POLY_CMD }
+,{spectrumfProc,SPECTRUMF_CMD,   LIST_CMD,       POLY_CMD }
+#endif
 ,{jjSTD,        STD_CMD,         IDEAL_CMD,      IDEAL_CMD }
 ,{jjSTD,        STD_CMD,         MODUL_CMD,      MODUL_CMD }