% --- 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) "Dalign(bot)", "hideleaves(true)"; newTree.vegetables(v)(d,e) "Ralign(center)", "hideleaves(true)", "treemode(R)"; newTree.food(fo)(fruits,vegetables) "hbsep(1cm)"; scaleObj(food,.7); food.c=origin;drawObj(food); endfig; end;