source: git/Tst/Buch/Example_1_9_3.tst @ 8a8861

spielwiese
Last change on this file since 8a8861 was e0b657, checked in by Hans Schönemann <hannes@…>, 17 years ago
*hannes: ncalgebra -> nc_algebra git-svn-id: file:///usr/local/Singular/svn/trunk@10367 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 310 bytes
Line 
1LIB "tst.lib";
2tst_init();
3
4// ==========================  example 1.9.4   ================================
5ring s  = (0,Q),(x,y,z),dp;
6matrix C[3][3];
7C[1,2] = Q2;
8C[1,3] = 1/Q2;
9C[2,3] = Q2;
10matrix D[3][3];
11D[1,2] = -Q*z;
12D[1,3] = 1/Q*y;
13D[2,3] = -Q*x;
14def S=nc_algebra(C,D); setring S;
15S;
16
17tst_status(1);$
18
Note: See TracBrowser for help on using the repository browser.