mirror of
https://github.com/HigherOrderCO/Bend.git
synced 2024-10-26 14:05:36 +03:00
147 lines
2.2 KiB
Plaintext
147 lines
2.2 KiB
Plaintext
List/expand (List/Cons h t) = (List/Cons h (List/expand t))
|
|
List/expand (List/Nil) = (List/Nil)
|
|
|
|
main = (List/expand
|
|
[
|
|
(+ 20 10)
|
|
(- 20 10)
|
|
(* 20 10)
|
|
(/ 20 10)
|
|
(% 20 10)
|
|
(^ 20 10)
|
|
(& 20 10)
|
|
(| 20 10)
|
|
(== 20 10)
|
|
(!= 20 10)
|
|
(< 20 10)
|
|
(> 20 10)
|
|
(<< 10 2)
|
|
(>> 10 2)
|
|
|
|
0xFFFF
|
|
|
|
(+ +20 +10)
|
|
(- +20 +10)
|
|
(* +20 +10)
|
|
(/ +20 +10)
|
|
(% +20 +10)
|
|
(^ +20 +10)
|
|
(& +20 +10)
|
|
(| +20 +10)
|
|
(== +20 +10)
|
|
(!= +20 +10)
|
|
(< +20 +10)
|
|
(> +20 +10)
|
|
|
|
0xFFFF
|
|
|
|
(+ -20 -10)
|
|
(- -20 -10)
|
|
(* -20 -10)
|
|
(/ -20 -10)
|
|
(% -20 -10)
|
|
(^ -20 -10)
|
|
(& -20 -10)
|
|
(| -20 -10)
|
|
(== -20 -10)
|
|
(!= -20 -10)
|
|
(< -20 -10)
|
|
(> -20 -10)
|
|
|
|
0xFFFF
|
|
|
|
(+ +20 -10)
|
|
(- +20 -10)
|
|
(* +20 -10)
|
|
(/ +20 -10)
|
|
(% +20 -10)
|
|
(^ +20 -10)
|
|
(& +20 -10)
|
|
(| +20 -10)
|
|
(== +20 -10)
|
|
(!= +20 -10)
|
|
(< +20 -10)
|
|
(> +20 -10)
|
|
|
|
0xFFFF
|
|
|
|
(+ -20 +10)
|
|
(- -20 +10)
|
|
(* -20 +10)
|
|
(/ -20 +10)
|
|
(% -20 +10)
|
|
(^ -20 +10)
|
|
(& -20 +10)
|
|
(| -20 +10)
|
|
(== -20 +10)
|
|
(!= -20 +10)
|
|
(< -20 +10)
|
|
(> -20 +10)
|
|
|
|
0xFFFF
|
|
|
|
(+ +20.0 +10.0)
|
|
(- +20.0 +10.0)
|
|
(* +20.0 +10.0)
|
|
(/ +20.0 +10.0)
|
|
(% +20.0 +10.0)
|
|
(^ +20.0 +10.0)
|
|
(& +20.0 +10.0)
|
|
(| +20.0 +10.0)
|
|
(== +20.0 +10.0)
|
|
(!= +20.0 +10.0)
|
|
(< +20.0 +10.0)
|
|
(> +20.0 +10.0)
|
|
|
|
0xFFFF
|
|
|
|
(+ -20.0 -10.0)
|
|
(- -20.0 -10.0)
|
|
(* -20.0 -10.0)
|
|
(/ -20.0 -10.0)
|
|
(% -20.0 -10.0)
|
|
(^ -20.0 -10.0)
|
|
(& -20.0 -10.0)
|
|
(| -20.0 -10.0)
|
|
(== -20.0 -10.0)
|
|
(!= -20.0 -10.0)
|
|
(< -20.0 -10.0)
|
|
(> -20.0 -10.0)
|
|
|
|
0xFFFF
|
|
|
|
(+ +20.0 -10.0)
|
|
(- +20.0 -10.0)
|
|
(* +20.0 -10.0)
|
|
(/ +20.0 -10.0)
|
|
(% +20.0 -10.0)
|
|
(^ +20.0 -10.0)
|
|
(& +20.0 -10.0)
|
|
(| +20.0 -10.0)
|
|
(== +20.0 -10.0)
|
|
(!= +20.0 -10.0)
|
|
(< +20.0 -10.0)
|
|
(> +20.0 -10.0)
|
|
|
|
0xFFFF
|
|
|
|
(+ -20.0 +10.0)
|
|
(- -20.0 +10.0)
|
|
(* -20.0 +10.0)
|
|
(/ -20.0 +10.0)
|
|
(% -20.0 +10.0)
|
|
(^ -20.0 +10.0)
|
|
(& -20.0 +10.0)
|
|
(| -20.0 +10.0)
|
|
(== -20.0 +10.0)
|
|
(!= -20.0 +10.0)
|
|
(< -20.0 +10.0)
|
|
(> -20.0 +10.0)
|
|
|
|
0xFFFF
|
|
|
|
(log 2.0 3.0)
|
|
(atan2 3.0 4.0)
|
|
]
|
|
)
|