(Program
{-(Call
  {-(Identifier)-}
  {-(Hash)-}
  {-(Empty)-})-}
  (Call
    (Identifier)
    (Function
      (Empty)
    {+(Identifier)+}
    { (Identifier)
    ->(Plus
      {+(Identifier)+}
      {+(Integer)+}) }))
{-(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)-}
    {-([])-})-})-})