-
Notifications
You must be signed in to change notification settings - Fork 7
/
Copy pathlt3marmot.tex
156 lines (139 loc) · 3.41 KB
/
lt3marmot.tex
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
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
% !TeX program = arara -p generate_examples % | txs:///view-log | txs:///view-pdf "?am).pdf"
\documentclass{standalone}
\usepackage[pdftex]{xcolor}
\usepackage{l3draw}
\begin{document}
\ExplSyntaxOn
\draw_begin:
\color_set:nnn {brown} {rgb} {0.75,0.50,0.25}
% feet
\draw_path_ellipse:nnn
{ -0.255cm, 0.2cm }
{ 0.23cm , 0cm }
{ 0cm , 0.09cm }
\draw_path_ellipse:nnn
{ 0.255cm, 0.2cm }
{ 0.23cm , 0cm }
{ 0cm , 0.09cm }
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { fill }
% ears
\draw_path_ellipse:nnn
{ -0.255cm, 2.03cm }
{ 0.09cm , 0cm }
{ 0cm , 0.13cm }
\draw_path_ellipse:nnn
{ 0.255cm, 2.03cm }
{ 0.09cm , 0cm }
{ 0cm , 0.13cm }
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { fill }
% Tail
\draw_path_moveto:n
{0.8856cm, 0.6504cm}
\draw_path_curveto:nnn
{0.8656cm, 0.3803cm}
{0.0267cm, 0.2202cm}
{0.0167cm, 0.4203cm}
\draw_path_curveto:nnn
{-0.0033cm, 0.5404cm}
{0.1104cm, 0.4397cm}
{0.3951cm, 0.4803cm}
\draw_path_curveto:nnn
{0.6557cm, 0.5175cm}
{0.8856cm, 0.7005cm}
{0.8856cm, 0.6504cm}
\draw_path_close:
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { fill }
% Body
\draw_path_moveto:n
{0.595cm, 0.92cm}
\draw_path_curveto:nnn
{0.595cm, 0.26cm}
{0.355cm, 0.18cm}
{0cm, 0.18cm}
\draw_path_curveto:nnn
{-0.355cm, 0.18cm}
{-0.595cm, 0.26cm}
{-0.595cm, 0.92cm}
\draw_path_curveto:nnn
{-0.605cm, 1.58cm}
{-0.335cm, 2.11cm}
{0cm, 2.11cm}
\draw_path_curveto:nnn
{0.335cm, 2.11cm}
{0.605cm, 1.58cm}
{0.595cm, 0.92cm}
\draw_path_close:
\color_fill:n { brown }
\draw_path_use_clear:n { fill }
% Belly
\draw_path_moveto:n
{0.425cm, 0.71cm}
\draw_path_curveto:nnn
{0.425cm, 0.41cm}
{0.245cm, 0.37cm}
{0cm, 0.37cm}
\draw_path_curveto:nnn
{-0.245cm, 0.37cm}
{-0.425cm, 0.41cm}
{-0.425cm, 0.71cm}
\draw_path_curveto:nnn
{-0.425cm, 1.01cm}
{-0.225cm, 1.26cm}
{0cm, 1.26cm}
\draw_path_curveto:nnn
{0.225cm, 1.26cm}
{0.425cm, 1.01cm}
{0.425cm, 0.71cm}
\draw_path_close:
\color_fill:n { brown!50!white }
\draw_path_use_clear:n { fill }
% left arm
\draw_path_ellipse:nnn
{ -0.385cm,0.93cm }
{ 0.082cm , -0.226cm } % rx = (x' cos a , x' sin a)
{ 0.122cm , 0.044cm } % ry = (-y' sin a, y' cos a)
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { fill }
% right arm
\draw_path_ellipse:nnn
{ 0.385cm,0.93cm }
{ -0.082cm , -0.226cm } % rx = (x' cos a , x' sin a)
{ -0.122cm , 0.044cm } % ry = (-y' sin a, y' cos a)
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { fill }
% Muzzle
\draw_path_ellipse:nnn
{ 0cm, 1.47cm }
{ 0.23cm , 0cm }
{ 0cm , 0.13cm }
\color_fill:n { brown!50!white }
\draw_path_use_clear:n { fill }
% Nose
\draw_path_circle:nn
{0cm,1.6cm}
{0.08cm}
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { fill }
% eyes
\draw_path_circle:nn
{-0.155cm,1.77cm}
{0.05cm}
\draw_path_circle:nn
{0.155cm,1.77cm}
{0.05cm}
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { fill }
% mouth
\draw_path_moveto:n
{ 0.145cm , 1.51cm }
\draw_path_curveto:nn
{ 0cm , 1.3cm }
{ -0.145cm , 1.51cm }
\color_fill:n { brown!50!black }
\draw_path_use_clear:n { stroke }
\draw_end:
\ExplSyntaxOff
\end{document}