mp-cows.mpiv /size: 13 Kb    last modification: 2020-07-01 14:35
1
%D \module
2
%D [ file=mp-cows.mpiv,
3
%D version=2015.05.27,
4
%D title=\CONTEXT\ \METAPOST\ graphics,
5
%D subtitle=the cow,
6
%D author=Hans Hagen,
7
%D date=\currentdate,
8
%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9
%C
10
%C This module is part of the \CONTEXT\ macro||package and is
11
%C therefore copyrighted by \PRAGMA. See licen-en.pdf for
12
%C details.
13 14
if
known
context_cows
:
endinput
;
fi
;
15 16
boolean
context_cows
;
context_cows
:
=
true
;
17 18
picture
cow
;
cow
:
=
image
(
19
fill
(
245.449005
,
600.340027
)
.
.
controls
(
242.781006
,
599.398010
)
and
(
239.621002
,
596.020020
)
..
(
237.671997
,
594.070007
)
20
.
.
controls
(
236.738007
,
584.421997
)
and
(
244.578003
,
583.629028
)
..
(
250.199005
,
577.440979
)
21
.
.
controls
(
258.769989
,
573.698975
)
and
(
251.210999
,
567.718994
)
..
(
256.179993
,
557.421997
)
22
.
.
controls
(
257.039001
,
550.940979
)
and
(
257.898010
,
543.890991
)
..
(
255.309006
,
539.781006
)
23
.
.
controls
(
249.479996
,
538.921997
)
and
(
247.968994
,
540.218994
)
..
(
246.891006
,
531.429993
)
24
.
.
controls
(
246.309006
,
526.968994
)
and
(
231.770004
,
529.059021
)
..
(
229.031006
,
538.270020
)
25
.
.
controls
(
227.089996
,
544.968994
)
and
(
221.328003
,
546.698975
)
..
(
217.800995
,
543.171997
)
26
.
.
controls
(
213.770004
,
538.059021
)
and
(
215.781006
,
531.218994
)
..
(
217.800995
,
527.468994
)
27
.
.
controls
(
224.929993
,
517.320007
)
and
(
212.039001
,
511.421997
)
..
(
205.128998
,
516.737976
)
28
.
.
controls
(
199.729996
,
508.679993
)
and
(
211.391006
,
500.039001
)
..
(
207.429993
,
494.500000
)
29
.
.
controls
(
205.781006
,
493.988007
)
and
(
204.770004
,
489.171997
)
..
(
185.468994
,
500.539001
)
30
.
.
controls
(
180.358994
,
504.140991
)
and
(
167.828003
,
500.761993
)
..
(
168.770004
,
520.629028
)
31
.
.
controls
(
168.770004
,
525.820007
)
and
(
165.602005
,
543.531006
)
..
(
162.141006
,
555.909973
)
32
.
.
controls
(
159.410004
,
561.237976
)
and
(
156.738007
,
559.078003
)
..
(
156.891006
,
553.898010
)
33
.
.
controls
(
157.179993
,
547.851990
)
and
(
162.940994
,
531.218994
)
..
(
155.520004
,
540.218994
)
34
.
.
controls
(
153.578003
,
539.210999
)
and
(
156.891006
,
523.578003
)
..
(
156.891006
,
521.640991
)
35
.
.
controls
(
162.000000
,
517.031006
)
and
(
157.391006
,
513.578003
)
..
(
154.729996
,
512.281006
)
36
.
.
controls
(
151.270004
,
518.328003
)
and
(
149.621002
,
518.039001
)
..
(
147.171997
,
514.440979
)
37
.
.
controls
(
141.699005
,
514.078003
)
and
(
144.578003
,
528.190979
)
..
(
140.261993
,
528.620972
)
38
.
.
controls
(
137.020004
,
527.762024
)
and
(
139.179993
,
520.059021
)
..
(
138.238007
,
518.762024
)
39
.
.
controls
(
132.979996
,
524.737976
)
and
(
130.897995
,
529.270020
)
..
(
127.012001
,
521.640991
)
40
.
.
controls
(
126.140999
,
521.640991
)
and
(
122.109001
,
519.190979
)
..
(
120.960999
,
526.539001
)
41
.
.
controls
(
117.648003
,
552.737976
)
and
(
107.058998
,
558.359009
)
..
(
93.820297
,
565.129028
)
42
.
.
controls
(
92.019501
,
565.629028
)
and
(
84.238297
,
566.710999
)
..
(
79.339798
,
568.148010
)
43
.
.
controls
(
73.511703
,
560.879028
)
and
(
58.320301
,
565.629028
)
..
(
56.230499
,
570.309021
)
44
.
.
controls
(
54.789101
,
572.690979
)
and
(
54.648399
,
575.210999
)
..
(
54.789101
,
576.500000
)
45
.
.
controls
(
52.339802
,
580.101990
)
and
(
55.871101
,
582.698975
)
..
(
59.621101
,
583.059021
)
46
.
.
controls
(
62.859402
,
587.159973
)
and
(
68.539101
,
594.940979
)
..
(
71.281303
,
601.559021
)
47
.
.
controls
(
72.289101
,
603.070007
)
and
(
74.949203
,
609.340027
)
..
(
78.191399
,
609.551025
)
48
.
.
controls
(
74.949203
,
612.940979
)
and
(
74.300797
,
622.512024
)
..
(
82.660202
,
617.328003
)
49
.
.
controls
(
87.121101
,
624.020020
)
and
(
92.089798
,
624.309021
)
..
(
95.761703
,
615.820007
)
50
.
.
controls
(
102.890999
,
615.379028
)
and
(
102.308998
,
608.690979
)
..
(
115.780998
,
605.520020
)
51
.
.
controls
(
122.762001
,
602.859009
)
and
(
132.770004
,
604.578003
)
..
(
140.261993
,
603.718994
)
52
.
.
controls
(
136.218994
,
596.879028
)
and
(
127.441002
,
566.859009
)
..
(
132.979996
,
559.801025
)
53
.
.
controls
(
140.761993
,
564.698975
)
and
(
141.839996
,
605.379028
)
..
(
157.031006
,
595.659973
)
54
.
.
controls
(
160.559006
,
593.929993
)
and
(
159.910004
,
590.039001
)
..
(
164.089996
,
590.179993
)
55
.
.
controls
(
170.421997
,
587.448975
)
and
(
169.128998
,
600.770020
)
..
(
172.511993
,
600.770020
)
56
.
.
controls
(
176.468994
,
599.762024
)
and
(
183.020004
,
599.039001
)
..
(
186.979996
,
599.539001
)
57
.
.
controls
(
197.710999
,
600.770020
)
and
(
206.929993
,
604.078003
)
..
(
223.921997
,
602.500000
)
58
.
.
controls
(
231.121002
,
601.781006
)
and
(
238.250000
,
601.059021
)
..
(
245.449005
,
600.340027
)
59
-
-
cycle
;
60
fill
(
305.281006
,
560.948975
)
.
.
controls
(
304.628998
,
560.948975
)
and
(
299.949005
,
561.237976
)
..
(
299.378998
,
561.237976
)
61
.
.
controls
(
302.398010
,
550.440979
)
and
(
303.980011
,
536.468994
)
..
(
304.199005
,
525.309021
)
62
.
.
controls
(
303.699005
,
521.351990
)
and
(
299.808990
,
517.460999
)
..
(
299.378998
,
525.671997
)
63
.
.
controls
(
295.851990
,
530.859009
)
and
(
296.421997
,
540.070007
)
..
(
293.398010
,
540.289001
)
64
.
.
controls
(
287.351990
,
539.640991
)
and
(
285.339996
,
513.218994
)
..
(
280.011993
,
509.328003
)
65
.
.
controls
(
276.261993
,
512.281006
)
and
(
280.730011
,
524.020020
)
..
(
275.539001
,
524.737976
)
66
.
.
controls
(
270.500000
,
524.020020
)
and
(
264.308990
,
526.679993
)
..
(
266.691010
,
534.460999
)
67
.
.
controls
(
270.289001
,
543.020020
)
and
(
268.339996
,
554.762024
)
..
(
266.539001
,
561.601990
)
68
.
.
controls
(
262.371002
,
578.590027
)
and
(
264.019989
,
587.090027
)
..
(
271.578003
,
596.090027
)
69
--
(
267.480011
,
604.512024
)
.
.
controls
(
275.398010
,
608.262024
)
and
(
285.621002
,
604.578003
)
..
(
290.019989
,
602.210999
)
70
.
.
controls
(
294.621002
,
600.262024
)
and
(
300.238007
,
595.940979
)
..
(
301.101990
,
587.379028
)
71
.
.
controls
(
303.339996
,
578.879028
)
and
(
304.421997
,
569.737976
)
..
(
305.281006
,
560.948975
)
72
-
-
cycle
;
73
pickup
pencircle
scaled
2.000000
bp
;
74
draw
(
84.378899
,
618.551025
)
.
.
controls
(
88.339798
,
624.379028
)
and
(
92.589798
,
622.940979
)
..
(
96.339798
,
615.671997
)
75
.
.
controls
(
101.230003
,
615.601990
)
and
(
102.460999
,
612.429993
)
..
(
104.980003
,
610.781006
)
76
.
.
controls
(
122.621002
,
598.390991
)
and
(
147.460999
,
607.179993
)
..
(
167.897995
,
601.921997
)
77
.
.
controls
(
180.940994
,
598.539001
)
and
(
190.871002
,
599.762024
)
..
(
200.089996
,
602.059021
)
78
.
.
controls
(
220.320007
,
607.250000
)
and
(
246.102005
,
596.159973
)
..
(
263.738007
,
603.859009
)
79
.
.
controls
(
274.750000
,
608.620972
)
and
(
284.761993
,
605.659973
)
..
(
292.968994
,
600.909973
)
80
.
.
controls
(
297.578003
,
597.960999
)
and
(
299.589996
,
596.090027
)
..
(
300.960999
,
591.262024
)
81
.
.
controls
(
306.289001
,
572.539001
)
and
(
306.289001
,
551.020020
)
..
(
309.531006
,
530.570007
)
82
.
.
controls
(
309.531006
,
528.840027
)
and
(
312.191010
,
526.101990
)
..
(
312.480011
,
522.070007
)
83
.
.
controls
(
315.789001
,
511.339996
)
and
(
316.078003
,
510.121002
)
..
(
317.160004
,
502.199005
)
84
.
.
controls
(
317.160004
,
501.339996
)
and
(
326.519989
,
488.449005
)
..
(
325.011993
,
479.019989
)
85
.
.
controls
(
323.929993
,
481.250000
)
and
(
323.859009
,
482.828003
)
..
(
321.621002
,
481.679993
)
86
.
.
controls
(
320.328003
,
479.300995
)
and
(
320.898010
,
473.898010
)
..
(
322.558990
,
471.738007
)
87
.
.
controls
(
320.828003
,
470.808990
)
and
(
318.460999
,
473.468994
)
..
(
317.519989
,
475.199005
)
88
.
.
controls
(
318.171997
,
473.039001
)
and
(
317.808990
,
470.808990
)
..
(
316.730011
,
469.300995
)
89
.
.
controls
(
315.859009
,
472.250000
)
and
(
316.578003
,
473.179993
)
..
(
315.359009
,
473.898010
)
90
.
.
controls
(
313.988007
,
472.898010
)
and
(
314.210999
,
469.300995
)
..
(
314.281006
,
466.199005
)
91
.
.
controls
(
313.488007
,
468.070007
)
and
(
311.468994
,
472.460999
)
..
(
312.550995
,
476.421997
)
92
.
.
controls
(
312.480011
,
484.199005
)
and
(
308.808990
,
489.101990
)
..
(
310.320007
,
499.101990
)
93
.
.
controls
(
310.101990
,
504.429993
)
and
(
307.300995
,
521.059021
)
..
(
304.558990
,
524.301025
)
94
.
.
controls
(
303.121002
,
526.250000
)
and
(
306.359009
,
510.769989
)
..
(
306.359009
,
506.160004
)
95
.
.
controls
(
306.648010
,
500.898010
)
and
(
307.078003
,
468.718994
)
..
(
306.429993
,
463.101990
)
96
.
.
controls
(
306.429993
,
459.218994
)
and
(
306.218994
,
453.960999
)
..
(
307.078003
,
452.160004
)
97
.
.
controls
(
308.738007
,
450.789001
)
and
(
309.378998
,
450.500000
)
..
(
309.601990
,
447.980011
)
98
.
.
controls
(
309.238007
,
446.621002
)
and
(
308.738007
,
446.039001
)
..
(
307.730011
,
445.539001
)
99
.
.
controls
(
306.070007
,
444.601990
)
and
(
307.371002
,
441.789001
)
..
(
306.070007
,
439.851990
)
100
.
.
controls
(
304.488007
,
438.769989
)
and
(
304.128998
,
441.859009
)
..
(
303.339996
,
441.859009
)
101
.
.
controls
(
302.691010
,
441.000000
)
and
(
303.050995
,
437.980011
)
..
(
302.468994
,
436.179993
)
102
.
.
controls
(
299.660004
,
433.800995
)
and
(
292.179993
,
432.500000
)
..
(
289.148010
,
434.660004
)
103
.
.
controls
(
289.730011
,
440.640991
)
and
(
291.738007
,
441.578003
)
..
(
295.628998
,
446.621002
)
104
.
.
controls
(
298.660004
,
452.589996
)
and
(
297.000000
,
460.941010
)
..
(
296.929993
,
468.140991
)
105
.
.
controls
(
295.488007
,
480.378998
)
and
(
289.218994
,
487.300995
)
..
(
289.441010
,
496.441010
)
106
.
.
controls
(
287.859009
,
495.718994
)
and
(
286.421997
,
494.570007
)
..
(
284.261993
,
494.859009
)
107
.
.
controls
(
283.390991
,
489.460999
)
and
(
286.421997
,
484.558990
)
..
(
284.828003
,
480.820007
)
108
.
.
controls
(
281.949005
,
471.960999
)
and
(
277.058990
,
446.621002
)
..
(
279.000000
,
437.761993
)
109
.
.
controls
(
280.011993
,
434.738007
)
and
(
278.210999
,
433.148010
)
..
(
277.058990
,
433.941010
)
110
.
.
controls
(
276.769989
,
433.941010
)
and
(
276.550995
,
433.941010
)
..
(
276.410004
,
433.941010
)
111
.
.
controls
(
276.410004
,
433.941010
)
and
(
276.550995
,
431.421997
)
..
(
275.691010
,
430.921997
)
112
.
.
controls
(
274.101990
,
430.339996
)
and
(
273.671997
,
431.710999
)
..
(
272.660004
,
432.140991
)
113
.
.
controls
(
271.218994
,
430.851990
)
and
(
272.519989
,
429.480011
)
..
(
271.148010
,
428.039001
)
114
.
.
controls
(
267.191010
,
428.039001
)
and
(
261.359009
,
425.378998
)
..
(
257.980011
,
428.261993
)
115
.
.
controls
(
257.328003
,
434.160004
)
and
(
263.300995
,
436.679993
)
..
(
266.468994
,
440.710999
)
116
.
.
controls
(
268.628998
,
446.621002
)
and
(
271.078003
,
462.890991
)
..
(
267.769989
,
474.621002
)
117
.
.
controls
(
267.769989
,
475.558990
)
and
(
264.378998
,
485.281006
)
..
(
261.429993
,
488.660004
)
118
.
.
controls
(
258.699005
,
487.660004
)
and
(
257.328003
,
485.500000
)
..
(
253.218994
,
486.289001
)
119
.
.
controls
(
252.578003
,
484.339996
)
and
(
253.300995
,
482.328003
)
..
(
252.218994
,
480.101990
)
120
.
.
controls
(
251.858994
,
479.519989
)
and
(
249.339996
,
478.578003
)
..
(
249.190994
,
481.390991
)
121
.
.
controls
(
248.979996
,
483.050995
)
and
(
248.897995
,
486.359009
)
..
(
248.261993
,
486.718994
)
122
.
.
controls
(
243.647995
,
486.718994
)
and
(
233.710999
,
487.078003
)
..
(
231.770004
,
493.921997
)
123
.
.
controls
(
219.891006
,
492.339996
)
and
(
215.929993
,
491.261993
)
..
(
206.570007
,
493.421997
)
124
.
.
controls
(
196.628998
,
489.671997
)
and
(
183.238007
,
506.160004
)
..
(
174.531006
,
502.199005
)
125
.
.
controls
(
172.511993
,
496.148010
)
and
(
173.089996
,
485.640991
)
..
(
171.647995
,
481.390991
)
126
.
.
controls
(
169.339996
,
474.769989
)
and
(
171.141006
,
467.140991
)
..
(
171.141006
,
456.410004
)
127
.
.
controls
(
170.570007
,
455.398010
)
and
(
169.852005
,
454.460999
)
..
(
168.479996
,
454.460999
)
128
.
.
controls
(
168.479996
,
453.101990
)
and
(
169.339996
,
450.859009
)
..
(
168.621002
,
449.421997
)
129
.
.
controls
(
167.179993
,
447.621002
)
and
(
165.891006
,
451.800995
)
..
(
165.020004
,
444.601990
)
130
.
.
controls
(
163.147995
,
443.738007
)
and
(
157.750000
,
442.218994
)
..
(
155.589996
,
445.179993
)
131
.
.
controls
(
155.878998
,
448.988007
)
and
(
158.328003
,
451.300995
)
..
(
160.128998
,
453.378998
)
132
.
.
controls
(
161.421997
,
456.910004
)
and
(
160.988007
,
458.281006
)
..
(
160.699005
,
461.808990
)
133
.
.
controls
(
160.988007
,
464.980011
)
and
(
161.710999
,
468.578003
)
..
(
161.858994
,
470.089996
)
134
.
.
controls
(
161.858994
,
473.039001
)
and
(
162.500000
,
479.300995
)
..
(
161.141006
,
481.179993
)
135
--
(
159.410004
,
482.691010
)
.
.
controls
(
157.179993
,
487.218994
)
and
(
158.328003
,
494.640991
)
..
(
157.608994
,
500.261993
)
136
.
.
controls
(
155.809006
,
500.691010
)
and
(
155.809006
,
500.980011
)
..
(
154.011993
,
498.308990
)
137
.
.
controls
(
154.011993
,
494.421997
)
and
(
153.500000
,
486.359009
)
..
(
152.352005
,
483.839996
)
138
.
.
controls
(
149.690994
,
479.808990
)
and
(
150.839996
,
459.648010
)
..
(
151.421997
,
448.558990
)
139
.
.
controls
(
151.781006
,
446.468994
)
and
(
149.690994
,
447.699005
)
..
(
149.761993
,
444.738007
)
140
.
.
controls
(
150.050995
,
442.800995
)
and
(
147.891006
,
443.589996
)
..
(
146.089996
,
444.601990
)
141
.
.
controls
(
145.147995
,
445.179993
)
and
(
146.589996
,
439.781006
)
..
(
145.371002
,
439.558990
)
142
.
.
controls
(
142.339996
,
438.839996
)
and
(
136.871002
,
438.191010
)
..
(
135.218994
,
440.710999
)
143
.
.
controls
(
134.570007
,
444.601990
)
and
(
137.878998
,
448.058990
)
..
(
140.621002
,
451.011993
)
144
.
.
controls
(
143.141006
,
455.828003
)
and
(
140.897995
,
465.699005
)
..
(
140.468994
,
476.281006
)
145
--
(
138.891006
,
478.218994
)
.
.
controls
(
134.858994
,
483.191010
)
and
(
139.608994
,
496.941010
)
..
(
136.511993
,
506.230011
)
146
.
.
controls
(
120.019997
,
514.870972
)
and
(
122.109001
,
519.190979
)
..
(
118.730003
,
537.620972
)
147
.
.
controls
(
115.128998
,
557.640991
)
and
(
93.378899
,
567.648010
)
..
(
79.058601
,
567.648010
)
148
.
.
controls
(
73.441399
,
563.039001
)
and
(
66.238297
,
563.620972
)
..
(
58.539101
,
567.648010
)
149
.
.
controls
(
55.660198
,
569.229980
)
and
(
54.429699
,
573.190979
)
..
(
54.500000
,
576.500000
)
150
.
.
controls
(
52.628899
,
580.750000
)
and
(
55.218800
,
582.190979
)
..
(
59.621101
,
583.487976
)
151
.
.
controls
(
62.710899
,
587.809021
)
and
(
68.621101
,
594.648010
)
..
(
69.191399
,
597.737976
)
152
.
.
controls
(
70.339798
,
601.921997
)
and
(
75.531303
,
608.109009
)
..
(
77.761703
,
609.770020
)
153
.
.
controls
(
75.820297
,
613.012024
)
and
(
74.808601
,
615.171997
)
..
(
77.109398
,
618.551025
)
154
.
.
controls
(
79.558601
,
620.140991
)
and
(
81.789101
,
616.609009
)
..
(
84.378899
,
618.551025
)
155
-
-
cycle
;
156
)
;
157