overloadin.pl6

# No need for new/BUILD if you accept a longer instantiation
class FuzzyNum {
  has Num $.i;
  method gist { $!i.gist }
};

# Must be multi, otherwise overwrites all + operators
multi sub infix:<+>(FuzzyNum $a, FuzzyNum $b) {
  FuzzyNum.new(i => $a.i + $b.i + rand ** rand)
}

my FuzzyNum $a .= new(i => 1e0);
my FuzzyNum $b .= new(i => 1e0);

# Not sure why WHAT doesn't work here but it doesn't
say $a;
say $b;

say $a + $b