Skip to content

Instantly share code, notes, and snippets.

@sogaiu
Created November 14, 2018 00:18
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sogaiu/a6b2c0ac98c9416c5f097908209218ec to your computer and use it in GitHub Desktop.
Save sogaiu/a6b2c0ac98c9416c5f097908209218ec to your computer and use it in GitHub Desktop.
testing https://github.com/arcadia-unity/Arcadia/issues/320 with modified vs code extension for arcadia
user=> (require 'clojure.pprint)
nil
user=> (clojure.pprint/pprint
(let [g (fn f [i]
(if (<= i 0)
:leaf
(vec
(repeatedly 3
#(f (dec i))))))]
(g 4)))
[
[[
[:leaf
:leaf
:leaf]
[:leaf
:leaf
:leaf
]
[:leaf
:leaf :leaf]]
[
[
:leaf
:leaf
:leaf] [
:leaf :leaf
:leaf]
[:leaf
:leaf :leaf]]
[
[
:leaf
:leaf
:leaf] [
:leaf :leaf
:leaf
] [:leaf
:leaf
:leaf]]]
[
[
[:leaf
:leaf
:leaf]
[:leaf
:leaf :leaf
]
[:leaf
:leaf
:leaf]]
[
[
:leaf
:leaf
:leaf]
[:leaf
:leaf
:leaf]
[
:leaf
:leaf
:leaf]]
[
[:leaf :leaf
:leaf
]
[
:leaf
:leaf
:leaf]
[
:leaf
:leaf
:leaf]
]]
[
[
[:leaf
:leaf
:leaf
]
[:leaf
:leaf :leaf] [:leaf :leaf :leaf]]
[[:leaf :leaf :leaf] [:leaf :leaf :leaf] [:leaf :leaf :leaf]]
[[:leaf :leaf :leaf] [:leaf :leaf :leaf] [:leaf :leaf :leaf]]]]
nil
user=>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment