Changeset 01cc3b2 in git


Ignore:
Timestamp:
Apr 28, 2005, 5:11:52 PM (19 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
9ded3eedf5ab4f272ac380c5227b88845c6bc85b
Parents:
f83effec729f9c61c16e26b311a1d1fbcaa6b9b5
Message:
*hannes: exmaples


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/ring.lib

    rf83eff r01cc3b2  
    11///////////////////////////////////////////////////////////////////////////////
    2 version="$Id: ring.lib,v 1.22 2005-04-28 09:21:59 Singular Exp $";
     2version="$Id: ring.lib,v 1.23 2005-04-28 15:11:52 Singular Exp $";
    33category="General purpose";
    44info="
     
    6060   ring r=0,(x,y,u,v),(dp(2),ds);
    6161   def R=changechar("2,A"); R;"";
    62    def R1=changechar("32003",R); R1;
     62   def R1=changechar("32003",R); setring R1; R1;
    6363   kill R,R1;
    6464}
     
    100100   ideal i = x^2,y^2-u^3,v;
    101101   qring Q = std(i);
    102    def Q'=changeord("lp",Q); Q';
     102   def Q'=changeord("lp",Q); setring Q'; Q';
    103103   kill R,Q,Q';
    104104}
     
    151151   setring(r);
    152152   def R=changevar("A()"); R; "";
    153    def Q'=changevar("a,b,c,d",Q); Q';
     153   def Q'=changevar("a,b,c,d",Q); setring Q'; Q';
    154154   kill R,Q,Q';
    155155}
     
    674674   qring qT=std(d2+e2-f3);         //create qring of T mod d2+e2-f3
    675675   def Q=ringtensor(s,qS,t,qT);
    676    type Q;
     676   setring Q; type Q;
    677677   kill R,S,T,Q;
    678678}
Note: See TracChangeset for help on using the changeset viewer.