%begin
  %integer res, fred, jim
  fred = 1
  jim = fred + 2
  ! how do you do integer exponentiation?
  res = ((fred * jim) + jim) - ((fred << jim) // jim)
  res = fred >> (fred ! jim) & jim;
%endofprogram