blob: de5de655738a4cab2b5e731f594828205ca0e93f [file] [log] [blame]
Bram Moolenaar453b5762017-01-08 17:59:14 +01001" test float functions
2
3if !has('float')
4 finish
5end
6
7func Test_abs()
Bram Moolenaar62473612017-01-08 19:25:40 +01008 call assert_equal('1.23', string(abs(1.23)))
9 call assert_equal('1.23', string(abs(-1.23)))
10 call assert_equal('0.0', string(abs(0.0)))
11 call assert_equal('0.0', string(abs(1.0/(1.0/0.0))))
12 call assert_equal('0.0', string(abs(-1.0/(1.0/0.0))))
13 call assert_equal('inf', string(abs(1.0/0.0)))
14 call assert_equal('inf', string(abs(-1.0/0.0)))
15 call assert_equal('nan', string(abs(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010016 call assert_equal('12', string(abs('-12abc')))
17 call assert_fails("call abs([])", 'E745:')
18 call assert_fails("call abs({})", 'E728:')
19 call assert_fails("call abs(function('string'))", 'E703:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010020endfunc
21
22func Test_sqrt()
Bram Moolenaar62473612017-01-08 19:25:40 +010023 call assert_equal('0.0', string(sqrt(0.0)))
24 call assert_equal('1.414214', string(sqrt(2.0)))
25 call assert_equal('inf', string(sqrt(1.0/0.0)))
26 call assert_equal('nan', string(sqrt(-1.0)))
27 call assert_equal('nan', string(sqrt(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010028 call assert_fails('call sqrt("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010029endfunc
30
31func Test_log()
Bram Moolenaar62473612017-01-08 19:25:40 +010032 call assert_equal('0.0', string(log(1.0)))
33 call assert_equal('-0.693147', string(log(0.5)))
34 call assert_equal('-inf', string(log(0.0)))
35 call assert_equal('nan', string(log(-1.0)))
36 call assert_equal('inf', string(log(1.0/0.0)))
37 call assert_equal('nan', string(log(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010038 call assert_fails('call log("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010039endfunc
40
41func Test_log10()
Bram Moolenaar62473612017-01-08 19:25:40 +010042 call assert_equal('0.0', string(log10(1.0)))
43 call assert_equal('2.0', string(log10(100.0)))
44 call assert_equal('2.079181', string(log10(120.0)))
45 call assert_equal('-inf', string(log10(0.0)))
46 call assert_equal('nan', string(log10(-1.0)))
47 call assert_equal('inf', string(log10(1.0/0.0)))
48 call assert_equal('nan', string(log10(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010049 call assert_fails('call log10("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010050endfunc
51
52func Test_exp()
Bram Moolenaar62473612017-01-08 19:25:40 +010053 call assert_equal('1.0', string(exp(0.0)))
54 call assert_equal('7.389056', string(exp(2.0)))
55 call assert_equal('0.367879', string(exp(-1.0)))
56 call assert_equal('inf', string(exp(1.0/0.0)))
57 call assert_equal('0.0', string(exp(-1.0/0.0)))
58 call assert_equal('nan', string(exp(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010059 call assert_fails('call exp("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010060endfunc
61
62func Test_sin()
Bram Moolenaar62473612017-01-08 19:25:40 +010063 call assert_equal('0.0', string(sin(0.0)))
64 call assert_equal('0.841471', string(sin(1.0)))
65 call assert_equal('-0.479426', string(sin(-0.5)))
66 call assert_equal('nan', string(sin(0.0/0.0)))
67 call assert_equal('nan', string(sin(1.0/0.0)))
68 call assert_equal('0.0', string(sin(1.0/(1.0/0.0))))
69 call assert_equal('-0.0', string(sin(-1.0/(1.0/0.0))))
Bram Moolenaar87200412017-01-10 16:31:20 +010070 call assert_fails('call sin("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010071endfunc
72
73func Test_asin()
Bram Moolenaar62473612017-01-08 19:25:40 +010074 call assert_equal('0.0', string(asin(0.0)))
75 call assert_equal('1.570796', string(asin(1.0)))
76 call assert_equal('-0.523599', string(asin(-0.5)))
77 call assert_equal('nan', string(asin(1.1)))
78 call assert_equal('nan', string(asin(1.0/0.0)))
79 call assert_equal('nan', string(asin(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010080 call assert_fails('call asin("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010081endfunc
82
83func Test_sinh()
Bram Moolenaar62473612017-01-08 19:25:40 +010084 call assert_equal('0.0', string(sinh(0.0)))
85 call assert_equal('0.521095', string(sinh(0.5)))
86 call assert_equal('-1.026517', string(sinh(-0.9)))
87 call assert_equal('inf', string(sinh(1.0/0.0)))
88 call assert_equal('-inf', string(sinh(-1.0/0.0)))
89 call assert_equal('nan', string(sinh(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010090 call assert_fails('call sinh("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +010091endfunc
92
93func Test_cos()
Bram Moolenaar62473612017-01-08 19:25:40 +010094 call assert_equal('1.0', string(cos(0.0)))
95 call assert_equal('0.540302', string(cos(1.0)))
96 call assert_equal('0.877583', string(cos(-0.5)))
97 call assert_equal('nan', string(cos(0.0/0.0)))
98 call assert_equal('nan', string(cos(1.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +010099 call assert_fails('call cos("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100100endfunc
101
102func Test_acos()
Bram Moolenaar62473612017-01-08 19:25:40 +0100103 call assert_equal('1.570796', string(acos(0.0)))
104 call assert_equal('0.0', string(acos(1.0)))
105 call assert_equal('3.141593', string(acos(-1.0)))
106 call assert_equal('2.094395', string(acos(-0.5)))
107 call assert_equal('nan', string(acos(1.1)))
108 call assert_equal('nan', string(acos(1.0/0.0)))
109 call assert_equal('nan', string(acos(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100110 call assert_fails('call acos("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100111endfunc
112
113func Test_cosh()
Bram Moolenaar62473612017-01-08 19:25:40 +0100114 call assert_equal('1.0', string(cosh(0.0)))
115 call assert_equal('1.127626', string(cosh(0.5)))
116 call assert_equal('inf', string(cosh(1.0/0.0)))
117 call assert_equal('inf', string(cosh(-1.0/0.0)))
118 call assert_equal('nan', string(cosh(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100119 call assert_fails('call cosh("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100120endfunc
121
122func Test_tan()
Bram Moolenaar62473612017-01-08 19:25:40 +0100123 call assert_equal('0.0', string(tan(0.0)))
124 call assert_equal('0.546302', string(tan(0.5)))
125 call assert_equal('-0.546302', string(tan(-0.5)))
126 call assert_equal('nan', string(tan(1.0/0.0)))
127 call assert_equal('nan', string(cos(0.0/0.0)))
128 call assert_equal('0.0', string(tan(1.0/(1.0/0.0))))
129 call assert_equal('-0.0', string(tan(-1.0/(1.0/0.0))))
Bram Moolenaar87200412017-01-10 16:31:20 +0100130 call assert_fails('call tan("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100131endfunc
132
133func Test_atan()
Bram Moolenaar62473612017-01-08 19:25:40 +0100134 call assert_equal('0.0', string(atan(0.0)))
135 call assert_equal('0.463648', string(atan(0.5)))
136 call assert_equal('-0.785398', string(atan(-1.0)))
137 call assert_equal('1.570796', string(atan(1.0/0.0)))
138 call assert_equal('-1.570796', string(atan(-1.0/0.0)))
139 call assert_equal('nan', string(atan(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100140 call assert_fails('call atan("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100141endfunc
142
143func Test_atan2()
Bram Moolenaar62473612017-01-08 19:25:40 +0100144 call assert_equal('-2.356194', string(atan2(-1, -1)))
145 call assert_equal('2.356194', string(atan2(1, -1)))
146 call assert_equal('0.0', string(atan2(1.0, 1.0/0.0)))
147 call assert_equal('1.570796', string(atan2(1.0/0.0, 1.0)))
148 call assert_equal('nan', string(atan2(0.0/0.0, 1.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100149 call assert_fails('call atan2("", -1)', 'E808:')
150 call assert_fails('call atan2(-1, "")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100151endfunc
152
153func Test_tanh()
Bram Moolenaar62473612017-01-08 19:25:40 +0100154 call assert_equal('0.0', string(tanh(0.0)))
155 call assert_equal('0.462117', string(tanh(0.5)))
156 call assert_equal('-0.761594', string(tanh(-1.0)))
157 call assert_equal('1.0', string(tanh(1.0/0.0)))
158 call assert_equal('-1.0', string(tanh(-1.0/0.0)))
159 call assert_equal('nan', string(tanh(0.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100160 call assert_fails('call tanh("")', 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100161endfunc
162
163func Test_fmod()
Bram Moolenaar62473612017-01-08 19:25:40 +0100164 call assert_equal('0.13', string(fmod(12.33, 1.22)))
165 call assert_equal('-0.13', string(fmod(-12.33, 1.22)))
166 call assert_equal('nan', string(fmod(1.0/0.0, 1.0)))
167 " On Windows we get "nan" instead of 1.0, accept both.
168 let res = string(fmod(1.0, 1.0/0.0))
169 if res != 'nan'
170 call assert_equal('1.0', res)
171 endif
172 call assert_equal('nan', string(fmod(1.0, 0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100173 call assert_fails("call fmod('', 1.22)", 'E808:')
174 call assert_fails("call fmod(12.33, '')", 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100175endfunc
176
177func Test_pow()
Bram Moolenaar62473612017-01-08 19:25:40 +0100178 call assert_equal('1.0', string(pow(0.0, 0.0)))
179 call assert_equal('8.0', string(pow(2.0, 3.0)))
180 call assert_equal('nan', string(pow(2.0, 0.0/0.0)))
181 call assert_equal('nan', string(pow(0.0/0.0, 3.0)))
182 call assert_equal('nan', string(pow(0.0/0.0, 3.0)))
183 call assert_equal('inf', string(pow(2.0, 1.0/0.0)))
184 call assert_equal('inf', string(pow(1.0/0.0, 3.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100185 call assert_fails("call pow('', 2.0)", 'E808:')
186 call assert_fails("call pow(2.0, '')", 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100187endfunc
188
189func Test_str2float()
Bram Moolenaar62473612017-01-08 19:25:40 +0100190 call assert_equal('1.0', string(str2float('1')))
Bram Moolenaar08243d22017-01-10 16:12:29 +0100191 call assert_equal('1.0', string(str2float(' 1 ')))
192 call assert_equal('1.0', string(str2float(' 1.0 ')))
Bram Moolenaar62473612017-01-08 19:25:40 +0100193 call assert_equal('1.23', string(str2float('1.23')))
194 call assert_equal('1.23', string(str2float('1.23abc')))
195 call assert_equal('1.0e40', string(str2float('1e40')))
Bram Moolenaar87200412017-01-10 16:31:20 +0100196 call assert_equal('-1.23', string(str2float('-1.23')))
197 call assert_equal('1.23', string(str2float(' + 1.23 ')))
Bram Moolenaar08243d22017-01-10 16:12:29 +0100198
199 call assert_equal('1.0', string(str2float('+1')))
200 call assert_equal('1.0', string(str2float('+1')))
201 call assert_equal('1.0', string(str2float(' +1 ')))
202 call assert_equal('1.0', string(str2float(' + 1 ')))
203
204 call assert_equal('-1.0', string(str2float('-1')))
205 call assert_equal('-1.0', string(str2float('-1')))
206 call assert_equal('-1.0', string(str2float(' -1 ')))
207 call assert_equal('-1.0', string(str2float(' - 1 ')))
208
Bram Moolenaar87200412017-01-10 16:31:20 +0100209 call assert_equal('0.0', string(str2float('+0.0')))
210 call assert_equal('-0.0', string(str2float('-0.0')))
Bram Moolenaar62473612017-01-08 19:25:40 +0100211 call assert_equal('inf', string(str2float('1e1000')))
212 call assert_equal('inf', string(str2float('inf')))
213 call assert_equal('-inf', string(str2float('-inf')))
Bram Moolenaar87200412017-01-10 16:31:20 +0100214 call assert_equal('inf', string(str2float('+inf')))
Bram Moolenaar62473612017-01-08 19:25:40 +0100215 call assert_equal('inf', string(str2float('Inf')))
Bram Moolenaar87200412017-01-10 16:31:20 +0100216 call assert_equal('inf', string(str2float(' +inf ')))
Bram Moolenaar62473612017-01-08 19:25:40 +0100217 call assert_equal('nan', string(str2float('nan')))
218 call assert_equal('nan', string(str2float('NaN')))
Bram Moolenaar87200412017-01-10 16:31:20 +0100219 call assert_equal('nan', string(str2float(' nan ')))
220
221 call assert_fails("call str2float(1.2)", 'E806:')
222 call assert_fails("call str2float([])", 'E730:')
223 call assert_fails("call str2float({})", 'E731:')
224 call assert_fails("call str2float(function('string'))", 'E729:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100225endfunc
226
227func Test_floor()
Bram Moolenaar62473612017-01-08 19:25:40 +0100228 call assert_equal('2.0', string(floor(2.0)))
229 call assert_equal('2.0', string(floor(2.11)))
230 call assert_equal('2.0', string(floor(2.99)))
231 call assert_equal('-3.0', string(floor(-2.11)))
232 call assert_equal('-3.0', string(floor(-2.99)))
233 call assert_equal('nan', string(floor(0.0/0.0)))
234 call assert_equal('inf', string(floor(1.0/0.0)))
235 call assert_equal('-inf', string(floor(-1.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100236 call assert_fails("call floor('')", 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100237endfunc
238
239func Test_ceil()
Bram Moolenaar62473612017-01-08 19:25:40 +0100240 call assert_equal('2.0', string(ceil(2.0)))
241 call assert_equal('3.0', string(ceil(2.11)))
242 call assert_equal('3.0', string(ceil(2.99)))
243 call assert_equal('-2.0', string(ceil(-2.11)))
244 call assert_equal('-2.0', string(ceil(-2.99)))
245 call assert_equal('nan', string(ceil(0.0/0.0)))
246 call assert_equal('inf', string(ceil(1.0/0.0)))
247 call assert_equal('-inf', string(ceil(-1.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100248 call assert_fails("call ceil('')", 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100249endfunc
250
251func Test_round()
Bram Moolenaar62473612017-01-08 19:25:40 +0100252 call assert_equal('2.0', string(round(2.1)))
253 call assert_equal('3.0', string(round(2.5)))
254 call assert_equal('3.0', string(round(2.9)))
255 call assert_equal('-2.0', string(round(-2.1)))
256 call assert_equal('-3.0', string(round(-2.5)))
257 call assert_equal('-3.0', string(round(-2.9)))
258 call assert_equal('nan', string(round(0.0/0.0)))
259 call assert_equal('inf', string(round(1.0/0.0)))
260 call assert_equal('-inf', string(round(-1.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100261 call assert_fails("call round('')", 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100262endfunc
263
264func Test_trunc()
Bram Moolenaar62473612017-01-08 19:25:40 +0100265 call assert_equal('2.0', string(trunc(2.1)))
266 call assert_equal('2.0', string(trunc(2.5)))
267 call assert_equal('2.0', string(trunc(2.9)))
268 call assert_equal('-2.0', string(trunc(-2.1)))
269 call assert_equal('-2.0', string(trunc(-2.5)))
270 call assert_equal('-2.0', string(trunc(-2.9)))
271 call assert_equal('nan', string(trunc(0.0/0.0)))
272 call assert_equal('inf', string(trunc(1.0/0.0)))
273 call assert_equal('-inf', string(trunc(-1.0/0.0)))
Bram Moolenaar87200412017-01-10 16:31:20 +0100274 call assert_fails("call trunc('')", 'E808:')
Bram Moolenaar453b5762017-01-08 17:59:14 +0100275endfunc
276
277func Test_isnan()
Bram Moolenaar62473612017-01-08 19:25:40 +0100278 call assert_equal(0, isnan(1.0))
279 call assert_equal(1, isnan(0.0/0.0))
280 call assert_equal(0, isnan(1.0/0.0))
281 call assert_equal(0, isnan('a'))
282 call assert_equal(0, isnan([]))
Bram Moolenaar87200412017-01-10 16:31:20 +0100283 call assert_equal(0, isnan({}))
Bram Moolenaar453b5762017-01-08 17:59:14 +0100284endfunc