{-(Program
  (ForEach
    (
      (Identifier))
    (Array
      (Tuple
        (Integer))
      (Tuple
        (Integer))
      (Tuple
        (Integer)))
    (
      (Identifier)))
  (Else
    (ForEach
      (
        (Identifier)
        (Identifier))
      (Identifier)
      (
        (Call
          (Identifier)
          (Identifier)
          (Empty))
        (ForEach
          (
            (Identifier)
            (Identifier))
          (Identifier)
          (
            (Call
              (Identifier)
              (Identifier)
              (Empty))))))
    (
      (Call
        (Identifier)
        (Identifier)
        (Empty)))))-}