P is for Practical PerlMonks

### Re^3: perl6 rational number problem

 on Nov 21, 2017 at 18:07 UTC ( #1203930=note: print w/replies, xml ) Need Help??

in reply to Re^2: perl6 rational number problem
in thread perl6 rational number problem

You need FatRats.
```> my @a = 1.0, * * 0.9999... *;
[...]
> my @b = FatRat(1.0), * * 0.9999... *;
[...]
> say \$_, ' ', \$_.WHAT for @a[^10];
1 (Rat)
0.9999 (Rat)
0.99980001 (Rat)
0.999700029999 (Rat)
0.9996000599960001 (Rat)
0.99950009999 (Num)
0.999400149980001 (Num)
0.999300209965003 (Num)
0.999200279944007 (Num)
0.999100359916013 (Num)
> say \$_, ' ', \$_.WHAT for @b[^10];
1 (FatRat)
0.9999 (FatRat)
0.99980001 (FatRat)
0.999700029999 (FatRat)
0.9996000599960001 (FatRat)
0.99950009999000049999 (FatRat)
0.999400149980001499940001 (FatRat)
0.9993002099650034997900069999 (FatRat)
0.99920027994400699944002799920001 (FatRat)
0.999100359916012598740083996400089999 (FatRat)

Create A New User
Node Status?
node history
Node Type: note [id://1203930]
help
Chatterbox?
 [Discipulus]: someone can explain last faq by jdporter? if humor i missed it

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (8)
As of 2018-06-22 07:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
Voting Booth?
Should cpanminus be part of the standard Perl release?

Results (122 votes). Check out past polls.

Notices?