Changeset 8ce461b in git


Ignore:
Timestamp:
Dec 9, 2020, 6:41:55 PM (3 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'fc741b6502fd8a97288eaa3eba6e5220f3c3df87')
Children:
60d4dfdfcbedb391f475ccbd19b68d6aff1551db
Parents:
b65621c94c09d93d9ae2a321fed053dcf9ee4641
Message:
doc: print output in stanlayreisner.lib
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/stanleyreisner.lib

    rb65621 r8ce461b  
    2121T1(ideal)                   compute first order deformations
    2222T2(ideal)                   compute second order deformations
    23 makePoly(poly)              creat a Poly
    24 fPiece(ideal,poly,poly)             creat a FirstOrderDeformation
    25 sPiece(ideal,poly,poly)              creat a SecondOrderDeformation
    26 makeLinks(ideal,poly,poly)  creat a FirstOrderDeformation of the links
     23makePoly(poly)              create a Poly
     24fPiece(ideal,poly,poly)     create a FirstOrderDeformation
     25sPiece(ideal,poly,poly)     create a SecondOrderDeformation
     26makeLinks(ideal,poly,poly)  create a FirstOrderDeformation of the links
    2727
    2828";
     
    6161  ideal source=phi.source;
    6262  setring Rcurrent;
    63   //string(phi.source) + "  ->  "+ string (phi.rule);
     63  string(phi.source) + "  ->  "+ string (phi.rule);
    6464  nameof(phi)+".source" +"  ->  "+ nameof(phi)+".over"+" / "+ nameof(phi)+".source";
    6565  //nameof(phi.source) +"  ->  "+ nameof(phi.rule)+ " / " nameof(phi.source);
     
    6969example
    7070{
    71  "EXAMPLE:";
     71 "EXAMPLE:"; echo=2;
    7272 ring R=0,(x1,x2,x3,x4,x5),lp;
    7373 ideal I = x1*x2,x2*x3,x3*x4,x4*x5,x5*x1;
    7474 list L = T1(I);
    7575 L[1];
     76 L;
    7677}
    7778
     
    9192example
    9293{
    93  "EXAMPLE:";
     94 "EXAMPLE:"; echo=2;
    9495 ring R=0,(x1,x2,x3,x4,x5),lp;
    9596 ideal I = x1*x2,x2*x3,x3*x4,x4*x5,x5*x1;
    9697 list L = T2(I);
    9798 L[1];
     99 L;
    98100}
    99101
     
    117119example
    118120{
    119  "EXAMPLE:";
     121 "EXAMPLE:"; echo=2;
    120122 ring R=0,(x(1..4)),lp;
    121123 ideal i=x(2)*x(3);
     
    142144example
    143145{
    144  "EXAMPLE:";
     146 "EXAMPLE:"; echo=2;
    145147 ring r=0,(x,y,z),lp;
    146148 ideal i=xy;
     
    170172example
    171173{
    172  "EXAMPLE:";
     174 "EXAMPLE:"; echo=2;
    173175 ring r=0,(x,y,z),lp;
    174176 ideal i=xy;
     
    204206example
    205207{
    206  "EXAMPLE:";
     208 "EXAMPLE:"; echo=2;
    207209 ring R=0,(x(1..4)),lp;
    208210 ideal i=x(2)*x(3);
    209211 LinksDeformation L=makeLinks(i,x(4)^2,x(1)*x(0));
     212 L;
    210213}
    211214
     
    236239example
    237240{
    238  "EXAMPLE:";
     241 "EXAMPLE:";echo=2;
    239242 ring R=0,(x(1..4)),lp;
    240243 ideal i=x(1),x(2),x(3),x(4),x(1)*x(4),x(2)*x(4),x(1)*x(3),x(2)*x(3);
    241  FirstOrderDeformation phi=fPiece(i,x(4)^2,x(1)*x(0));
     244 FirstOrderDeformation phi=fPiece(i,x(4)^2,x(1)*x(2));
     245 phi;
    242246}
    243247
     
    267271example
    268272{
    269  "EXAMPLE:";
     273 "EXAMPLE:"; echo=2;
    270274 ring R=0,(x(1..4)),lp;
    271275 ideal i=x(1),x(2),x(3),x(4),x(1)*x(4),x(2)*x(4),x(1)*x(3),x(2)*x(3);
    272276 SecondOrderDeformation psi=sPiece(i,x(4)^2,x(1)*x(0));
     277 psi;
    273278}
    274279
     
    310315example
    311316{
    312  "EXAMPLE:";
     317 "EXAMPLE:"; echo=2;
    313318 ring R=0,(x(1..4)),lp;
    314319 ideal i=x(1),x(2),x(3),x(4),x(1)*x(4),x(2)*x(4),x(1)*x(3),x(2)*x(3);
    315320 list L=T1(i);
     321 L;
    316322}
    317323
     
    354360example
    355361{
    356  "EXAMPLE:";
     362 "EXAMPLE:"; echo=2;
    357363 ring R=0,(x(1..4)),lp;
    358364 ideal i=x(1),x(2),x(3),x(4),x(1)*x(4),x(2)*x(4),x(1)*x(3),x(2)*x(3);
    359365 list L=T2(i);
     366 L;
    360367}
    361368
     
    383390example
    384391{
    385  "EXAMPLE:";
     392 "EXAMPLE:"; echo=2;
    386393 ring R=0,(x(1..4)),lp;
    387394 ideal i=x(1),x(2),x(3),x(4),x(1)*x(4),x(2)*x(4),x(1)*x(3),x(2)*x(3);
    388395 LinksDeformation L=makeLinks(i,x(4)^2,x(1)*x(0));
     396 L;
    389397}
    390398
Note: See TracChangeset for help on using the changeset viewer.