summaryrefslogtreecommitdiff
path: root/info/examples/lgc2/3-5-69.mp
diff options
context:
space:
mode:
Diffstat (limited to 'info/examples/lgc2/3-5-69.mp')
-rw-r--r--info/examples/lgc2/3-5-69.mp27
1 files changed, 27 insertions, 0 deletions
diff --git a/info/examples/lgc2/3-5-69.mp b/info/examples/lgc2/3-5-69.mp
new file mode 100644
index 0000000000..36d2129310
--- /dev/null
+++ b/info/examples/lgc2/3-5-69.mp
@@ -0,0 +1,27 @@
+% --- start of displayed preamble in the book ---
+input metaobj
+% Boxes as previously defined
+% --- end of displayed preamble in the book ---
+
+newBox.a(btex apples\strut etex);
+newBox.b(btex oranges\strut etex);
+newBox.c(btex bananas\strut etex);
+newBox.d(btex potatoes\strut etex);
+newBox.e(btex peas\strut etex);
+newBox.f(btex fruits\strut etex);
+newBox.v(btex vegetables\strut etex);
+newBox.fo(btex food\strut etex);
+
+defaultfont:="ptmr8r";
+warningcheck:=0;
+beginfig(1)
+newTree.fruits(f)(a,b,c)
+ "Ualign(bot)", "treemode(U)";
+newTree.vegetables(v)(d,e)
+ "Ualign(center)", "treemode(U)";
+newTree.food(fo)(fruits,vegetables)
+ "hsep(1cm)", "treemode(U)";
+scaleObj(food,.7);
+food.c=origin;drawObj(food);
+endfig;
+end;