Changeset cad11a in git for Singular/ipassign.cc

Timestamp:

Sep 12, 2007, 11:53:01 AM (17 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

b98aeaacf1a8c51ec84da1f8c340380f3a348f6b

Parents:

47cbe51f7a7b4778b784defe59954887bbc0cbb7

Message:

*hannes: more normlize calls


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

File:

• Singular/ipassign.cc (modified) (2 diffs)

Singular/ipassign.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ipassign.cc,v 1.90 2007-04-04 12:38:07 Singular Exp $ */
+/* $Id: ipassign.cc,v 1.91 2007-09-12 09:53:01 Singular Exp $ */
 
 /*
@@ -434 +434 @@
   if (res->data!=NULL) idDelete((ideal*)&res->data);
   res->data=(void *)a->CopyD(MATRIX_CMD);
-  idNormalize((ideal)res->data);
+  if (a->rtyp==IDHDL) idNormalize((ideal)a->Data());
+  else                idNormalize((ideal)res->data);
   jiAssignAttr(res,a);
   if (((res->rtyp==IDEAL_CMD)||(res->rtyp==MODUL_CMD))