summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/asymptote/examples/Pythagoras.asy
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/asymptote/examples/Pythagoras.asy')
-rw-r--r--Master/texmf-dist/doc/asymptote/examples/Pythagoras.asy22
1 files changed, 22 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/asymptote/examples/Pythagoras.asy b/Master/texmf-dist/doc/asymptote/examples/Pythagoras.asy
new file mode 100644
index 00000000000..f4ea68fe432
--- /dev/null
+++ b/Master/texmf-dist/doc/asymptote/examples/Pythagoras.asy
@@ -0,0 +1,22 @@
+size(0,150);
+import geometry;
+
+real a=3;
+real b=4;
+real c=hypot(a,b);
+
+pair z1=(0,b);
+pair z2=(a,0);
+pair z3=(a+b,0);
+perpendicular(z1,NE,z1--z2,blue);
+perpendicular(z3,NW,blue);
+draw(square((0,0),z3));
+draw(square(z1,z2));
+
+real d=0.3;
+pair v=unit(z2-z1);
+draw(baseline("$a$"),-d*I--z2-d*I,red,Bars,Arrows,PenMargins);
+draw(baseline("$b$"),z2-d*I--z3-d*I,red,Arrows,Bars,PenMargins);
+draw("$c$",z3+z2*I-d*v--z2-d*v,red,Arrows,PenMargins);
+draw("$a$",z3+d--z3+z2*I+d,red,Arrows,Bars,PenMargins);
+draw("$b$",z3+z2*I+d--z3+z3*I+d,red,Arrows,Bars,PenMargins);