Lines Matching refs:sqrt
17 eval { $s = sqrt(-1) }; # Kind of compile time.
18 like($@, qr/sqrt of -1/, 'compile time sqrt(-1) fails');
20 $s = sqrt(0);
21 is($s, 0, 'compile time sqrt(0)');
23 $s = sqrt(1);
24 is($s, 1, 'compile time sqrt(1)');
26 $s = sqrt(2);
27 is(substr($s,0,5), '1.414', 'compile time sqrt(2) == 1.414');
54 eval { $s = sqrt(-$x1) };
55 like($@, qr/sqrt of -1/, 'run time sqrt(-1) fails');
57 $s = sqrt($x0);
58 is($s, 0, 'run time sqrt(0)');
60 $s = sqrt($x1);
61 is($s, 1, 'run time sqrt(1)');
63 $s = sqrt($x2);
64 is(substr($s,0,5), '1.414', 'run time sqrt(2) == 1.414');
120 is(sqrt(2), '1.4142135623730950488016887242097', "quadmath sqrt");