@@ -86,50 +86,50 @@ for @sines -> $angle
86
86
is_approx($ zp2 . cosech , $ sz2 , " Complex.cosech - $ zp2" );
87
87
}
88
88
89
- # ?niecza todo "Inf results wrong"
89
+ # ?niecza skip "Inf results wrong"
90
90
{
91
91
is (cosech (Inf ), 0 , " cosech(Inf) -" );
92
92
is (cosech (-Inf ), " -0" , " cosech(-Inf) -" );
93
93
}
94
94
95
95
{
96
96
# Num tests
97
- is_approx(cosech ((-6.28318530723787 ). Num ), -0.00373489848806798 , " cosech(Num) - -6.28318530723787 " );
97
+ is_approx(cosech ((-6.283185 ). Num ), -0.00373489848806798 , " cosech(Num) - -6.283185 " );
98
98
}
99
99
100
100
{
101
101
# Rat tests
102
- is_approx((-3.92699081702367 ). Rat (1e-9 ). cosech , -0.0394210493494572 , " Rat.cosech - -3.92699081702367 " );
103
- is_approx(cosech ((-0.523598775603156 ). Rat (1e-9 )), -1.8253055746695 , " cosech(Rat) - -0.523598775603156 " );
102
+ is_approx((-3.9269908 ). Rat (1e-9 ). cosech , -0.0394210493494572 , " Rat.cosech - -3.9269908 " );
103
+ is_approx(cosech ((-0.5235988 ). Rat (1e-9 )), -1.8253055746695 , " cosech(Rat) - -0.5235988 " );
104
104
}
105
105
106
106
{
107
107
# Complex tests
108
- is_approx(cosech ((0.523598775603156 + 2 i). Complex ), -0.202302149262384 - 0.920006877922264 i, " cosech(Complex) - 0.523598775603156 + 2i" );
108
+ is_approx(cosech ((0.523598775603156 + 2i). Complex ), -0.202302149262384 - 0. 920006877922264i, " cosech(Complex) - 0.523598775603156+ 2i" );
109
109
}
110
110
111
111
{
112
112
# Str tests
113
- is_approx((0.785398163404734 ). Str . cosech , 1.15118387090806 , " Str.cosech - 0.785398163404734 " );
114
- is_approx(cosech ((1.57079632680947 ). Str ), 0.434537208087792 , " cosech(Str) - 1.57079632680947 " );
113
+ is_approx((0.7853982 ). Str . cosech , 1.15118387090806 , " Str.cosech - 0.7853982 " );
114
+ is_approx(cosech ((1.5707963 ). Str ), 0.434537208087792 , " cosech(Str) - 1.5707963 " );
115
115
}
116
116
117
117
{
118
118
# NotComplex tests
119
- is_approx(NotComplex. new (2.3561944902142 + 2 i). cosech , -0.0772627459225851 - 0.171882832059526 i, " NotComplex.cosech - 2.3561944902142 + 2i" );
120
- is_approx(cosech (NotComplex. new (3.14159265361894 + 2 i)), -0.0358119530230833 - 0.078543348553443 i, " cosech(NotComplex) - 3.14159265361894 + 2i" );
119
+ is_approx(NotComplex. new (2.3561944902142 + 2i). cosech , -0.0772627459225851 - 0. 171882832059526i, " NotComplex.cosech - 2.3561944902142+ 2i" );
120
+ is_approx(cosech (NotComplex. new (3.14159265361894 + 2i)), -0.0358119530230833 - 0. 078543348553443i, " cosech(NotComplex) - 3.14159265361894+ 2i" );
121
121
}
122
122
123
123
{
124
124
# DifferentReal tests
125
- is_approx(DifferentReal. new (3.92699081702367 ). cosech , 0.0394210493494572 , " DifferentReal.cosech - 3.92699081702367 " );
126
- is_approx(cosech (DifferentReal. new (4.7123889804284 )), 0.0179680320529917 , " cosech(DifferentReal) - 4.7123889804284 " );
125
+ is_approx(DifferentReal. new (3.9269908 ). cosech , 0.0394210493494572 , " DifferentReal.cosech - 3.9269908 " );
126
+ is_approx(cosech (DifferentReal. new (4.7123890 )), 0.0179680320529917 , " cosech(DifferentReal) - 4.7123890 " );
127
127
}
128
128
129
129
{
130
130
# FatRat tests
131
- is_approx((5.49778714383314 ). FatRat . cosech , 0.00819178720191627 , " FatRat.cosech - 5.49778714383314 " );
132
- is_approx(cosech ((6.28318530723787 ). FatRat ), 0.00373489848806798 , " cosech(FatRat) - 6.28318530723787 " );
131
+ is_approx((5.4977871 ). FatRat . cosech , 0.00819178720191627 , " FatRat.cosech - 5.4977871 " );
132
+ is_approx(cosech ((6.283185 ). FatRat ), 0.00373489848806798 , " cosech(FatRat) - 6.283185 " );
133
133
}
134
134
135
135
@@ -153,44 +153,44 @@ for @sines -> $angle
153
153
154
154
{
155
155
# Num tests
156
- is_approx(acosech ((1.8253055746695 ). Num ), 0.523598775603156 , " acosech(Num) - 0.523598775603156 " );
156
+ is_approx(acosech ((1.8253055746695 ). Num ), 0.5235988 , " acosech(Num) - 0.5235988 " );
157
157
}
158
158
159
159
{
160
160
# Rat tests
161
- is_approx(((1.15118387090806 ). Rat (1e-9 )). acosech , 0.785398163404734 , " Rat.acosech - 0.785398163404734 " );
162
- is_approx(acosech ((1.8253055746695 ). Rat (1e-9 )), 0.523598775603156 , " acosech(Rat) - 0.523598775603156 " );
161
+ is_approx(((1.15118387090806 ). Rat (1e-9 )). acosech , 0.7853982 , " Rat.acosech - 0.7853982 " );
162
+ is_approx(acosech ((1.8253055746695 ). Rat (1e-9 )), 0.5235988 , " acosech(Rat) - 0.5235988 " );
163
163
}
164
164
165
165
{
166
166
# Complex tests
167
- is_approx(acosech ((0.785398163404734 + 2 i). Complex ), 0.186914543518615 - 0.439776333846415 i, " acosech(Complex) - 0.186914543518615 - 0.439776333846415i" );
167
+ is_approx(acosech ((0.785398163404734 + 2i). Complex ), 0.186914543518615 - 0. 439776333846415i, " acosech(Complex) - 0.186914543518615- 0.439776333846415i" );
168
168
}
169
169
170
170
{
171
171
# Str tests
172
- is_approx(((1.8253055746695 ). Str ). acosech , 0.523598775603156 , " Str.acosech - 0.523598775603156 " );
173
- is_approx(acosech ((1.15118387090806 ). Str ), 0.785398163404734 , " acosech(Str) - 0.785398163404734 " );
172
+ is_approx(((1.8253055746695 ). Str ). acosech , 0.5235988 , " Str.acosech - 0.5235988 " );
173
+ is_approx(acosech ((1.15118387090806 ). Str ), 0.7853982 , " acosech(Str) - 0.7853982 " );
174
174
}
175
175
176
176
{
177
177
# NotComplex tests
178
- is_approx((NotComplex. new (0.523598775603156 + 2 i)). acosech , 0.137815559024863 - 0.481963452541975 i, " NotComplex.acosech - 0.137815559024863 - 0.481963452541975i" );
179
- is_approx(acosech (NotComplex. new (0.785398163404734 + 2 i)), 0.186914543518615 - 0.439776333846415 i, " acosech(NotComplex) - 0.186914543518615 - 0.439776333846415i" );
178
+ is_approx((NotComplex. new (0.523598775603156 + 2i)). acosech , 0.137815559024863 - 0. 481963452541975i, " NotComplex.acosech - 0.137815559024863- 0.481963452541975i" );
179
+ is_approx(acosech (NotComplex. new (0.785398163404734 + 2i)), 0.186914543518615 - 0. 439776333846415i, " acosech(NotComplex) - 0.186914543518615- 0.439776333846415i" );
180
180
}
181
181
182
182
{
183
183
# DifferentReal tests
184
- is_approx((DifferentReal. new (1.8253055746695 )). acosech , 0.523598775603156 , " DifferentReal.acosech - 0.523598775603156 " );
185
- is_approx(acosech (DifferentReal. new (1.15118387090806 )), 0.785398163404734 , " acosech(DifferentReal) - 0.785398163404734 " );
184
+ is_approx((DifferentReal. new (1.8253055746695 )). acosech , 0.5235988 , " DifferentReal.acosech - 0.5235988 " );
185
+ is_approx(acosech (DifferentReal. new (1.15118387090806 )), 0.7853982 , " acosech(DifferentReal) - 0.7853982 " );
186
186
}
187
187
188
188
{
189
189
# FatRat tests
190
- is_approx(((1.8253055746695 ). FatRat ). acosech , 0.523598775603156 , " FatRat.acosech - 0.523598775603156 " );
191
- is_approx(acosech ((1.15118387090806 ). FatRat ), 0.785398163404734 , " acosech(FatRat) - 0.785398163404734 " );
190
+ is_approx(((1.8253055746695 ). FatRat ). acosech , 0.5235988 , " FatRat.acosech - 0.5235988 " );
191
+ is_approx(acosech ((1.15118387090806 ). FatRat ), 0.7853982 , " acosech(FatRat) - 0.7853982 " );
192
192
}
193
193
194
- done ;
194
+ done-testing ;
195
195
196
196
# vim: ft=perl6 nomodifiable
0 commit comments