Changeset bcd38b in git

Timestamp:

Apr 20, 2005, 7:28:48 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

7668071605e2a9aa0d4be436ad97d172a27d5ca4

Parents:

d86777372eef84871f10e4887da44dd71b5042b8

Message:

*lossen/hannes: splitring etc.


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

Location:

Singular/LIB

Files:

• paramet.lib (deleted)
• primitiv.lib (modified) (3 diffs)

Singular/LIB/primitiv.lib

@@ -3 +3 @@
 // This library is for Singular 1.2 or newer
 
-version="$Id: primitiv.lib,v 1.18 2005-04-15 13:42:54 Singular Exp $";
+version="$Id: primitiv.lib,v 1.19 2005-04-20 17:28:48 Singular Exp $";
 category="Commutative Algebra";
 info="
@@ -261 +261 @@
 RETURN:  ring; @
            if called with a nonempty second parameter L, then in the output 
-           ring there is defined a list erg ( =L mapped to the new ring).
+           ring there is defined a list erg ( =L mapped to the new ring);
+           if the minpoly of the active ring is non-zero, then the image of 
+           the primitive root of f in the output ring is appended as last 
+           entry of the list erg. 
 NOTE:    If the old ring has no parameter, the name @code{a} is chosen for the
          parameter of R (if @code{a} is no ring variable; if it is, @code{b} is
@@ -380 +383 @@
 { "EXAMPLE:"; echo = 2;
  ring r=0,(x,y),dp;
- def r1=splitring(x2-2);
- setring r1; basering; // change to Q(sqrt(2))
+ splitring(x2-2,"r1");   // change to Q(sqrt(2))
  // change to Q(sqrt(2),sqrt(sqrt(2)))=Q(a) and return the transformed
  // old parameter:
- def r2=splitring(x2-a,a);
- setring r2; basering; erg;
+ splitring(x2-a,"r2",a);
  // the result is (a)^2 = (sqrt(sqrt(2)))^2
+ nameof(basering);
+ r2;
  kill r1; kill r2;
 }