/sethadjust {
   /hadjust exch def
} def