(他のプログラム例がw:de:metafontにも)