Changeset daa83b in git for Singular/LIB/deform.lib

Timestamp:

Apr 28, 2005, 11:22:18 AM (19 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

dc5e5b829c2f1ecd243a875dc0a0eac5c37f1d01

Parents:

8647dd78e27cd22cb1d534128af44420765ce382

Message:

*hannes/lossen: new ring.lib


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

File:

• Singular/LIB/deform.lib (modified) (3 diffs)

Singular/LIB/deform.lib

@@ -1 @@
-// $Id: deform.lib,v 1.32 2005-04-26 09:00:38 Singular Exp $
+// $Id: deform.lib,v 1.33 2005-04-28 09:22:14 Singular Exp $
 // author: Bernd Martin email: martin@math.tu-cottbus.de
 //(bm, last modified 4/98)
 ///////////////////////////////////////////////////////////////////////////////
-version="$Id: deform.lib,v 1.32 2005-04-26 09:00:38 Singular Exp $";
+version="$Id: deform.lib,v 1.33 2005-04-28 09:22:14 Singular Exp $";
 category="Singularities";
 info="
@@ -884 +884 @@
   string ord_str = "wp("+string(w_vec)+")";
   def br = basering;
- changeord("nr",ord_str);
+  def nr=changeord(ord_str);
+  setring nr;
   matrix A    = imap(br,A);
   intmat degA[@r][@c];
@@ -949 +950 @@
    def br = basering;
    string o_str = "wp("+string(d_vec)+")";
- changeord("nr",o_str);
+   def nr=changeord(o_str);
+   setring nr;
    module A = fetch(br,A);
    intvec dv;