Changeset 7b315e6 in git for Singular/LIB/involut.lib


Ignore:
Timestamp:
Oct 31, 2007, 6:24:10 PM (17 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
b18843c1ccc987aad90ce1b80a1e11ddae569e37
Parents:
fa7ed7d407a57e6371ba26f73b968bae619b44e9
Message:
*hannes:ncalgebra -> nc_algebra


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

Legend:

Unmodified
Added
Removed
  • Singular/LIB/involut.lib

    rfa7ed7 r7b315e6  
    1 version="$Id: involut.lib,v 1.12 2007-01-23 15:03:30 Singular Exp $";
     1version="$Id: involut.lib,v 1.13 2007-10-31 17:23:43 Singular Exp $";
    22category="Noncommutative";
    33info="
     
    164164  matrix D[6][6];
    165165  D[1,4]=1; D[2,5]=1;  D[3,6]=1;
    166   ncalgebra(1,D);
     166  nc_algebra(1,D);
    167167  ncdetection();
    168168  kill r;
    169169  //----------------------------------------
    170170  ring r=0,(x,S),dp;
    171   ncalgebra(1,-S);
     171  nc_algebra(1,-S);
    172172  ncdetection();
    173173  kill r;
     
    176176  matrix D[3][3];
    177177  D[1,2]=1;  D[1,3]=-S;
    178   ncalgebra(1,D);
     178  nc_algebra(1,D);
    179179  ncdetection();
    180180}
     
    340340  "EXAMPLE:";echo = 2;
    341341  ring r = 0,(x,d),dp;
    342   ncalgebra(1,1); // Weyl-Algebra
     342  nc_algebra(1,1); // Weyl-Algebra
    343343  map F = r,x,-d;
    344344  poly f =  x*d^2+d;
     
    461461  };
    462462
    463   ncalgebra(1, M); //now new ring @@K become a noncommutative ring
     463  nc_algebra(1, M); //now new ring @@K become a noncommutative ring
    464464
    465465  list l; //list to define an involution
     
    587587  };
    588588
    589   ncalgebra(1, M); //now new ring @@K become a noncommutative ring
     589  nc_algebra(1, M); //now new ring @@K become a noncommutative ring
    590590
    591591  list l; //list to define an involution
     
    721721  };
    722722
    723   ncalgebra(1, M); //now new ring @@K become a noncommutative ring
     723  nc_algebra(1, M); //now new ring @@K become a noncommutative ring
    724724
    725725  list l; //list to define a homomorphism(isomorphism)
     
    821821  //----------- use the call findAuto(0)          --------------------
    822822  ring r = 0,(x,s),dp;
    823   ncalgebra(1,s); // the shift algebra
     823  nc_algebra(1,s); // the shift algebra
    824824  s*x; // the only relation in the algebra is:
    825825  def Y = findAuto(0);
Note: See TracChangeset for help on using the changeset viewer.