1
1
module Math where
2
2
3
- foreign import abs
4
- " function abs(n){\
5
- \ return Math.abs(n);\
6
- \}" :: Number -> Number
7
-
8
- foreign import acos
9
- " function acos(n){\
10
- \ return Math.acos(n);\
11
- \}" :: Number -> Number
12
-
13
- foreign import asin
14
- " function asin(n){\
15
- \ return Math.asin(n);\
16
- \}" :: Number -> Number
17
-
18
- foreign import atan
19
- " function atan(n){\
20
- \ return Math.atan(n);\
21
- \}" :: Number -> Number
3
+ foreign import abs " var abs = Math.abs;" :: Number -> Number
4
+
5
+ foreign import acos " var acos = Math.acos;" :: Number -> Number
6
+
7
+ foreign import asin " var asin = Math.asin;" :: Number -> Number
8
+
9
+ foreign import atan " var atan = Math.atan;" :: Number -> Number
22
10
23
11
foreign import atan2
24
12
" function atan2(y){\
@@ -27,30 +15,15 @@ foreign import atan2
27
15
\ };\
28
16
\}" :: Number -> Number -> Number
29
17
30
- foreign import aceil
31
- " function aceil(n){\
32
- \ return Math.aceil(n);\
33
- \}" :: Number -> Number
18
+ foreign import ceil " var ceil = Math.ceil;" :: Number -> Number
34
19
35
- foreign import cos
36
- " function cos(n){\
37
- \ return Math.cos(n);\
38
- \}" :: Number -> Number
20
+ foreign import cos " var cos = Math.cos;" :: Number -> Number
39
21
40
- foreign import exp
41
- " function exp(n){\
42
- \ return Math.exp(n);\
43
- \}" :: Number -> Number
22
+ foreign import exp " var exp = Math.exp;" :: Number -> Number
44
23
45
- foreign import floor
46
- " function floor(n){\
47
- \ return Math.floor(n);\
48
- \}" :: Number -> Number
24
+ foreign import floor " var floor = Math.floor;" :: Number -> Number
49
25
50
- foreign import log
51
- " function log(n){\
52
- \ return Math.log(n);\
53
- \}" :: Number -> Number
26
+ foreign import log " var log = Math.log;" :: Number -> Number
54
27
55
28
foreign import max
56
29
" function max(n1){\
@@ -73,25 +46,13 @@ foreign import pow
73
46
\ }\
74
47
\}" :: Number -> Number -> Number
75
48
76
- foreign import round
77
- " function round(n){\
78
- \ return Math.round(n);\
79
- \}" :: Number -> Number
80
-
81
- foreign import sin
82
- " function sin(n){\
83
- \ return Math.sin(n);\
84
- \}" :: Number -> Number
85
-
86
- foreign import sqrt
87
- " function sqrt(n){\
88
- \ return Math.sqrt(n);\
89
- \}" :: Number -> Number
90
-
91
- foreign import tan
92
- " function tan(n){\
93
- \ return Math.tan(n);\
94
- \}" :: Number -> Number
49
+ foreign import round " var round = Math.round;" :: Number -> Number
50
+
51
+ foreign import sin " var sin = Math.sin;" :: Number -> Number
52
+
53
+ foreign import sqrt " var sqrt = Math.sqrt;" :: Number -> Number
54
+
55
+ foreign import tan " var tan = Math.tan;" :: Number -> Number
95
56
96
57
foreign import e " var e = Math.E;" :: Number
97
58
foreign import ln2 " var ln2 = Math.LN2;" :: Number
0 commit comments