summaryrefslogtreecommitdiff
path: root/info/examples/lgc2/4-1-10.mp
blob: 506e5551874c84daab04dc1d9f42de114b341fc7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
% --- start of displayed preamble in the book ---
input hatching;
% --- end of displayed preamble in the book ---
% graphic converted to gray in book using 'color2gray'
defaultfont:="ptmr8r";
warningcheck:=0;
beginfig(1)
path p;
p:=unitsquare xscaled 30mm yscaled 15mm;
hatchfill p withcolor red
            withcolor (45,2mm,-.5bp)
            withcolor (-45,2mm,-.5bp);
endfig;
end;