(Program
  (Assignment
    (Identifier)
  { (Plus
    {-(Identifier)-}
    {-(Integer)-})
  ->(RShift
    {+(Identifier)+}
    {+(Integer)+}) })
  (Assignment
  { (Identifier)
  ->(Identifier) }
  { (RShift
    {-(Identifier)-}
    {-(Integer)-})
  ->(DividedBy
    {+(Identifier)+}
    {+(Integer)+}) })
  (Assignment
  { (Identifier)
  ->(Identifier) }
  { (DividedBy
    {-(Identifier)-}
    {-(Integer)-})
  ->(Plus
    {+(Identifier)+}
    {+(Integer)+}) }))