04 Nov 2007

Unofficial package base_pi.asy – fig0150

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

path cle=yscale(3)*((0,0){N}..(1,0){N}..cycle);
draw(cle);

real x=.75;
/* View the definition of real[] intersectsv(path,real) */
real[] it=intersectsv(cle,x);
draw(subpath(cle,it[0],it[1]), 1mm+blue);
dot(intersectionpointsv(cle,x),red);
drawline((x,0),(x,1));

Étiquettes :