(Program
  (Match
    (Identifier)
    (
      (Pattern
        (
        { (Identifier)
        ->(Identifier) })
        (
        { (Identifier)
        ->(Pattern
          {+(
            {+(Identifier)+}
            {+(Identifier)+})+}
          {+(
            {+(Identifier)+}
            {+([])+})+}) }
        {-(Identifier)-})))))