Front page | perl.perl6.users |
Postings from March 2021
On 02/03/2021 09:12, ToddAndMargo via perl6-users wrote:
> Math problem:
> x = 60÷5(7−5)
>
> raku -e 'say 60÷5(7−5)'
> No such method 'CALL-ME' for invocant of type 'Int'
> in block <unit> at -e line 1
>
> Seems raku does not like the (). How do I fix this
> and maintain the flow and look of the equation?
>
> -T
>
> The correct answer is 24
The correct answer can be found with the following code.
class SuperInt {
has $.left-factor is rw;
has $.right-factor is rw;
method new(\l, \r) {
my \SELF = self.CREATE;
SELF.left-factor = l;
SELF.right-factor = r;
SELF
}
}
multi sub infix:<÷>(Numeric:D \l, SuperInt:D \r) {
l ÷ r.left-factor * r.right-factor
}
Int.^add_method('CALL-ME', my method (\SELF: \v) { SuperInt.new(SELF, v) });
Int.^compose;
say 60÷5(7−5);
Thought, I do have the hunch that this might break with a slightly more
complex examle.
Have -Ofun
gfldex
Thread Previous
|
Thread Next