Changeset 3f78cb in git

Timestamp:

Jun 10, 2008, 12:33:15 PM (15 years ago)

Author:

Motsak Oleksandr <motsak@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

9e2fdf701f7deadbbbe6ed38553ee22d1119be64

Parents:

6cb1d1ecf69dca15e7df819a230cba1021e8d16f

Message:

*motsak: major redesign of NS Subsystem...


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

File:

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

Singular/ipshell.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ipshell.cc,v 1.184 2008-05-20 11:34:33 Singular Exp $ */
+/* $Id: ipshell.cc,v 1.185 2008-06-10 10:33:15 motsak Exp $ */
 /*
 * ABSTRACT:
@@ -1759 +1759 @@
     L->m[3].data=(void *)idCopy(r->qideal);
   // ----------------------------------------
-  #ifdef HAVE_PLURAL
-  if (rIsPluralRing(r))
+  #ifdef HAVE_PLURAL // NC! in rDecompose
+  if (rIsPluralRing(r)) 
   {
     L->m[4].rtyp=MATRIX_CMD;
-    L->m[4].data=(void *)mpCopy(r->nc->C);
+    L->m[4].data=(void *)mpCopy(r->GetNC()->C);
     L->m[5].rtyp=MATRIX_CMD;
-    L->m[5].data=(void *)mpCopy(r->nc->D);
+    L->m[5].data=(void *)mpCopy(r->GetNC()->D);
   }
   #endif
@@ -2180 +2180 @@
   if (L->nr==5)
   {
-    if (nc_CallPlural((matrix)L->m[4].Data(),(matrix)L->m[5].Data(),
-        NULL,NULL,R))
-      goto rCompose_err;
+    if (nc_CallPlural((matrix)L->m[4].Data(),(matrix)L->m[5].Data(),NULL,NULL,R, true)) goto rCompose_err;
+    // takes care about non-comm. quotient! i.e. calls "nc_SetupQuotient" due to last true
   }
   #endif