source: git/Tst/Old/curve.tst @ efdab0f

fieker-DuValspielwiese
Last change on this file since efdab0f was 46976a6, checked in by Olaf Bachmann <obachman@…>, 26 years ago
* added status check to regress.cmd * added tst_status(1); call to each tst file, just before quit git-svn-id: file:///usr/local/Singular/svn/trunk@2271 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 266 bytes
Line 
1// resolution of a space curve ...
2ring r=0,(t,x,y,z,l),(dp,c);
3ideal i=z2+lx4z-x5y,y2+l3x2z-xz-2lx5-l2x3y,yz+l2x3z-x6-lx4y;
4ideal i2=std(i);
5list resii=sres(i2,0);
6list resi=minres(resii);
7resi[1];
8resi[2];
9print(betti(resi),"betti");
10LIB "tst.lib";tst_status(1);$
Note: See TracBrowser for help on using the repository browser.