Changeset b90de5a in git

Timestamp:

Feb 8, 2005, 1:58:55 PM (18 years ago)

Author:

Michael Brickenstein <bricken@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '00e2e9c41af3fde1273eb3633f4c0c7c3db2579d')

Children:

cd518904e5a9af3cb906d82573eb15048b10fabf

Parents:

1c8027b86b587759ae6e422c0bd4aa615503dcb0

Message:

*bricken:unifastmult


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

File:

• Singular/extra.cc (modified) (3 diffs)

Singular/extra.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR      *
 *****************************************/
-/* $Id: extra.cc,v 1.215 2005-01-18 15:41:57 Singular Exp $ */
+/* $Id: extra.cc,v 1.216 2005-02-08 12:58:55 bricken Exp $ */
 /*
 * ABSTRACT: general interface to internals of Singular ("system" command)
@@ -57 +57 @@
 #include "walk.h"
 #include "weight.h"
-
+#include "fast_mult.h"
 #ifdef HAVE_SPECTRUM
 #include "spectrum.h"
@@ -1733 +1733 @@
     }
     else
+      if (strcmp(sys_cmd, "unifastmult")==0)
+    {
+      ring r = currRing;
+      poly f = (poly)h->Data();
+      h=h->next;
+      poly g=(poly)h->Data();
+      res->rtyp=POLY_CMD;
+      res->data=unifastmult(f,g);
+      return(FALSE);
+    }
+    else
 /*==================== Error =================*/
       Werror( "system(\"%s\",...) %s", sys_cmd, feNotImplemented );