(Program
{+(Call
  {+(Identifier)+}
  {+(Hash)+}
  {+(Empty)+})+}
  (Call
    (Identifier)
    (Function
      (Empty)
    {-(Identifier)-}
    { (Plus
      {-(Identifier)-}
      {-(Integer)-})
    ->(Identifier) }))
{+(Call
  {+(Identifier)+}
  {+(Function
    {+(Empty)+}
    {+(Identifier)+}
    {+(Identifier)+}
    {+(Identifier)+}
    {+(Integer)+})+})+}
{+(Function
  {+(Empty)+}
  {+(Function
    {+(Empty)+}
    {+([])+})+})+}
{+(Function
  {+(Empty)+}
  {+(Function
    {+(Empty)+}
    {+(Identifier)+})+})+}
{+(Function
  {+(Empty)+}
  {+(Identifier)+}
  {+(Function
    {+(Empty)+}
    {+(Integer)+})+})+}
{+(Function
  {+(Empty)+}
  {+(Identifier)+}
  {+(Identifier)+}
  {+(
    {+(Identifier)+}
    {+(Identifier)+})+}
  {+(Function
    {+(Empty)+}
    {+([])+})+})+})