summaryrefslogtreecommitdiff
path: root/macros/jptex/generic/uptex-base/samples/area-jis.mp
diff options
context:
space:
mode:
Diffstat (limited to 'macros/jptex/generic/uptex-base/samples/area-jis.mp')
-rw-r--r--macros/jptex/generic/uptex-base/samples/area-jis.mp20
1 files changed, 20 insertions, 0 deletions
diff --git a/macros/jptex/generic/uptex-base/samples/area-jis.mp b/macros/jptex/generic/uptex-base/samples/area-jis.mp
new file mode 100644
index 0000000000..b058f02ffa
--- /dev/null
+++ b/macros/jptex/generic/uptex-base/samples/area-jis.mp
@@ -0,0 +1,20 @@
+verbatimtex
+%&platex-jis
+\documentclass{jarticle}
+\begin{document}
+etex;
+beginfig(1);
+u=40;
+v=40;
+r=30;
+draw (u+r,v)..(u,v+r)..(u-r,v)..(u,v-r)..cycle withcolor red;
+label(btex $B!}#1&A9b5H!#(B etex, (u,v));
+u:=u+46;
+draw (u+r,v)..(u,v+r)..(u-r,v)..(u,v-r)..cycle withcolor blue;
+label(btex \tate $B!}#1&A9b5H!#(B etex, (u,v));
+u:=u-23;
+v:=v+40;
+draw (u+r,v)..(u,v+r)..(u-r,v)..(u,v-r)..cycle withcolor green;
+label(btex $BLL@Q$O(B $\pi r^2$ etex, (u,v));
+endfig;
+end.