Lines Matching defs:iter
532 my $iter = new symbolic 2;
534 my $cnt = $iter;
540 my $pi = $side*(2**($iter+2));
546 my $iter = new symbolic 2;
548 my $cnt = $iter;
553 my $pi = $side*(2**($iter+2));
653 my $iter = new symbolic1 2;
655 my $cnt = $iter;
661 my $pi = $side*(2**($iter+2));
667 my $iter = new symbolic1 2;
669 my $cnt = $iter;
674 my $pi = $side*(2**($iter+2));
719 use overload '<>' => \&iter;
721 sub iter { my ($x) = @_; return undef if $$x < 0; return $$x--; }
731 my $iter = iterator->new(5);
734 $acc .= " $out" while $out = <${iter}>;
736 $iter = iterator->new(5);
737 test scalar <${iter}>, '5'; # 176
739 $acc .= " $out" while $out = <$iter>;