(Program
  (Match
    (Identifier)
    (
      (Pattern
        (
          (Identifier))
        ([]
        {-(Identifier)-}
        {-(Pattern
          {-(
            {-(Identifier)-}
            {-(Identifier)-})-}
          {-(
            {-(Identifier)-})-})-}))))
{+(Match
  {+(Empty)+}
  {+(
    {+(Pattern
      {+(
        {+(Boolean)+})+}
      {+(
        {+(TextElement)+})+})+})+})+})