Initial commit
This commit is contained in:
parent
fab6abd81b
commit
be4070a4ba
4
SICP/exercise_1_41.janet
Normal file
4
SICP/exercise_1_41.janet
Normal file
|
|
@ -0,0 +1,4 @@
|
|||
(defn double [f]
|
||||
(fn [x] (f (f x))))
|
||||
|
||||
(print (((double (double double)) inc) 5))
|
||||
Loading…
Reference in New Issue
Block a user