Changeset 46d427b in git for Tst/BuchDL
- Timestamp:
- Oct 30, 2007, 7:16:00 PM (16 years ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- b9ed9219019a539488427520e4fd4f0a1f50e0a0
- Parents:
- 0273dec39cc5a468a269edd6c08a5ba742e0fb14
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Tst/BuchDL/Ex_L3.tst
r0273de r46d427b 733 733 matrix H[6][6]; 734 734 H[1,4] = 1; H[2,5] = 1; H[3,6] = 1; 735 ncalgebra(C,H);735 def @S=ncalgebra(C,H); setring @S; 736 736 737 737 kill D3; // ---- Alternatively: 738 738 if (not(defined(Exterior))){ LIB "nctools.lib"; } 739 739 ring D3 = 0, (x(1..3),d(1..3)), dp; 740 Weyl();740 def @S3=Weyl(); setring @S3; 741 741 742 742 basering; … … 804 804 for (i=1; i<=3; i++) { for (j=i+1; j<=3; j++) { C[i,j] = -1; } } 805 805 matrix H[3][3]; 806 ncalgebra(C,H);806 def @S=ncalgebra(C,H); setring @S; 807 807 ideal Q = x(1)^2, x(2)^2, x(3)^2; 808 808 Q = twostd(Q); // compute two-sided Groebner basis
Note: See TracChangeset
for help on using the changeset viewer.