Help for this page

Select Code to Download

Select or download this

my $d_1 = 0.1e0; # double   0.1 ( == 3602879701896397/3602879701896396
+8 )
my $r_1 = 0.1;   # rational 1/10
...
say Rat($d_1);
say Rat($d_2);

Select or download this
```
not ok 1
not ok 4
...
not ok 7
0.1
0.1
```