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