Skip to content

Instantly share code, notes, and snippets.

@mightybyte
Last active August 29, 2015 14:17
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mightybyte/2472faa614fde892afae to your computer and use it in GitHub Desktop.
Save mightybyte/2472faa614fde892afae to your computer and use it in GitHub Desktop.
diagrams metafont problem
-- image: http://i.imgur.com/567RLZ2.png
squiggle :: Path V2 Double
squiggle = rotate ((-1)/4 @@ turn) $ metafont $
(4 ^& 1) .--.
(10 ^& 4) .--.
(15 ^& 5.2) .--.
(20 ^& 5) .--.
(25 ^& 3) .--.
(30 ^& 1.5) .--.
(35 ^& 2) .--.
(40 ^& 4) .--.
(43.8 ^& 10) .--.
(44.2 ^& 15) .--.
(43 ^& 20) .--.
(40 ^& 22) .--.
(35 ^& 20) .--.
(30 ^& 18) .--.
(25 ^& 18.5) .--.
(20 ^& 20) .--.
(15 ^& 21) .--.
(10 ^& 20) .--.
(5 ^& 17) .--.
(3 ^& 15) .--.
(1 ^& 10) .--.
(1 ^& 5) .--.
(2 ^& 2) .--.
cyclePath
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment