04 Nov 2007

Unofficial package base_pi.asy – fig0120

Figure 0003
(Compiled with Asymptote version 2.14svn-r5318)
    
import base_pi;
import stats;
size(8cm,0);

path cle=randompath(6);
draw(cle);
real x=.75;

/* View the definition of pair[] intersectionpointsv(path,real) */
pair[] pta = intersectionpointsv(cle,x);
draw(pta[0]--pta[pta.length-1]);
dot(pta,red);

real y=0;
/* View the definition of pair[] intersectionpointsh(path,real) */
pair[] ptb = intersectionpointsh(cle,y);
draw(ptb[0]--ptb[ptb.length-1]);
dot(ptb,blue);

Étiquettes :