diff options
Diffstat (limited to 'lib/overload.pm')
| -rw-r--r-- | lib/overload.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/overload.pm b/lib/overload.pm index 1d8f1a15ad..3750a43168 100644 --- a/lib/overload.pm +++ b/lib/overload.pm @@ -1029,7 +1029,7 @@ circumscribed octagon using the above package: my $iter = 1; # 2**($iter+2) = 8 my $side = new symbolic 1; my $cnt = $iter; - + while ($cnt--) { $side = (sqrt(1 + $side**2) - 1)/$side; } @@ -1154,7 +1154,7 @@ Use this module like this: my $iter = new symbolic 2; # 16-gon my $side = new symbolic 1; my $cnt = $iter; - + while ($cnt) { $cnt = $cnt - 1; # Mutator `--' not implemented $side = (sqrt(1 + $side**2) - 1)/$side; |