You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
35 lines
436 B
35 lines
436 B
def (f a b)
|
|
(a ++ b)
|
|
|
|
def (add a b)
|
|
(a + b)
|
|
|
|
def (catstrs strs)
|
|
(foldr f
|
|
(head strs)
|
|
(tail strs))
|
|
|
|
def strs ["aa", "bb"]
|
|
|
|
def (mymap f xs)
|
|
if ((length xs) == 0)
|
|
then
|
|
xs
|
|
else
|
|
((f (head xs))
|
|
: (mymap f (tail xs)))
|
|
|
|
def empty []
|
|
|
|
def getFile
|
|
(readFile "./parse.js")
|
|
|
|
def (testUnary n)
|
|
((-n) + n)
|
|
|
|
def main
|
|
((print (testUnary 6)) >>
|
|
if False
|
|
then
|
|
undefined
|
|
else getFile)
|
|
|