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