mirror of
https://github.com/HigherOrderCO/Bend.git
synced 2024-09-11 11:56:54 +03:00
Add log and atan2 as builtin functions
This commit is contained in:
parent
4db1e68f2d
commit
893c620df9
@ -108,4 +108,9 @@ sleep hi_lo = (IO/Call IO/MAGIC "PUT_TIME" hi_lo @x (IO/Done IO/MAGIC x))
|
|||||||
# (defer_arg (defer_arg (defer_arg (defer @arg1 @arg2 @arg3 (f arg1 arg2 arg3)) arg1) arg2) arg3)
|
# (defer_arg (defer_arg (defer_arg (defer @arg1 @arg2 @arg3 (f arg1 arg2 arg3)) arg1) arg2) arg3)
|
||||||
defer val = @x (x val)
|
defer val = @x (x val)
|
||||||
defer_arg defered arg = @x (defered x arg)
|
defer_arg defered arg = @x (defered x arg)
|
||||||
undefer defered = (defered @x x)
|
undefer defered = (defered @x x)
|
||||||
|
|
||||||
|
# log :: f24 -> f24 -> f24
|
||||||
|
log x base = (| base x)
|
||||||
|
# atan2 :: f24 -> f24 -> f24
|
||||||
|
atan2 x y = (& x y)
|
||||||
|
Loading…
Reference in New Issue
Block a user