Esperanto: laŭ la licenco de la fontkodo, kiun aŭtoris Damian Yerrick, la kodo

fasthypot :=
 unapply(piecewise(abs(dx)>abs(dy),
 abs(dx)*0.941246+abs(dy)*0.41,
 abs(dy)*0.941246+abs(dx)*0.41),
 dx, dy):
hypot := unapply(rad(x^2+y^2), x, y):
 plots[display](
 plots[implicitplot](fasthypot(x,y) > 1,
 x=-1.1..1.1,
 y=-1.1..1.1,
 numpoints=4000),
 plottools[circle]([0,0], 1),
 scaling=constrained,thickness=2
);

prezentiĝas en la artikolo eŭklida distanco. La grafika vidigo de la kodo ne havas kaj ne povas havi personan aŭtoron.

Noto: Kvankam ĝi samforme ekde 2002 ekzistis en la angla vikipedio kaj tie en 2007 estis forigita sendiskute per procedo de "rapida forigo", pro "manko de fonta informo", tiel ke nun ne plu konatas la origina anglalingva alŝutanto, la decido de la angla vikipedio ŝajnas erara kaj tial ne sendiskute kopienda ĉi-tie (Vikipedio:Regularo pri tuja forigado, ero D4).