import base_pi; size(8cm,0); path cle=yscale(3)*((0,0){N}..(1,0){N}..cycle); draw(cle); real x=.75; /**/ real[] it=intersectsv(cle,x); draw(subpath(cle,it[0],it[1]), 1mm+blue); dot(intersectionpointsv(cle,x),red); drawline((x,0),(x,1));