Changeset 75f460 in git for Tst/Short/graphics.tst


Ignore:
Timestamp:
Dec 16, 2014, 3:43:21 PM (9 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38077648e7239f98078663eb941c3c979511150a')
Children:
fce947c9e6c3e8c6d5a622c7f6b0d724580993cc
Parents:
a2e4470c6e9a666de8ab7b706370c15e13092f76
Message:
format
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Tst/Short/graphics.tst

    ra2e447 r75f460  
    22LIB "graphics.lib";
    33
    4 tst_init(); 
     4tst_init();
    55
    66// test staircase
     
    88ring r0 = 0,(x,y),ls;
    99ideal I = -1x2y6-1x4y2, 7x6y5+1/2x7y4+6x4y6;
    10 staircase("",std(I)); 
     10staircase("",std(I));
    1111ring r1 = 0,(x,y),dp;
    1212ideal I = fetch(r0,I);
     
    2020
    2121// test mplot
    22 ring rr0 = 0,x1,dp; 
     22ring rr0 = 0,x1,dp;
    2323ideal I = x1^3 + x1, x1^2;
    2424ideal J = x1^2,-x1+x1^3; "";
     
    2626mplot("",I,"-2,2",J);
    2727
    28 ring rr1 = 0,x,dp; 
     28ring rr1 = 0,x,dp;
    2929ideal I(1) = 2x2-1/2x3 +1, x-1;
    30 ideal I(2) = x3-x ,x; 
     30ideal I(2) = x3-x ,x;
    3131mplot("",I(1),I(2),"-2,4");
    3232I(1) = x3,-1/10x3+x2,x2;
    33 I(2) = x2,-x2+2,-2x2-x+1; 
     33I(2) = x2,-x2+2,-2x2-x+1;
    3434mplot("",I(1),I(2));
    3535
    36 ring rr = 0,(x,y),ds; 
     36ring rr = 0,(x,y),ds;
    3737ideal I(1) = y,-x2;
    38 ideal I(2) = x2,-y2 +4; 
    39 ideal I(3) = x4+2x2y2 + y4, x2-y2; 
     38ideal I(2) = x2,-y2 +4;
     39ideal I(3) = x4+2x2y2 + y4, x2-y2;
    4040poly f = (x-y)*(x2+y);
    41 mplot("",f); 
     41mplot("",f);
    4242ideal J = jacob(f);
    43 J; 
    44 mplot("",J[1],J[2]); 
    45 mplot("",J[1],J[2],"-10,10","-10,10"); 
    46 mplot("",I(1),I(2),"-2.5,2.5"); 
     43J;
     44mplot("",J[1],J[2]);
     45mplot("",J[1],J[2],"-10,10","-10,10");
     46mplot("",I(1),I(2),"-2.5,2.5");
    4747mplot("",I(3),"-2,2");
    4848ideal J(1) = 3xy4 + 2xy2, x5y3 + x + y6,10x2;
    4949ideal J(2) = xy,y,x2; "";
    50 mplot("",J(1),"-2,1","1,2"); 
     50mplot("",J(1),"-2,1","1,2");
    5151mplot("",J(2),"-1.5,1.5","-2,2");
    5252
Note: See TracChangeset for help on using the changeset viewer.