exprs.parsed 1.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163
  1. Puts Chc(
  2. Cat(
  3. Lit(Atom(This))
  4. Lit(Atom(That))
  5. Lit(Atom(The-Other))
  6. )
  7. )
  8. Puts Chc(
  9. Cat(
  10. Lit(Atom(This))
  11. )
  12. Cat(
  13. Lit(Atom(That))
  14. )
  15. Cat(
  16. Lit(Atom(The-Other))
  17. )
  18. )
  19. Puts Chc(
  20. 5:
  21. Cat(
  22. Lit(Atom(This))
  23. )
  24. Cat(
  25. Lit(Atom(That))
  26. )
  27. )
  28. Puts Chc(
  29. Cat(
  30. Ap(
  31. Ap(
  32. Var(foo)
  33. Var(bar)
  34. )
  35. Var(baz)
  36. )
  37. )
  38. )
  39. Puts Chc(
  40. Cat(
  41. Tup(
  42. Chc(
  43. Cat(
  44. )
  45. )
  46. )
  47. )
  48. )
  49. Puts Chc(
  50. Cat(
  51. Tup(
  52. Chc(
  53. Cat(
  54. Num(1)
  55. )
  56. )
  57. )
  58. )
  59. )
  60. Puts Chc(
  61. Cat(
  62. Tup(
  63. Chc(
  64. Cat(
  65. Num(1)
  66. )
  67. )
  68. Chc(
  69. Cat(
  70. Num(2)
  71. )
  72. )
  73. )
  74. )
  75. )
  76. Puts Chc(
  77. Cat(
  78. Tup(
  79. Chc(
  80. Cat(
  81. Num(1)
  82. )
  83. )
  84. Chc(
  85. Cat(
  86. Num(2)
  87. )
  88. )
  89. Chc(
  90. Cat(
  91. Num(3)
  92. )
  93. )
  94. )
  95. )
  96. )
  97. Puts Chc(
  98. Cat(
  99. Range(
  100. Num(0)
  101. Num(20)
  102. )
  103. )
  104. )
  105. Puts Chc(
  106. Cat(
  107. Range(
  108. Var(x)
  109. Var(y)
  110. )
  111. )
  112. )
  113. Puts Chc(
  114. Cat(
  115. Ap(
  116. Var(f)
  117. Var(x)
  118. )
  119. )
  120. )
  121. Puts Chc(
  122. Cat(
  123. Fun(
  124. x =>
  125. Chc(
  126. Cat(
  127. Var(x)
  128. )
  129. )
  130. )
  131. )
  132. )
  133. Puts Chc(
  134. Cat(
  135. Fun(
  136. True =>
  137. Chc(
  138. Cat(
  139. Str("yes")
  140. )
  141. )
  142. False =>
  143. Chc(
  144. Cat(
  145. Str("no")
  146. )
  147. )
  148. )
  149. )
  150. )