/setheight {
   /height exch def
} def