input geometriesyr16; figure(0,0,8u,8u); pair A,B,C,D; A=u*(3,2); C-A=u*(0,4); B=pointarc(cercledia(A,C),200); D=u*(1,1); trace droite(A,B); trace droite(B,C); trace droite(C,A); trace droite(A,D); fin; end