beginfig(1); input ../metacode/umlhelper.mp; path p; cmu = 500; for c = 0 step .15 until 1: p := (200,cmu * c) -- (300, cmu * c + 50); drawoptions(withcolor (c,1-c,0)); drawRoughEdge( p ); drawoptions(withcolor black); draw p withpen pencircle scaled .5pt; endfor; endfig; end;