@options; @figure; A = point(-0.73,0.95) {(-0.1,-0.8)}; M = point(0.38,3.38); N = point(3.45,-6.7); dMN =droite(M,N); P =pointsur(dMN,0.22); ceAP =cercle(A,P); R =intersection(dMN,ceAP,P); @config; figure=0,0,485,440,ouvert; script=495,34,251,421,ouvert; analyse=490,463,257,147,ferme; enonce=493,3,253,117,ferme; info=50,470,435,435; listetransfos=visible; boutons=point,pointsur,inter,projeteortho, segment,droite,demidroite,polygone,vecteur, droiteparallele,droiteperpendiculaire,mediatrice,bissectrice,droitev,tangente, cercle,cercledia,arc, symetrique,deftransfo,imagetransfo, mesure,texte,nombres,animation,lieu, supprimer,effacerbase,effacertout,renomme,posnom, zoomp,zoomm,zoomb,deplacement,repere,rapporteur, miseenforme,aide,exporter,configuration, escape;