%% turn examples to gray (see runmp for use) % \special{ps: /setcmykcolor { exch 0.11 mul add exch 0.59 mul add exch 0.3 mul add dup 1 gt { pop 1 } if neg 1 add setgray } def /setrgbcolor { 0.11 mul exch 0.59 mul add exch 0.3 mul add setgray } def /sethsbcolor { /b exch def /s exch def 6 mul dup cvi dup /i exch def sub /f exch def /F [[0 1 f sub 1][f 0 1][1 0 1 f sub][1 f 0][1 f sub 1 0][0 1 f][0 1 1]] def F i get { s mul neg 1 add b mul} forall 0.11 mul exch 0.59 mul add exch 0.3 mul add setgray } def } \endinput