% Date: 2010/08/10 mode_setup; boolean gridfont; gridfont := false; fonttype = counttype; def incrwidth (expr stsin, stsout) = stsout*wd# enddef; def decrwidth (expr stsin, stsout) = stsout*wd# enddef; boolean incrwidthdefined; incrwidthdefined = true; input knit_dimens; if known ps_output: font_identifier := "KnittingSymbols-nogrid-outcount"; fi string Vtitle; Vtitle := "Knit nogrid font for checking stitch counts"; input knit_symbols; input knit_nogrid_cables; end