Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Re-generated files with done-testing
  • Loading branch information
@lizmat
lizmat committed Aug 19, 2015
1 parent f4f4af1 commit 04520b2
Show file tree
Hide file tree
Showing 13 changed files with 386 additions and 388 deletions.
162 changes: 81 additions & 81 deletions S32-trig/atan2.t
View file

Large diffs are not rendered by default.

50 changes: 25 additions & 25 deletions S32-trig/cos.t
View file
Expand Up @@ -94,42 +94,42 @@ for @cosines -> $angle

{
# Num tests
is_approx(cos((-7.85398163404734).Num), 0, "cos(Num) - -7.85398163404734");
is_approx(cos((-7.8539816).Num), 0, "cos(Num) - -7.8539816");
}

{
# Rat tests
is_approx((-5.49778714383314).Rat(1e-9).cos, 0.707106781186548, "Rat.cos - -5.49778714383314");
is_approx(cos((-2.09439510241262).Rat(1e-9)), -0.5, "cos(Rat) - -2.09439510241262");
is_approx((-5.4977871).Rat(1e-9).cos, 0.707106781186548, "Rat.cos - -5.4977871");
is_approx(cos((-2.0943951).Rat(1e-9)), -0.5, "cos(Rat) - -2.0943951");
}

{
# Complex tests
is_approx(cos((-1.57079632680947 + 2i).Complex), -5.48212707989036e-11 + 3.62686040784702i, "cos(Complex) - -1.57079632680947 + 2i");
is_approx(cos((-1.57079632680947+2i).Complex), -5.48212707989036e-11+3.62686040784702i, "cos(Complex) - -1.57079632680947+2i");
}

{
# Str tests
is_approx((-1.04719755120631).Str.cos, 0.5, "Str.cos - -1.04719755120631");
is_approx(cos((-0.785398163404734).Str), 0.707106781186548, "cos(Str) - -0.785398163404734");
is_approx((-1.0471976).Str.cos, 0.5, "Str.cos - -1.0471976");
is_approx(cos((-0.7853982).Str), 0.707106781186548, "cos(Str) - -0.7853982");
}

{
# NotComplex tests
is_approx(NotComplex.new(0 + 2i).cos, 3.76219569108363 + 0i, "NotComplex.cos - 0 + 2i");
is_approx(cos(NotComplex.new(0.785398163404734 + 2i)), 2.66027408529666 - 2.56457758882432i, "cos(NotComplex) - 0.785398163404734 + 2i");
is_approx(NotComplex.new(0+2i).cos, 3.76219569108363+-0i, "NotComplex.cos - 0+2i");
is_approx(cos(NotComplex.new(0.785398163404734+2i)), 2.66027408529666-2.56457758882432i, "cos(NotComplex) - 0.785398163404734+2i");
}

{
# DifferentReal tests
is_approx(DifferentReal.new(1.57079632680947).cos, 0, "DifferentReal.cos - 1.57079632680947");
is_approx(cos(DifferentReal.new(2.3561944902142)), -0.707106781186548, "cos(DifferentReal) - 2.3561944902142");
is_approx(DifferentReal.new(1.5707963).cos, 0, "DifferentReal.cos - 1.5707963");
is_approx(cos(DifferentReal.new(2.3561945)), -0.707106781186548, "cos(DifferentReal) - 2.3561945");
}

{
# FatRat tests
is_approx((3.14159265361894).FatRat.cos, -1, "FatRat.cos - 3.14159265361894");
is_approx(cos((3.92699081702367).FatRat), -0.707106781186548, "cos(FatRat) - 3.92699081702367");
is_approx((3.141593).FatRat.cos, -1, "FatRat.cos - 3.141593");
is_approx(cos((3.9269908).FatRat), -0.707106781186548, "cos(FatRat) - 3.9269908");
}


Expand All @@ -153,44 +153,44 @@ for @cosines -> $angle

{
# Num tests
is_approx(acos((0.707106781186548).Num), 0.785398163404734, "acos(Num) - 0.785398163404734");
is_approx(acos((0.707106781186548).Num), 0.7853982, "acos(Num) - 0.7853982");
}

{
# Rat tests
is_approx(((0.707106781186548).Rat(1e-9)).acos, 0.785398163404734, "Rat.acos - 0.785398163404734");
is_approx(acos((0.707106781186548).Rat(1e-9)), 0.785398163404734, "acos(Rat) - 0.785398163404734");
is_approx(((0.707106781186548).Rat(1e-9)).acos, 0.7853982, "Rat.acos - 0.7853982");
is_approx(acos((0.707106781186548).Rat(1e-9)), 0.7853982, "acos(Rat) - 0.7853982");
}

{
# Complex tests
is_approx(acos((0.785398163404734 + 2i).Complex), 1.22945740674052 - 1.49709293866352i, "acos(Complex) - 1.22945740674052 - 1.49709293866352i");
is_approx(acos((0.785398163404734+2i).Complex), 1.22945740853541-1.49709293866352i, "acos(Complex) - 1.22945740853541-1.49709293866352i");
}

{
# Str tests
is_approx(((0.707106781186548).Str).acos, 0.785398163404734, "Str.acos - 0.785398163404734");
is_approx(acos((0.707106781186548).Str), 0.785398163404734, "acos(Str) - 0.785398163404734");
is_approx(((0.707106781186548).Str).acos, 0.7853982, "Str.acos - 0.7853982");
is_approx(acos((0.707106781186548).Str), 0.7853982, "acos(Str) - 0.7853982");
}

{
# NotComplex tests
is_approx((NotComplex.new(0.785398163404734 + 2i)).acos, 1.22945740674052 - 1.49709293866352i, "NotComplex.acos - 1.22945740674052 - 1.49709293866352i");
is_approx(acos(NotComplex.new(0.785398163404734 + 2i)), 1.22945740674052 - 1.49709293866352i, "acos(NotComplex) - 1.22945740674052 - 1.49709293866352i");
is_approx((NotComplex.new(0.785398163404734+2i)).acos, 1.22945740853541-1.49709293866352i, "NotComplex.acos - 1.22945740853541-1.49709293866352i");
is_approx(acos(NotComplex.new(0.785398163404734+2i)), 1.22945740853541-1.49709293866352i, "acos(NotComplex) - 1.22945740853541-1.49709293866352i");
}

{
# DifferentReal tests
is_approx((DifferentReal.new(0.707106781186548)).acos, 0.785398163404734, "DifferentReal.acos - 0.785398163404734");
is_approx(acos(DifferentReal.new(0.707106781186548)), 0.785398163404734, "acos(DifferentReal) - 0.785398163404734");
is_approx((DifferentReal.new(0.707106781186548)).acos, 0.7853982, "DifferentReal.acos - 0.7853982");
is_approx(acos(DifferentReal.new(0.707106781186548)), 0.7853982, "acos(DifferentReal) - 0.7853982");
}

{
# FatRat tests
is_approx(((0.707106781186548).FatRat).acos, 0.785398163404734, "FatRat.acos - 0.785398163404734");
is_approx(acos((0.707106781186548).FatRat), 0.785398163404734, "acos(FatRat) - 0.785398163404734");
is_approx(((0.707106781186548).FatRat).acos, 0.7853982, "FatRat.acos - 0.7853982");
is_approx(acos((0.707106781186548).FatRat), 0.7853982, "acos(FatRat) - 0.7853982");
}

done;
done-testing;

# vim: ft=perl6 nomodifiable
52 changes: 25 additions & 27 deletions S32-trig/cosec.t
View file
Expand Up @@ -5,8 +5,6 @@
use v6;
use Test;

plan 114;

sub degrees-to-radians($x) {
$x * (312689/99532) / 180;
}
Expand Down Expand Up @@ -96,42 +94,42 @@ for @sines -> $angle

{
# Num tests
is_approx(cosec((-3.92699081702367).Num), 1.41421356232158, "cosec(Num) - -3.92699081702367");
is_approx(cosec((-3.9269908).Num), 1.41421356232158, "cosec(Num) - -3.9269908");
}

{
# Rat tests
is_approx((-0.523598775603156).Rat(1e-9).cosec, -1.99999999998317, "Rat.cosec - -0.523598775603156");
is_approx(cosec((0.523598775603156).Rat(1e-9)), 1.99999999998317, "cosec(Rat) - 0.523598775603156");
is_approx((-0.5235988).Rat(1e-9).cosec, -1.99999999998317, "Rat.cosec - -0.5235988");
is_approx(cosec((0.5235988).Rat(1e-9)), 1.99999999998317, "cosec(Rat) - 0.5235988");
}

{
# Complex tests
is_approx(cosec((0.785398163404734 + 2i).Complex), 0.194833118738127 - 0.187824499973004i, "cosec(Complex) - 0.785398163404734 + 2i");
is_approx(cosec((0.785398163404734+2i).Complex), 0.194833118738127-0.187824499973004i, "cosec(Complex) - 0.785398163404734+2i");
}

{
# Str tests
is_approx((1.57079632680947).Str.cosec, 1, "Str.cosec - 1.57079632680947");
is_approx(cosec((2.3561944902142).Str), 1.41421356240401, "cosec(Str) - 2.3561944902142");
is_approx((1.5707963).Str.cosec, 1, "Str.cosec - 1.5707963");
is_approx(cosec((2.3561945).Str), 1.41421356240401, "cosec(Str) - 2.3561945");
}

{
# NotComplex tests
is_approx(NotComplex.new(3.92699081702367 + 2i).cosec, -0.194833118743389 + 0.187824499967129i, "NotComplex.cosec - 3.92699081702367 + 2i");
is_approx(cosec(NotComplex.new(4.7123889804284 + 2i)), -0.26580222883408 - 1.12015792238299e-11i, "cosec(NotComplex) - 4.7123889804284 + 2i");
is_approx(NotComplex.new(3.92699081702367+2i).cosec, -0.194833118743389+0.187824499967129i, "NotComplex.cosec - 3.92699081702367+2i");
is_approx(cosec(NotComplex.new(4.7123889804284+2i)), -0.26580222883408-1.12015792238299e-11i, "cosec(NotComplex) - 4.7123889804284+2i");
}

{
# DifferentReal tests
is_approx(DifferentReal.new(5.49778714383314).cosec, -1.41421356244522, "DifferentReal.cosec - 5.49778714383314");
is_approx(cosec(DifferentReal.new(6.80678408284103)), 1.99999999978126, "cosec(DifferentReal) - 6.80678408284103");
is_approx(DifferentReal.new(5.4977871).cosec, -1.41421356244522, "DifferentReal.cosec - 5.4977871");
is_approx(cosec(DifferentReal.new(6.8067841)), 1.99999999978126, "cosec(DifferentReal) - 6.8067841");
}

{
# FatRat tests
is_approx((10.2101761242615).FatRat.cosec, -1.41421356223915, "FatRat.cosec - 10.2101761242615");
is_approx(cosec((-3.92699081702367).FatRat), 1.41421356232158, "cosec(FatRat) - -3.92699081702367");
is_approx((10.2101761).FatRat.cosec, -1.41421356223915, "FatRat.cosec - 10.2101761");
is_approx(cosec((-3.9269908).FatRat), 1.41421356232158, "cosec(FatRat) - -3.9269908");
}


Expand All @@ -155,44 +153,44 @@ for @sines -> $angle

{
# Num tests
is_approx(acosec((1.99999999998317).Num), 0.523598775603156, "acosec(Num) - 0.523598775603156");
is_approx(acosec((1.99999999998317).Num), 0.5235988, "acosec(Num) - 0.5235988");
}

{
# Rat tests
is_approx(((1.41421356236279).Rat(1e-9)).acosec, 0.785398163404734, "Rat.acosec - 0.785398163404734");
is_approx(acosec((1.99999999998317).Rat(1e-9)), 0.523598775603156, "acosec(Rat) - 0.523598775603156");
is_approx(((1.41421356236279).Rat(1e-9)).acosec, 0.7853982, "Rat.acosec - 0.7853982");
is_approx(acosec((1.99999999998317).Rat(1e-9)), 0.5235988, "acosec(Rat) - 0.5235988");
}

{
# Complex tests
is_approx(acosec((0.785398163404734 + 2i).Complex), 0.156429673425433 - 0.425586400480703i, "acosec(Complex) - 0.156429673425433 - 0.425586400480703i");
is_approx(acosec((0.785398163404734+2i).Complex), 0.156429673425433-0.425586400480703i, "acosec(Complex) - 0.156429673425433-0.425586400480703i");
}

{
# Str tests
is_approx(((1.99999999998317).Str).acosec, 0.523598775603156, "Str.acosec - 0.523598775603156");
is_approx(acosec((1.41421356236279).Str), 0.785398163404734, "acosec(Str) - 0.785398163404734");
is_approx(((1.99999999998317).Str).acosec, 0.5235988, "Str.acosec - 0.5235988");
is_approx(acosec((1.41421356236279).Str), 0.7853982, "acosec(Str) - 0.7853982");
}

{
# NotComplex tests
is_approx((NotComplex.new(0.523598775603156 + 2i)).acosec, 0.11106127776165 - 0.454969900935893i, "NotComplex.acosec - 0.11106127776165 - 0.454969900935893i");
is_approx(acosec(NotComplex.new(0.785398163404734 + 2i)), 0.156429673425433 - 0.425586400480703i, "acosec(NotComplex) - 0.156429673425433 - 0.425586400480703i");
is_approx((NotComplex.new(0.523598775603156+2i)).acosec, 0.11106127776165-0.454969900935893i, "NotComplex.acosec - 0.11106127776165-0.454969900935893i");
is_approx(acosec(NotComplex.new(0.785398163404734+2i)), 0.156429673425433-0.425586400480703i, "acosec(NotComplex) - 0.156429673425433-0.425586400480703i");
}

{
# DifferentReal tests
is_approx((DifferentReal.new(1.99999999998317)).acosec, 0.523598775603156, "DifferentReal.acosec - 0.523598775603156");
is_approx(acosec(DifferentReal.new(1.41421356236279)), 0.785398163404734, "acosec(DifferentReal) - 0.785398163404734");
is_approx((DifferentReal.new(1.99999999998317)).acosec, 0.5235988, "DifferentReal.acosec - 0.5235988");
is_approx(acosec(DifferentReal.new(1.41421356236279)), 0.7853982, "acosec(DifferentReal) - 0.7853982");
}

{
# FatRat tests
is_approx(((1.99999999998317).FatRat).acosec, 0.523598775603156, "FatRat.acosec - 0.523598775603156");
is_approx(acosec((1.41421356236279).FatRat), 0.785398163404734, "acosec(FatRat) - 0.785398163404734");
is_approx(((1.99999999998317).FatRat).acosec, 0.5235988, "FatRat.acosec - 0.5235988");
is_approx(acosec((1.41421356236279).FatRat), 0.7853982, "acosec(FatRat) - 0.7853982");
}

done;
done-testing;

# vim: ft=perl6 nomodifiable
52 changes: 26 additions & 26 deletions S32-trig/cosech.t
View file
Expand Up @@ -86,50 +86,50 @@ for @sines -> $angle
is_approx($zp2.cosech, $sz2, "Complex.cosech - $zp2");
}

#?niecza todo "Inf results wrong"
#?niecza skip "Inf results wrong"
{
is(cosech(Inf), 0, "cosech(Inf) -");
is(cosech(-Inf), "-0", "cosech(-Inf) -");
}

{
# Num tests
is_approx(cosech((-6.28318530723787).Num), -0.00373489848806798, "cosech(Num) - -6.28318530723787");
is_approx(cosech((-6.283185).Num), -0.00373489848806798, "cosech(Num) - -6.283185");
}

{
# Rat tests
is_approx((-3.92699081702367).Rat(1e-9).cosech, -0.0394210493494572, "Rat.cosech - -3.92699081702367");
is_approx(cosech((-0.523598775603156).Rat(1e-9)), -1.8253055746695, "cosech(Rat) - -0.523598775603156");
is_approx((-3.9269908).Rat(1e-9).cosech, -0.0394210493494572, "Rat.cosech - -3.9269908");
is_approx(cosech((-0.5235988).Rat(1e-9)), -1.8253055746695, "cosech(Rat) - -0.5235988");
}

{
# Complex tests
is_approx(cosech((0.523598775603156 + 2i).Complex), -0.202302149262384 - 0.920006877922264i, "cosech(Complex) - 0.523598775603156 + 2i");
is_approx(cosech((0.523598775603156+2i).Complex), -0.202302149262384-0.920006877922264i, "cosech(Complex) - 0.523598775603156+2i");
}

{
# Str tests
is_approx((0.785398163404734).Str.cosech, 1.15118387090806, "Str.cosech - 0.785398163404734");
is_approx(cosech((1.57079632680947).Str), 0.434537208087792, "cosech(Str) - 1.57079632680947");
is_approx((0.7853982).Str.cosech, 1.15118387090806, "Str.cosech - 0.7853982");
is_approx(cosech((1.5707963).Str), 0.434537208087792, "cosech(Str) - 1.5707963");
}

{
# NotComplex tests
is_approx(NotComplex.new(2.3561944902142 + 2i).cosech, -0.0772627459225851 - 0.171882832059526i, "NotComplex.cosech - 2.3561944902142 + 2i");
is_approx(cosech(NotComplex.new(3.14159265361894 + 2i)), -0.0358119530230833 - 0.078543348553443i, "cosech(NotComplex) - 3.14159265361894 + 2i");
is_approx(NotComplex.new(2.3561944902142+2i).cosech, -0.0772627459225851-0.171882832059526i, "NotComplex.cosech - 2.3561944902142+2i");
is_approx(cosech(NotComplex.new(3.14159265361894+2i)), -0.0358119530230833-0.078543348553443i, "cosech(NotComplex) - 3.14159265361894+2i");
}

{
# DifferentReal tests
is_approx(DifferentReal.new(3.92699081702367).cosech, 0.0394210493494572, "DifferentReal.cosech - 3.92699081702367");
is_approx(cosech(DifferentReal.new(4.7123889804284)), 0.0179680320529917, "cosech(DifferentReal) - 4.7123889804284");
is_approx(DifferentReal.new(3.9269908).cosech, 0.0394210493494572, "DifferentReal.cosech - 3.9269908");
is_approx(cosech(DifferentReal.new(4.7123890)), 0.0179680320529917, "cosech(DifferentReal) - 4.7123890");
}

{
# FatRat tests
is_approx((5.49778714383314).FatRat.cosech, 0.00819178720191627, "FatRat.cosech - 5.49778714383314");
is_approx(cosech((6.28318530723787).FatRat), 0.00373489848806798, "cosech(FatRat) - 6.28318530723787");
is_approx((5.4977871).FatRat.cosech, 0.00819178720191627, "FatRat.cosech - 5.4977871");
is_approx(cosech((6.283185).FatRat), 0.00373489848806798, "cosech(FatRat) - 6.283185");
}


Expand All @@ -153,44 +153,44 @@ for @sines -> $angle

{
# Num tests
is_approx(acosech((1.8253055746695).Num), 0.523598775603156, "acosech(Num) - 0.523598775603156");
is_approx(acosech((1.8253055746695).Num), 0.5235988, "acosech(Num) - 0.5235988");
}

{
# Rat tests
is_approx(((1.15118387090806).Rat(1e-9)).acosech, 0.785398163404734, "Rat.acosech - 0.785398163404734");
is_approx(acosech((1.8253055746695).Rat(1e-9)), 0.523598775603156, "acosech(Rat) - 0.523598775603156");
is_approx(((1.15118387090806).Rat(1e-9)).acosech, 0.7853982, "Rat.acosech - 0.7853982");
is_approx(acosech((1.8253055746695).Rat(1e-9)), 0.5235988, "acosech(Rat) - 0.5235988");
}

{
# Complex tests
is_approx(acosech((0.785398163404734 + 2i).Complex), 0.186914543518615 - 0.439776333846415i, "acosech(Complex) - 0.186914543518615 - 0.439776333846415i");
is_approx(acosech((0.785398163404734+2i).Complex), 0.186914543518615-0.439776333846415i, "acosech(Complex) - 0.186914543518615-0.439776333846415i");
}

{
# Str tests
is_approx(((1.8253055746695).Str).acosech, 0.523598775603156, "Str.acosech - 0.523598775603156");
is_approx(acosech((1.15118387090806).Str), 0.785398163404734, "acosech(Str) - 0.785398163404734");
is_approx(((1.8253055746695).Str).acosech, 0.5235988, "Str.acosech - 0.5235988");
is_approx(acosech((1.15118387090806).Str), 0.7853982, "acosech(Str) - 0.7853982");
}

{
# NotComplex tests
is_approx((NotComplex.new(0.523598775603156 + 2i)).acosech, 0.137815559024863 - 0.481963452541975i, "NotComplex.acosech - 0.137815559024863 - 0.481963452541975i");
is_approx(acosech(NotComplex.new(0.785398163404734 + 2i)), 0.186914543518615 - 0.439776333846415i, "acosech(NotComplex) - 0.186914543518615 - 0.439776333846415i");
is_approx((NotComplex.new(0.523598775603156+2i)).acosech, 0.137815559024863-0.481963452541975i, "NotComplex.acosech - 0.137815559024863-0.481963452541975i");
is_approx(acosech(NotComplex.new(0.785398163404734+2i)), 0.186914543518615-0.439776333846415i, "acosech(NotComplex) - 0.186914543518615-0.439776333846415i");
}

{
# DifferentReal tests
is_approx((DifferentReal.new(1.8253055746695)).acosech, 0.523598775603156, "DifferentReal.acosech - 0.523598775603156");
is_approx(acosech(DifferentReal.new(1.15118387090806)), 0.785398163404734, "acosech(DifferentReal) - 0.785398163404734");
is_approx((DifferentReal.new(1.8253055746695)).acosech, 0.5235988, "DifferentReal.acosech - 0.5235988");
is_approx(acosech(DifferentReal.new(1.15118387090806)), 0.7853982, "acosech(DifferentReal) - 0.7853982");
}

{
# FatRat tests
is_approx(((1.8253055746695).FatRat).acosech, 0.523598775603156, "FatRat.acosech - 0.523598775603156");
is_approx(acosech((1.15118387090806).FatRat), 0.785398163404734, "acosech(FatRat) - 0.785398163404734");
is_approx(((1.8253055746695).FatRat).acosech, 0.5235988, "FatRat.acosech - 0.5235988");
is_approx(acosech((1.15118387090806).FatRat), 0.7853982, "acosech(FatRat) - 0.7853982");
}

done;
done-testing;

# vim: ft=perl6 nomodifiable

0 comments on commit 04520b2

Please sign in to comment.