source: git/Tst/Letterplace/gb_usl2h.tst @ d61f67

fieker-DuValspielwiese
Last change on this file since d61f67 was d61f67, checked in by Karim Abou Zeid <karim23697@…>, 5 years ago
Add lp gb regress tests
  • Property mode set to 100644
File size: 275 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "freegb.lib";
3ring r = 0,(h,f,e,H),Dp;
4int upToDeg = 2;
5def R = makeLetterplaceRing(upToDeg);
6setring(R);
7ideal Id = f*e-e*f+h*H,
8h*e-e*h-2*e*H,
9h*f-f*h+2*f*H,
10f*H-H*f,
11e*H-H*e,
12h*H-H*h;
13option(redTail);
14option(redSB);
15std(Id);
16tst_status(1);$
Note: See TracBrowser for help on using the repository browser.