Permalink
Browse files

unfudge FatRat + trig tests

  • Loading branch information...
1 parent 6bb35cb commit 4457dc43f3bf8fed616ae517d926a9cbe2fe14f5 @moritz moritz committed Feb 13, 2012
Showing with 0 additions and 25 deletions.
  1. +0 −1 S32-trig/atan2.t
  2. +0 −2 S32-trig/cos.t
  3. +0 −2 S32-trig/cosec.t
  4. +0 −2 S32-trig/cosech.t
  5. +0 −2 S32-trig/cosh.t
  6. +0 −2 S32-trig/cotan.t
  7. +0 −2 S32-trig/cotanh.t
  8. +0 −2 S32-trig/sec.t
  9. +0 −2 S32-trig/sech.t
  10. +0 −2 S32-trig/sin.t
  11. +0 −2 S32-trig/sinh.t
  12. +0 −2 S32-trig/tan.t
  13. +0 −2 S32-trig/tanh.t
View
1 S32-trig/atan2.t
@@ -299,7 +299,6 @@ is_approx(atan2(-4, -4), -3 * pi / 4, "atan2(-4, -4) is -3pi / 4");
is_approx(atan2(DifferentReal.new(0.1), (-100).FatRat), 3.14059265392313, "atan2(DifferentReal, FatRat)");
}
-#?rakudo skip 'FatRat math NYI'
{
# FatRat tests
is_approx((0.1).FatRat.atan2, 0.099668652491162, "FatRat.atan2");
View
2 S32-trig/cos.t
@@ -126,7 +126,6 @@ for @cosines -> $angle
is_approx(cos(DifferentReal.new(2.3561944902142)), -0.707106781186548, "cos(DifferentReal) - 2.3561944902142");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((3.14159265361894).FatRat.cos, -1, "FatRat.cos - 3.14159265361894");
@@ -186,7 +185,6 @@ for @cosines -> $angle
is_approx(acos(DifferentReal.new(0.707106781186548)), 0.785398163404734, "acos(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((0.707106781186548).FatRat).acos, 0.785398163404734, "FatRat.acos - 0.785398163404734");
View
2 S32-trig/cosec.t
@@ -126,7 +126,6 @@ for @sines -> $angle
is_approx(cosec(DifferentReal.new(6.80678408284103)), 1.99999999978126, "cosec(DifferentReal) - 6.80678408284103");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((10.2101761242615).FatRat.cosec, -1.41421356223915, "FatRat.cosec - 10.2101761242615");
@@ -186,7 +185,6 @@ for @sines -> $angle
is_approx(acosec(DifferentReal.new(1.41421356236279)), 0.785398163404734, "acosec(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((1.99999999998317).FatRat).acosec, 0.523598775603156, "FatRat.acosec - 0.523598775603156");
View
2 S32-trig/cosech.t
@@ -126,7 +126,6 @@ for @sines -> $angle
is_approx(cosech(DifferentReal.new(4.7123889804284)), 0.0179680320529917, "cosech(DifferentReal) - 4.7123889804284");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((5.49778714383314).FatRat.cosech, 0.00819178720191627, "FatRat.cosech - 5.49778714383314");
@@ -186,7 +185,6 @@ for @sines -> $angle
is_approx(acosech(DifferentReal.new(1.15118387090806)), 0.785398163404734, "acosech(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((1.8253055746695).FatRat).acosech, 0.523598775603156, "FatRat.acosech - 0.523598775603156");
View
2 S32-trig/cosh.t
@@ -126,7 +126,6 @@ for @coshes -> $angle
is_approx(cosh(DifferentReal.new(3.92699081702367)), 25.3868611932849, "cosh(DifferentReal) - 3.92699081702367");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((4.7123889804284).FatRat.cosh, 55.6633808928716, "FatRat.cosh - 4.7123889804284");
@@ -186,7 +185,6 @@ for @coshes -> $angle
is_approx(acosh(DifferentReal.new(1.32460908925833)), 0.785398163404734, "acosh(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((1.14023832107909).FatRat).acosh, 0.523598775603156, "FatRat.acosh - 0.523598775603156");
View
2 S32-trig/cotan.t
@@ -126,7 +126,6 @@ for @sines -> $angle
is_approx(cotan(DifferentReal.new(6.80678408284103)), 1.7320508073163, "cotan(DifferentReal) - 6.80678408284103");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((10.2101761242615).FatRat.cotan, 0.999999999810569, "FatRat.cotan - 10.2101761242615");
@@ -186,7 +185,6 @@ for @sines -> $angle
is_approx(acotan(DifferentReal.new(0.999999999985428)), 0.785398163404734, "acotan(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((1.73205080754945).FatRat).acotan, 0.523598775603156, "FatRat.acotan - 0.523598775603156");
View
2 S32-trig/cotanh.t
@@ -126,7 +126,6 @@ for @sines -> $angle
is_approx(cotanh(DifferentReal.new(4.7123889804284)), 1.000161412061, "cotanh(DifferentReal) - 4.7123889804284");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((5.49778714383314).FatRat.cotanh, 1.00003355212591, "FatRat.cotanh - 5.49778714383314");
@@ -186,7 +185,6 @@ for @sines -> $angle
is_approx(acotanh(DifferentReal.new(1.52486861881241)), 0.785398163404734, "acotanh(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((2.08128336391745).FatRat).acotanh, 0.523598775603156, "FatRat.acotanh - 0.523598775603156");
View
2 S32-trig/sec.t
@@ -126,7 +126,6 @@ for @cosines -> $angle
is_approx(sec(DifferentReal.new(5.23598775603156)), 1.99999999983174, "sec(DifferentReal) - 5.23598775603156");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((8.63937979745208).FatRat.sec, -1.41421356225975, "FatRat.sec - 8.63937979745208");
@@ -186,7 +185,6 @@ for @cosines -> $angle
is_approx(asec(DifferentReal.new(1.4142135623834)), 0.785398163404734, "asec(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((1.4142135623834).FatRat).asec, 0.785398163404734, "FatRat.asec - 0.785398163404734");
View
2 S32-trig/sech.t
@@ -126,7 +126,6 @@ for @cosines -> $angle
is_approx(sech(DifferentReal.new(2.3561944902142)), 0.187872734233684, "sech(DifferentReal) - 2.3561944902142");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((3.14159265361894).FatRat.sech, 0.0862667383315497, "FatRat.sech - 3.14159265361894");
@@ -186,7 +185,6 @@ for @cosines -> $angle
is_approx(asech(DifferentReal.new(0.754939708710524)), 0.785398163404734, "asech(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((0.754939708710524).FatRat).asech, 0.785398163404734, "FatRat.asech - 0.785398163404734");
View
2 S32-trig/sin.t
@@ -126,7 +126,6 @@ for @sines -> $angle
is_approx(sin(DifferentReal.new(3.92699081702367)), -0.707106781186548, "sin(DifferentReal) - 3.92699081702367");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((4.7123889804284).FatRat.sin, -1, "FatRat.sin - 4.7123889804284");
@@ -186,7 +185,6 @@ for @sines -> $angle
is_approx(asin(DifferentReal.new(0.707106781186548)), 0.785398163404734, "asin(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((0.5).FatRat).asin, 0.523598775603156, "FatRat.asin - 0.523598775603156");
View
2 S32-trig/sinh.t
@@ -126,7 +126,6 @@ for @sinhes -> $angle
is_approx(sinh(DifferentReal.new(3.92699081702367)), 25.367158320299, "sinh(DifferentReal) - 3.92699081702367");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((4.7123889804284).FatRat.sinh, 55.6543976018509, "FatRat.sinh - 4.7123889804284");
@@ -186,7 +185,6 @@ for @sinhes -> $angle
is_approx(asinh(DifferentReal.new(0.86867096149566)), 0.785398163404734, "asinh(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((0.547853473893578).FatRat).asinh, 0.523598775603156, "FatRat.asinh - 0.523598775603156");
View
2 S32-trig/tan.t
@@ -126,7 +126,6 @@ for @sines -> $angle
is_approx(tan(DifferentReal.new(5.49778714383314)), -0.999999999897998, "tan(DifferentReal) - 5.49778714383314");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((6.28318530723787).FatRat.tan, 5.82864638634609e-11, "FatRat.tan - 6.28318530723787");
@@ -186,7 +185,6 @@ for @sines -> $angle
is_approx(atan(DifferentReal.new(1.00000000001457)), 0.785398163404734, "atan(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((0.577350269196102).FatRat).atan, 0.523598775603156, "FatRat.atan - 0.523598775603156");
View
2 S32-trig/tanh.t
@@ -126,7 +126,6 @@ for @sines -> $angle
is_approx(tanh(DifferentReal.new(3.92699081702367)), 0.999223894878698, "tanh(DifferentReal) - 3.92699081702367");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx((4.7123889804284).FatRat.tanh, 0.999838613988647, "FatRat.tanh - 4.7123889804284");
@@ -186,7 +185,6 @@ for @sines -> $angle
is_approx(atanh(DifferentReal.new(0.655794202636825)), 0.785398163404734, "atanh(DifferentReal) - 0.785398163404734");
}
-#?rakudo skip "FatRat math NYI"
{
# FatRat tests
is_approx(((0.480472778160188).FatRat).atanh, 0.523598775603156, "FatRat.atanh - 0.523598775603156");

0 comments on commit 4457dc4

Please sign in to comment.