🦋 Welcome to the MAIN() IRC channel of the Raku Programming Language (raku.org). Log available at irclogs.raku.org/raku/live.html . If you're a beginner, you can also check out the #raku-beginner channel!
Set by lizmat on 6 September 2022.
tbrowder antononcube: that's almost as good as the painting elephant could do 😆 ! 11:46
that was a long time ago, i think she was a Thai zoo animal 11:48
antononcube @tbrowder Extraordinary claims need extraordinary proofs. I.e., pictures or it didn’t happen. 12:38
scullucs www.youtube.com/watch?v=foahTqz7On4 15:22
It happened! 15:30
antononcube @lucs Ok. But that is not an abstract geometric forms painting. 15:38
scullucs Oh, you're so fussy 🙂 16:14
Pretty neat Mondrians you made though. 16:17
I'm curious how easy or hard they would be to distinguish from original Mondrians, given a guesser that doesn't know much of Mondrian's work, but has some experience with art. 16:19
Note that this is also pretty reductive: only a digital representation of the shapes and colors; no textures or effects that depend on the paint and canvas. 16:20
tbrowder scullucs: thanks for the proof, antononcube is brilliant, but doesn't appear to appreciate amateur comedian-wannabes 22:14
scullucs Hehe! 22:17
Xliff_ \o 23:37
Is there an equivalent for JS's lerp() # WTF is a "lerp", anyways?
m: my $a = 4..60; my $b = 0.675; sub lerp ($r, $v) { 23:38
camelia ===SORRY!=== Error while compiling <tmp>
Missing block
at <tmp>:1
------> ..60; my $b = 0.675; sub lerp ($r, $v) {⏏<EOL>
Xliff_ D'oh
m: my $a = 4..60; my $b = 0.675; sub lerp ($r, $v is copy) { $v = 0 if $v < 0; $v = 1 if $v > 1; ($r.max - $r.min) * $v + $r.min }; lerp($a, $b).say 23:40
camelia 41.8
Xliff_ Hmmm....
m: my $a = 4..60; my $b = 0.675; sub lerp ($r, $v is copy) { $v = 0 if $v < 0; $v = 1 if $v > 1; multi sub infix:<*> (Range $r, Num() $v) { $r.max - $r.min) * $v + $r.min }; say $a * $b 23:41
camelia ===SORRY!=== Error while compiling <tmp>
Missing block
at <tmp>:1
------> > (Range $r, Num() $v) { $r.max - $r.min⏏) * $v + $r.min }; say $a * $b
expecting any of:
statement end
statement modifier
Xliff_ m: my $a = 4..60; my $b = 0.675; sub lerp ($r, $v is copy) { $v = 0 if $v < 0; $v = 1 if $v > 1; multi sub infix:<*> (Range $r, Num() $v) { ($r.max - $r.min) * $v + $r.min }; say $a * $b
camelia ===SORRY!=== Error while compiling <tmp>
Missing block
at <tmp>:1
------> x - $r.min) * $v + $r.min }; say $a * $b⏏<EOL>
expecting any of:
postfix
statement end
statement modifier
stat…
Xliff_ m: my $a = 4..60; my $b = 0.675; multi sub infix:<*> (Range $r, Num() $v) { $v = 0 if $v < 0; $v = 1 if $v > 1; ($r.max - $r.min) * $v + $r.min }; say $a * $b 23:42
camelia 2.7..40.5
Xliff_ say (5..10) * 0.5 23:43
evalable6 2.5..5.0
Xliff_ Hrpm... thought that was available.
m: my $a = 4..60; my $b = 0.675; sub lerp ($r, $v is copy) { $v = 0 if $v < 0; $v = 1 if $v > 1; ($r.max - $r.min) * $v + $r.min }; say $a.&lerp: $b 23:44
camelia 41.8
Xliff_ Maybe a better name than lerp? 23:45
Too close for "derp" IMHO