14 lines
144 B
Text
14 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
|
|
]
|