svn switch --relocate svn.openfoundry.org/pugs svn.pugscode.org/pugs/ | run.pugscode.org | spec.pugscode.org | paste: sial.org/pbot/perl6 | pugs.blogs.com
Set by avar on 16 November 2006.
prism god that feels better 00:35
just managed ti get rid of this solid lump of crap from out my nose 00:36
was about hald the siez of a golf ball
serves me right for beta testing Microsoft-Nose I guess
SamB Microsoft-Nose? 01:13
do they also offer a pie-thumb? 01:14
root4o hi 05:21
I watched this :video.google.com/videoplay?docid=44...ngEDU+lisp 05:24
and was wondering does Perl6 allow double/triple/etc i.e. multi-level-dispatch as discribed here..... or it just normal-multimethod dispatch ala advanced-java ?
lambdabot Title: Practical Common Lisp - Google Video, tinyurl.com/y7pe72
root4o FYI : searching for "engEDU" in video.google.com shows many very interesting conferences on different topics.... 05:27
TimToady root4o: it can do either depending on where you put semicolons instead of commas. 05:45
root4o aha..10x 05:50
offby1 cgi.ebay.com/IBM-Correcting-Selectr...dZViewItem 07:27
lambdabot tinyurl.com/yzux7w
offby1 hooray
thanks Mr lambdabot!
nothingmuch stevan: monzy started it all, for us 07:33
meppl good morning 07:49
good morning nothingmuch and lambdabot
Teratogen I have a -boobies command in my bot 09:12
oops wrong chan
ludan ola 10:21
Limbic_Region anyone around? 16:22
perlmonks.org/?node_id=587390 # Request for help translating a small bit of p5 into Perl 6
lambdabot Title: How to write this in Perl 6?
TimToady Limbic_Region: interesting. I note that the problem itself doesn't say the numbers have to be contiguous, though the example seems to indicate it. 16:36
there are many sets of 4 numbers on the same straight line that aren't in one of the 8 cardinal directions 16:37
actually, it limits it to vertical, horizontal, and diagonal, but the continguity is still somewhat implied by the example. 16:43
anyway, I'll whack on the P6 version...
Limbic_Region TimToady - sorry, was AFK 16:54
TimToady np
Limbic_Region TimToady - Project Euler is full of fun 5 minute distractions
I hadn't thought of it as a way practicing Perl 6 16:55
but since blazar asked I thought I should share with the channel
fwiw, blazar is in the hospital with an extremely rare form of cancer
TimToady Looks like a good way of showing off Perl 6. I just wish XX was implemented...
yow 16:56
Limbic_Region TimToady - if I am reading S03 correctly, xx in p5 is ('foo') x $some_num; 17:02
?
TimToady the X*X cross product metaoperator 17:05
X and XX are just common shortcuts 17:06
Limbic_Region oh, neat
TimToady but maybe it's not needed here, since the first line wants to [...] each 4 nums. 17:07
but I'm sure we can hyper some things.
Limbic_Region where is XX discussed as a cross product metaoperator?
I see it under metaoperators in S03 17:08
TimToady S03:1708
Limbic_Region ah, didn't look far enough down 17:09
TimToady he doesn't realize there's a min operator and [min] either... 17:10
Gothmog_ Limbic_Region: I don't think I found the problem you're talking about, though I'm pretty interested... could you tell me the name of the problem? 17:24
Limbic_Region according to blazar's use.perl journal entry (not PerlMonks node) it is problem 14 17:28
er um 17:29
scratch that
he has apparently written about 2 different problems
the one in his use.perl journal is 14
the one in the perlmonks node is 11
Gothmog_ So it is about "Up Down Left Right" and "Four Fours"? 17:30
Limbic_Region is trying to remember his password 17:32
I haven't done project euler in a long time
Problem 11's description is In the 2020 grid below, four numbers along a diagonal line have been marked in red. 17:33
my genious rating has dropped a fair amount as a result of not keeping up with new problems 17:35
Gothmog_ Ah, I see it now... if you aren't logged in and enter 11 in the quick search you get another problem. 17:36
TimToady you can click the problem list on the left and get to 11
Gothmog_ Ah, that works, too.. 17:38
Limbic_Region one of those problems lead me to write Partition::Integer::Unrestricted which I still need to upload to CPAN
pasteling "TimToady" at 71.139.39.243 pasted "a preliminary pugs-compatible solution" (32 lines, 1.5K) at sial.org/pbot/21546
Gothmog_ Strange that the search finds another problem with ID 11.
TimToady my solution uses max instead of the unimplemented [max], and prints in E notation, albeit with sufficient precision. 17:39
Limbic_Region TimToady - are you planning on replying? 17:40
TimToady also haven't thought about hyperizing yet, but I'm being dragged out for a walk by my health advisor. :)
yes, but not immediately.
maybe I'll just put up my prelim version now. 17:41
Limbic_Region heh, tell Gloria we said hi
Limbic_Region chuckles as he comes across a flattering picture of Heidi and a not-so-favorable Larry 17:48
lisppaste3 Gothmog pasted "potential XX implementation" at paste.lisp.org/display/31226 18:24
Gothmog_ Seems to work correctly with pugs... 18:26
And I can't think of a reason why it could go wrong. 18:27
TSa HaloO TimToady, are you back from your walk? 19:09
nothingmuch walking++ 19:13
TSa looks like it,yes 19:13
wolverian I don't understand what the heck @dirs is 19:31
er, @dir
(re: perlmonks.org/?node_id=587390)
lambdabot Title: How to write this in Perl 6?
wolverian oh. linear offsets 19:32
heh. my haskell solution is 15 lines and gives the wrong answer. :) 19:39
Gothmog_ wolverian: @dir is the direction... but I think, 22 is not correct there... 19:46
wolverian hrm. shouldn't it be 19 and 21? 19:48
anyway. I'm not using that method :)
Gothmog_ Yes, I think so... 19:50
But it gives the same result, whether you enter 22, 19 or neither. 19:52
wolverian yay, my program now gives the same answer. 19:55
it's not very pretty, though. :) 19:56
lisppaste3 wolverian pasted "Solution to #11" at paste.lisp.org/display/31238 20:01
Gothmog_ Ah no, we were wrong. 22 is correct. 20:11
He adds a 0 after every line, so each line has 21 entries... 20:12
wolverian Gothmog_, ah. thanks. 20:12
Gothmog_ I could write a much more elegant solution than I have in Perl6 if multidimensional arrays and [;] were implemented... 20:17
TimToady Gothmog_: thanks, I used your version in a followup that throws a lot of fancy tricks at it. 21:57
TimToady the last statement now reads: 21:59
say max gather {
for ^@data XX @dir {
take int [*] @data[ $^base »+« $^offs ];
}
}
the hyperop is actually bogus according to current specs though... 22:00
should be «+« instead.
Gothmog_ Very nice. But I think I have to correct you: the version of XX I wrote should really work for an arbitrary count of arguments... 22:12
@a XX @b XX @c ... should work, too.
lambdabot Maybe you meant: all-dicts arr ask . v
Gothmog_ I don't really know what pugs does with it, but I suppose it's either left or right associative... 22:16
And therefore it should work as expected. 22:17