: if d == (- 0.238, - 0.508) rel (a, b)
, c == (- 0.238, 0.508) rel (a, b)
| T
-> fill (c, a), (a, d), (d, b), (b, c) fi

: if e == (0.893, 0.) rel (a, b), x == (0, 3) rel (a)
| (a, e) para (e, b) and (f, g) cong (e, b)
-> ArrowHead(e, b); a, x width stroke (c, d, a, e) fi

: if q == (20, 0) rel (p), r == (0, 20) rel (p) | T
-> FilledEllipse(p, q, r) fi

: 8 width square ends yellow paint stroke (x, x)

: if n == (- 0.15, 0.07) rel (heel, hip, toe)
, m == (1.04, 0.2) rel (heel, hip, toe)
, l == (0.24, 0.38) rel (heel, hip, toe)
, k == (0.4, 0.31) rel (heel, hip, toe)
, j == (0.78, 0.29) rel (heel, hip, toe)
, i == (0.22, 0.43) rel (heel, hip, toe)
, h == (0.86, 0.41) rel (heel, hip, toe)
, g == (0.25, 0.64) rel (heel, hip, toe)
, f == (0.59, 0.46) rel (heel, hip, toe)
, e == (0.16, 0.91) rel (heel, hip, toe)
, d == (- 0.13, 0.97) rel (heel, hip, toe)
| T
-> fill (l, g, e, toe), (toe, d, n, heel), (heel, l)
; stroke4(toe, e, g, l)
; fill (m, h, f, i)
, (i, heel)
, (heel, k, j, hip)
, (hip, m)
; black paint
stroke (m, h, f, i)
; stroke (heel, k, j, hip)
; stroke (toe, d, n, heel) fi

: if d == (1., 1.) rel (a, b)
, e == (1., 0.) rel (a, b)
, c == (0., 1.) rel (a, b)
| ver (a, c)
and ver (e, d)
and hor (a, e)
and ver (b, e)
and hor (c, d)
and (a, e) cong (c, a)
-> fill (a, e), (e, d), (d, c), (c, a) fi

: if a1 == (0.6756, - 0.1464) rel (a, b)
, a0 == (0.9437, 0.0698) rel (a, b)
, y == (0.3376, - 0.4188) rel (a, b)
, x == (0.6058, - 0.2026) rel (a, b)
, w == (0.3705, - 0.3388) rel (a, b)
, v == (0.8875, 0.1396) rel (a, b)
, u == (0.8312, 0.2094) rel (a, b)
, t == (0.5887, 0.014) rel (a, b)
, s == (0.71, 0.1117) rel (a, b)
, r == (0.4675, - 0.0838) rel (a, b)
, q == (0.2251, - 0.2792) rel (a, b)
, p == (0.3463, - 0.1815) rel (a, b)
, o == (0.7749, 0.2792) rel (a, b)
, n == (0.7186, 0.349) rel (a, b)
, m == (0.5974, 0.2513) rel (a, b)
, l == (0.4762, 0.1536) rel (a, b)
, k == (0.1125, - 0.1396) rel (a, b)
, j == (0.2338, - 0.0419) rel (a, b)
, i == (0.355, 0.0558) rel (a, b)
, h == (0.6624, 0.4188) rel (a, b)
, g == (0.6061, 0.4886) rel (a, b)
, f == (0.4849, 0.3909) rel (a, b)
, e == (0.3637, 0.2932) rel (a, b)
, d == (0.2424, 0.1954) rel (a, b)
, c == (0.1212, 0.0977) rel (a, b)
| ver (g, f)
and ver (e, f)
and ver (d, e)
and ver (c, d)
and ver (a, c)
and ver (m, n)
and ver (l, m)
and ver (i, l)
and ver (j, i)
and ver (k, j)
and ver (s, u)
and ver (t, s)
and ver (r, t)
and ver (p, r)
and ver (q, p)
and ver (a1, a0)
and ver (y, a1)
and ver (x, a1)
and ver (y, w)
and hor (g, n)
and hor (a, k)
and hor (k, q)
and hor (q, y)
and hor (c, j)
and hor (j, p)
and hor (d, i)
and hor (i, r)
and hor (e, l)
and hor (l, t)
and hor (f, m)
and hor (m, s)
and hor (h, n)
and hor (n, o)
and hor (o, u)
and hor (u, v)
and hor (v, a0)
and (h, n) cong (g, h)
and (n, o) cong (h, n)
and (o, u) cong (n, o)
and (u, v) cong (o, u)
and (v, a0) cong (u, v)
and (a0, b) cong (v, a0)
and (f, e) cong (g, f)
and (e, d) cong (f, e)
and (d, c) cong (e, d)
and (c, a) cong (d, c)
and (x, w) cong (a0, a1)
and (v, a0) cong (a1, x)
and (v, a0) cong (y, w)
-> darkred paint
Square(g, h)
; black paint
print("DR", g, Helvetica, 16, 0)
; black paint
print("DY", f, Helvetica, 16, 0)
; darkyellow paint
Square(f, h)
; darkgreen paint
Square(e, h)
; black paint
print("DG", e, Helvetica, 16, 0)
; darkcyan paint
Square(d, h)
; black paint
print("DC", d, Helvetica, 16, 0)
; darkblue paint
Square(c, h)
; black paint
print("DB", c, Helvetica, 16, 0)
; darkmagenta paint
Square(a, h)
; black paint
print("DM", a, Helvetica, 16, 0)
; red paint
Square(k, o)
; black paint
print("R", k, Helvetica, 16, 0)
; yellow paint
Square(j, o)
; black paint
print("Y", j, Helvetica, 16, 0)
; green paint
Square(i, o)
; black paint
print("G", i, Helvetica, 16, 0)
; cyan paint
Square(l, o)
; black paint
print("C", l, Helvetica, 16, 0)
; blue paint
Square(m, o)
; black paint
print("B", m, Helvetica, 16, 0)
; magenta paint
Square(n, o)
; black paint
print("M", n, Helvetica, 16, 0)
; lightred paint
Square(q, v)
; black paint
print("LR", q, Helvetica, 16, 0)
; lightyellow paint
Square(p, v)
; black paint
print("LY", p, Helvetica, 16, 0)
; lightgreen paint
Square(r, v)
; black paint
print("LG", r, Helvetica, 16, 0)
; lightcyan paint
Square(t, v)
; black paint
print("LC", t, Helvetica, 16, 0)
; lightblue paint
Square(s, v)
; black paint
print("LB", s, Helvetica, 16, 0)
; lightmagenta paint
Square(u, v)
; black paint
print("LM", u, Helvetica, 16, 0)
; black paint
Square(y, b)
; grey paint Square(a0, b); white paint Square(x, b) fi

: if d == (0.5869, 0.4924) rel (a, b)
, c == (0.4131, - 0.4924) rel (a, b)
| ver (c, a)
and ver (b, d)
and hor (c, b)
and hor (a, d)
-> fill (a, c), (c, b), (b, d), (d, a) fi

: if f == (0.8382, 0.7492) rel (a, b)
, e == (0.5931, 0.6996) rel (a, b)
, d == (0.359, 0.6002) rel (a, b)
, c == (- 0.1458, - 1.0088) rel (a, b)
| T
-> Rectangle(c, b)
; Rectangle(a, d)
; print("foo", e, Helvetica, 16, 0) fi