summaryrefslogtreecommitdiff
path: root/graphics/metapost/contrib/macros/truchet/example.3
blob: d45822df3ab2c3e7a7b46ded1f9335b728e491a5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
%!PS
%%BoundingBox: -3 -3 117 173 
%%Creator: MetaPost
%%CreationDate: 1995.07.20:0132
%%Pages: 1
%%EndProlog
%%Page: 1 1
 0 2.83466 dtransform truncate idtransform setlinewidth pop [] 0 setdash
 1 setlinejoin 10 setmiterlimit
newpath -1.41733 -1.41733 moveto
-1.41733 171.49603 lineto
114.80313 171.49603 lineto
114.80313 -1.41733 lineto
 closepath stroke
 2.83466 0 dtransform exch truncate exch idtransform pop setlinewidth
 1 setlinecap
newpath 56.6929 0 moveto
56.6929 170.0787 lineto stroke
 0 2.83466 dtransform truncate idtransform setlinewidth pop
newpath 0 56.6929 moveto
113.3858 56.6929 lineto stroke
newpath 0 113.3858 moveto
113.3858 113.3858 lineto stroke
 1 setgray
newpath 28.34645 56.6929 moveto
28.34645 41.03783 41.03783 28.34645 56.6929 28.34645 curveto
56.6929 56.6929 lineto
 closepath fill
 0 setgray
newpath 28.34645 0 moveto
28.34645 15.65508 15.65508 28.34645 0 28.34645 curveto
0 56.6929 lineto
28.34645 56.6929 lineto
28.34645 41.03783 41.03783 28.34645 56.6929 28.34645 curveto
56.6929 0 lineto
 closepath fill
 1 setgray
newpath 28.34645 0 moveto
28.34645 15.65508 15.65508 28.34645 0 28.34645 curveto
0 0 lineto
 closepath fill
newpath 0 85.03935 moveto
15.65508 85.03935 28.34645 97.73073 28.34645 113.3858 curveto
0 113.3858 lineto
 closepath fill
 0 setgray
newpath 0 85.03935 moveto
15.65508 85.03935 28.34645 97.73073 28.34645 113.3858 curveto
56.6929 113.3858 lineto
56.6929 85.03935 lineto
41.03783 85.03935 28.34645 72.34798 28.34645 56.6929 curveto
0 56.6929 lineto
 closepath fill
 1 setgray
newpath 56.6929 85.03935 moveto
41.03783 85.03935 28.34645 72.34798 28.34645 56.6929 curveto
56.6929 56.6929 lineto
 closepath fill
newpath 28.34645 170.0787 moveto
28.34645 154.42363 41.03783 141.73225 56.6929 141.73225 curveto
56.6929 170.0787 lineto
 closepath fill
 0 setgray
newpath 28.34645 113.3858 moveto
28.34645 129.04088 15.65508 141.73225 0 141.73225 curveto
0 170.0787 lineto
28.34645 170.0787 lineto
28.34645 154.42363 41.03783 141.73225 56.6929 141.73225 curveto
56.6929 113.3858 lineto
 closepath fill
 1 setgray
newpath 28.34645 113.3858 moveto
28.34645 129.04088 15.65508 141.73225 0 141.73225 curveto
0 113.3858 lineto
 closepath fill
 0 setgray
newpath 85.03935 56.6929 moveto
85.03935 41.03783 97.73073 28.34645 113.3858 28.34645 curveto
113.3858 56.6929 lineto
 closepath fill
 1 setgray
newpath 85.03935 0 moveto
85.03935 15.65508 72.34798 28.34645 56.6929 28.34645 curveto
56.6929 56.6929 lineto
85.03935 56.6929 lineto
85.03935 41.03783 97.73073 28.34645 113.3858 28.34645 curveto
113.3858 0 lineto
 closepath fill
 0 setgray
newpath 85.03935 0 moveto
85.03935 15.65508 72.34798 28.34645 56.6929 28.34645 curveto
56.6929 0 lineto
 closepath fill
newpath 56.6929 85.03935 moveto
72.34798 85.03935 85.03935 97.73073 85.03935 113.3858 curveto
56.6929 113.3858 lineto
 closepath fill
 1 setgray
newpath 56.6929 85.03935 moveto
72.34798 85.03935 85.03935 97.73073 85.03935 113.3858 curveto
113.3858 113.3858 lineto
113.3858 85.03935 lineto
97.73073 85.03935 85.03935 72.34798 85.03935 56.6929 curveto
56.6929 56.6929 lineto
 closepath fill
 0 setgray
newpath 113.3858 85.03935 moveto
97.73073 85.03935 85.03935 72.34798 85.03935 56.6929 curveto
113.3858 56.6929 lineto
 closepath fill
 1 setgray
newpath 56.6929 141.73225 moveto
72.34798 141.73225 85.03935 154.42363 85.03935 170.0787 curveto
56.6929 170.0787 lineto
 closepath fill
 0 setgray
newpath 56.6929 141.73225 moveto
72.34798 141.73225 85.03935 154.42363 85.03935 170.0787 curveto
113.3858 170.0787 lineto
113.3858 141.73225 lineto
97.73073 141.73225 85.03935 129.04088 85.03935 113.3858 curveto
56.6929 113.3858 lineto
 closepath fill
 1 setgray
newpath 113.3858 141.73225 moveto
97.73073 141.73225 85.03935 129.04088 85.03935 113.3858 curveto
113.3858 113.3858 lineto
 closepath fill
showpage
%%EOF