Diagrams.TwoD.Path.Calligraphic

Create "calligraphic" strokes by filling between two offset copies of a curve.

Documentation

calligraphic :: R2 -> Trail' Line R2 -> Trail' Loop R2

calligraphic pen t creates a "calligraphic" variant of t by filling between two copies of t offset by the pen vector.

 import Diagrams.Coordinates
 import Diagrams.TwoD.Path.Calligraphic

 curve = cubicSpline False [1 ^& 1, 2 ^& 5, 5 ^& 6, 8 ^& 12]
       # scale 3

 calligraphicEx =
   [ circle 15 # calligraphic (2 ^& 1)
   , curve     # calligraphic (2 ^& 2)
   ]
   # map (centerXY . strokeLoop)
   # fc black
   # hcat' (with & sep .~ 10)