Re: Turning numbers to 1!

[alexm]

Instead of

    $set_S[$r] = [$r];

you can just say

    $set_S[$r] = $r;

and then

    print "$set_S[$s]\t$epsilons[$s]\t";
    $set_S[$s] = $set_S[$s] + $epsilons[$s];
    print $set_S[$s], "\n";

I don't see any reason to enclose $r on an anonymous array reference, at least in this context.