  ?? SKIP := 2 ??
  ?? PUSH (LIST := ON) ??
  { MLTES -- Declaration of mlt$exponent_style }
  ?? POP ??

  CONST
    mlc$min_exponent_style = 0,
    mlc$max_exponent_style = 6;

  TYPE
    mlt$exponent_style = mlc$min_exponent_style ..
      mlc$max_exponent_style;
