15 lines
144 B
Text
15 lines
144 B
Text
|
===== script =====
|
||
|
|
map := {
|
||
|
|
_ [] -> []
|
||
|
|
f [x ~xs] -> [(f x) ~(map f xs)]
|
||
|
|
}
|
||
|
|
|
||
|
|
print (map {x -> + x 1} [1 2 3])
|
||
|
|
|
||
|
|
===== output =====
|
||
|
|
[
|
||
|
|
2
|
||
|
|
3
|
||
|
|
4
|
||
|
|
]
|