00:01:54 AtnNn [n=welcome@modemcable087.62-56-74.mc.videotron.ca] has joined #scheme 00:02:15 I forgot about quasipatterns in MATCH. 00:02:28 That is nice. 00:04:28 sepult [n=buggarag@xdsl-87-78-122-141.netcologne.de] has joined #scheme 00:19:47 raikov [n=igr@203.181.243.11] has joined #scheme 00:21:48 -!- hkBst [n=hkBst@gentoo/developer/hkbst] has quit [Read error: 104 (Connection reset by peer)] 00:22:52 andrei [n=user@c-98-223-64-197.hsd1.in.comcast.net] has joined #scheme 00:23:26 -!- kinks [n=Kinks@wnpgmb0909w-ad01-74-173.dynamic.mts.net] has quit [Remote closed the connection] 00:27:20 -!- melgray [n=melgray@70.99.250.82] has quit [] 00:29:25 hi 00:40:18 xor [i=gavin@97-118-133-183.hlrn.qwest.net] has joined #scheme 00:40:40 -!- xor is now known as bsmntbombdood 00:47:49 -!- metasynt1x [n=taylor@pool-71-127-85-87.aubnin.fios.verizon.net] has quit [Client Quit] 00:47:59 metasyntax [n=taylor@pool-71-127-85-87.aubnin.fios.verizon.net] has joined #scheme 00:49:04 -!- metasyntax [n=taylor@pool-71-127-85-87.aubnin.fios.verizon.net] has quit [Client Quit] 00:53:23 klutometis, some Scheme systems interpret octothorpes in decimal number literals as zeros; some interpret them as fives. Others are welcome to store them as different from any digit, with some kind of interval arithmetic for inexact numbers. 00:54:00 duncanm, I imagine that incubot quoted me about #cs/#ci in Scheme48's reader. 00:56:36 acarrico [n=acarrico@pppoe-68-142-49-77.gmavt.net] has joined #scheme 01:01:17 -!- MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has left #scheme 01:01:45 MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has joined #scheme 01:02:51 -!- MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has left #scheme 01:03:16 MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has joined #scheme 01:04:50 -!- bsmntbombdood [i=gavin@97-118-133-183.hlrn.qwest.net] has quit [Read error: 110 (Connection timed out)] 01:11:10 teiresias [n=user@ip68-12-115-220.ok.ok.cox.net] has joined #scheme 01:11:33 -!- eli [n=eli@winooski.ccs.neu.edu] has quit [Remote closed the connection] 01:14:35 -!- arcfide [n=arcfide@adsl-99-50-227-180.dsl.bltnin.sbcglobal.net] has quit ["Restart"] 01:15:31 eli [n=eli@winooski.ccs.neu.edu] has joined #scheme 01:17:04 ventonegro [n=alex@c95196b2.virtua.com.br] has joined #scheme 01:19:35 bsmntbombdood_ [i=gavin@97-118-133-183.hlrn.qwest.net] has joined #scheme 01:22:37 davidad [n=me@RANDOM-THREE-SEVENTY-SEVEN.MIT.EDU] has joined #scheme 01:25:01 -!- xwl_ [n=user@147.243.236.60] has quit [Remote closed the connection] 01:26:02 xwl_ [n=user@147.243.236.60] has joined #scheme 01:27:51 -!- xwl_ [n=user@147.243.236.60] has quit [Remote closed the connection] 01:28:01 xwl_` [n=user@147.243.236.60] has joined #scheme 01:35:49 sepult_ [n=buggarag@xdsl-87-78-30-252.netcologne.de] has joined #scheme 01:36:30 jonrafkind [n=jon@c-98-202-86-149.hsd1.ut.comcast.net] has joined #scheme 01:39:43 subversus [i=elliot@loveturtle.net] has joined #scheme 01:39:51 -!- davidad [n=me@RANDOM-THREE-SEVENTY-SEVEN.MIT.EDU] has quit [Connection timed out] 01:43:52 davidad [n=me@RANDOM-ONE-NINETY-SEVEN.MIT.EDU] has joined #scheme 01:52:46 -!- sepult [n=buggarag@xdsl-87-78-122-141.netcologne.de] has quit [Read error: 110 (Connection timed out)] 01:55:06 GreyLensman [n=ray@c-76-108-236-161.hsd1.fl.comcast.net] has joined #scheme 01:55:37 -!- GreyLensman [n=ray@c-76-108-236-161.hsd1.fl.comcast.net] has quit [Client Quit] 01:58:29 -!- raikov [n=igr@203.181.243.11] has quit [Read error: 60 (Operation timed out)] 02:01:07 clog [n=nef@bespin.org] has joined #scheme 02:04:20 synthase [n=synthase@68.63.19.212] has joined #scheme 02:07:19 -!- sepult_ [n=buggarag@xdsl-87-78-30-252.netcologne.de] has quit [Client Quit] 02:14:45 -!- saccade_ [n=saccade@BRAIN-AND-COG-FIFTY-TWO.MIT.EDU] has quit ["This computer has gone to sleep"] 02:15:46 neilv-2 [n=user@dsl092-071-030.bos1.dsl.speakeasy.net] has joined #scheme 02:15:50 -!- neilv-2 [n=user@dsl092-071-030.bos1.dsl.speakeasy.net] has quit [Client Quit] 02:16:42 -!- acarrico [n=acarrico@pppoe-68-142-49-77.gmavt.net] has left #scheme 02:18:09 SunnyWu [n=Administ@114.217.27.85] has joined #scheme 02:19:51 mindCrime [n=chatzill@cpe-075-177-141-190.nc.res.rr.com] has joined #scheme 02:20:06 -!- neilv [n=user@dsl092-071-029.bos1.dsl.speakeasy.net] has quit [Read error: 60 (Operation timed out)] 02:20:12 Fare [n=Fare@c-98-216-111-110.hsd1.ma.comcast.net] has joined #scheme 02:26:59 eno__ [n=eno@adsl-70-137-182-29.dsl.snfc21.sbcglobal.net] has joined #scheme 02:28:38 Sunny [i=Administ@121.227.233.74] has joined #scheme 02:32:04 Fare: Finally! 02:32:18 -!- eno [n=eno@nslu2-linux/eno] has quit [Nick collision from services.] 02:32:23 -!- eno__ is now known as eno 02:33:42 -!- SunnyWu [n=Administ@114.217.27.85] has quit [Read error: 60 (Operation timed out)] 02:33:46 apologies 02:35:22 raikov [n=igr@203.181.243.11] has joined #scheme 02:42:54 eli: how are you? 02:48:10 Fare: Reasonable. 02:48:42 Fare: It looked like the server was completely gone -- I've never seen such a long timeout... 02:51:37 -!- Sunny [i=Administ@121.227.233.74] has quit ["Leaving"] 02:51:51 mix of several problems at the same time 02:51:57 debian update + reboot 02:52:07 at the same time, DNS all went wrong 02:52:54 probably because it was in a meta-stable state, and went south when the server was rebooted 02:56:19 -!- Fare [n=Fare@c-98-216-111-110.hsd1.ma.comcast.net] has quit ["Leaving"] 02:59:51 sepult [n=buggarag@xdsl-87-78-30-252.netcologne.de] has joined #scheme 03:02:37 -!- Adamant [n=Adamant@unaffiliated/adamant] has quit [] 03:07:17 jcowan [n=jcowan@dsl-67-158-180-34.taconic.net] has joined #scheme 03:07:31 -!- teiresias [n=user@ip68-12-115-220.ok.ok.cox.net] has quit ["ERC Version 5.2 (IRC client for Emacs)"] 03:08:27 -!- MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has left #scheme 03:08:31 Adamant [n=Adamant@c-76-29-188-22.hsd1.ga.comcast.net] has joined #scheme 03:08:53 MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has joined #scheme 03:11:22 -!- Quadrescence [n=quad@unaffiliated/quadrescence] has quit ["omghaahhahaohwow"] 03:12:32 Riastradh: interesting; the most specific passage from r5rs runs: 03:12:33 "[The constant] is inexact if it contains a decimal point, an exponent, or a ``#'' character in the place of a digit, otherwise it is exact. 03:13:30 I take it, then, that it is an indeterminate digit; and might as well be aleatoric. 03:14:00 Indeed. 03:17:13 jcowan: so (= #i100 1##) may or may not be true 03:17:30 Indeed. 03:22:23 dammit; shame on the scheme48 cats for seducing me into thinking that implementing r5rs is a weekend project 03:23:17 I think they changed 48 to mean 48 days instead of 48 hours, or something like that. 03:23:45 the world was made in 7 days too klutometis. 6 actually! 03:23:45 48 weeks later... 03:25:04 foof: how long took chibi? 03:25:53 based on how long foof was in a bad mood, i'd say a couple weeks 03:25:59 It wasn't a very focused effort... 03:26:13 klutometis: Yeah, about 3 weeks ^_^ 03:27:05 But that was while working on other stuff, and I had already implemented the read/write procedures years ago. 03:27:17 i am also making one, but veeery sparingly 03:29:38 What's the niche? 03:30:12 just my learning :) 03:30:28 OK 03:30:33 it's been extremely fun 03:30:47 I jokingly put down chibi-scheme, but if I see yet another a new project use tinyscheme I'll scream. 03:33:35 I actually would use a small scheme for embedding, if it had a soft real-time GC 03:33:57 that's still a Lua niche for me 03:34:23 well, good night all 03:35:02 -!- ventonegro [n=alex@c95196b2.virtua.com.br] has quit [] 03:36:15 andrewSC [n=andrew@ipanema.parkpointrit.com] has joined #scheme 03:36:17 hi all 03:36:18 :) 03:39:25 Does anyone have a good working example of how to recursively traverse a list with sublists? 03:39:42 ie: '( 8 7 6 (5 4 3) 2 (1)) 03:40:03 Well, do you know how to recursively traverse a list *without* sublists? 03:40:05 i've got it down to '(8 7 6 (5 4 3)) 03:40:11 yes 03:40:43 Well, then you know all you need to: when you need to traverse a sublist, apply the method you already have for traversing lists. 03:40:57 It's just when i begin to traverse the sublist i loose the rest of the outer list 03:41:17 You need to traverse it recursively. 03:41:24 incubot: there's a list on the loose 03:41:27 (_ line in fname body ...) matches any list of 4 or more expressions 03:41:37 thanks, inc 03:41:39 What do you want to do with the elements of the list when you traverse them, andrewSC? 03:41:53 jcowan, sum them :) 03:42:02 this will be integers only 03:42:09 For some trees of lists you can only keep the parent node in mind and traverse iteratively. Don't know how to do that trick though. 03:42:59 Okay. So for each element of the list, it is either an integer that you add to your sum, or it's a sublist, in which case you ... 03:43:15 traverse that list recursively 03:43:25 and add it's elements to the sum 03:43:33 however, when i do this i loose the rest of the list? 03:43:38 lose* 03:43:42 for example 03:43:45 andrewSC: just post some code 03:43:49 lisppaste: url 03:43:49 To use the lisppaste bot, visit http://paste.lisp.org/new/scheme and enter your paste. 03:44:02 sure 03:44:39 andrewSC pasted "sum" at http://paste.lisp.org/display/78662 03:45:17 i can return the sum of '( 8 7 6 (5 4 3) 03:45:19 however 03:45:26 i lose 2 (1)) 03:46:18 '(1 (900) 7 6 5 - 4 3 2 1) 03:46:57 -!- synthase [n=synthase@68.63.19.212] has quit [Connection timed out] 03:48:06 it's just a matter of "stepping" back out of that sublist.. 03:48:21 once i'm in it i lose all the other members 03:48:51 atoms.. Excuse me 03:49:09 -!- MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has left #scheme 03:50:09 hint: you forgot to operate on the rest of your list 03:50:32 compare your two cond clauses very carefully 03:52:08 read what you said above, again 03:52:13 20:43:07 < andrewSC> traverse that list recursively 03:52:18 20:43:18 < andrewSC> and add it's elements to the sum 03:52:20 saccade_ [n=saccade@65-78-24-47.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com] has joined #scheme 03:52:28 i think i see it 03:52:31 are you doing both of those? 03:52:45 i just wrote out some pseudo code 03:53:02 once i'm in that else i do a check and another else 03:53:22 let take a crack at it 03:53:24 i think i got it 04:00:45 synthase [n=synthase@68.63.19.212] has joined #scheme 04:03:27 andrewSC: some other dude was in here about the mobile problem, too 04:03:32 wonder if he's a classmate of yours 04:03:40 more than likelu 04:03:45 likely* 04:04:19 i'm taking a Programming Language Concepts class and we cover five major languages 04:04:41 each language we're required to write this mobile checker program 04:04:47 : \ 04:04:59 it's good practice and our professor is awesome 04:05:07 -!- araujo [n=araujo@gentoo/developer/araujo] has quit ["Leaving"] 04:05:09 it just seems to be the syntax that trips me up 04:05:13 lol 04:05:21 JasonPx was the cat 04:05:43 didn't know anything about binary trees, so i assume he's fucked 04:06:08 -!- offby1 [n=user@q-static-138-125.avvanta.com] has quit [Remote closed the connection] 04:06:12 haha 04:06:16 more than likely 04:06:18 offby1 [n=user@q-static-138-125.avvanta.com] has joined #scheme 04:06:30 ironically there is someone named Jason who is registered in the same class 04:07:07 incubot: the plot thickens 04:07:09 can you plot the path? 04:07:26 incubot: sure, with gnuplot 04:07:30 gnuplot is quite simple. Not really a `language' though 04:08:00 incubot: still, it gets the job done 04:08:03 Lua works quite well -- if you don't need to call back into Lua functions. It gets extremely messy when you try to call Lua functions from a C level, and that's what we would have had to do, when we got to implement the packet analysis/generator framework. 04:08:47 incubot: earlier you mentioned gnuplot? 04:08:49 IME, that works only for simple situations. When you want fanicer stuff, you run into gnuplot's world of shit. 04:09:24 incubot: I can see I've hit a sore spot. 04:09:27 Some sort of upper resperitory thing... Sore throat, stuffy nose, chest hurts. 04:09:50 Maybe you need a Sucrets. 04:09:57 tjafk2 [n=timj@e176210212.adsl.alicedsl.de] has joined #scheme 04:10:30 what's really funny is some people actually manage to get into level 400 class with little to know programming background. 04:10:38 no* 04:10:39 lol 04:11:21 i can't imagine what it's like in the workforce.. 04:11:26 >_< 04:11:55 the same, but replace 'level 400 class' with 'senior web developer' 04:12:09 *facepalm* 04:12:27 incubot: facepalm 04:12:30 *facepalm*. My invincible bzr process was due to a suspended strace I forgot about. 04:12:58 we've all been there, incubot 04:16:23 dsmith [i=muj6v9se@cpe-71-74-230-225.neo.res.rr.com] has joined #scheme 04:18:05 -!- sladegen [n=nemo@unaffiliated/sladegen] has quit [Nick collision from services.] 04:18:14 sladegen [n=nemo@unaffiliated/sladegen] has joined #scheme 04:27:04 -!- tjafk1 [n=timj@e176197028.adsl.alicedsl.de] has quit [Read error: 110 (Connection timed out)] 04:28:05 -!- synx [i=synx@gateway/gpg-tor/key-0xA71B0C6A] has quit [Remote closed the connection] 04:30:00 synx [i=synx@gateway/gpg-tor/key-0xA71B0C6A] has joined #scheme 04:33:37 hadronzoo [n=hadronzo@user-0c2h0f1.cable.mindspring.com] has joined #scheme 04:38:51 elderK [n=zk@122-57-250-71.jetstream.xtra.co.nz] has joined #scheme 04:47:57 -!- gweiqi [n=greg@69.120.126.163] has quit ["Leaving."] 04:49:27 -!- andrewSC [n=andrew@ipanema.parkpointrit.com] has quit ["Leaving"] 04:57:34 -!- kniu [n=kniu@OVERLORD.RES.CMU.EDU] has quit ["Leaving"] 05:02:56 -!- jcowan [n=jcowan@dsl-67-158-180-34.taconic.net] has left #scheme 05:05:54 sphex [n=nobody@modemcable185.138-56-74.mc.videotron.ca] has joined #scheme 05:10:14 -!- ASau [n=user@193.138.70.52] has quit [Remote closed the connection] 05:10:25 ASau [n=user@193.138.70.52] has joined #scheme 05:16:53 -!- raikov [n=igr@203.181.243.11] has quit [Read error: 110 (Connection timed out)] 05:23:39 -!- sphex_ [n=nobody@modemcable185.138-56-74.mc.videotron.ca] has quit [Read error: 110 (Connection timed out)] 05:25:59 raikov [n=igr@203.181.243.11] has joined #scheme 05:26:29 kniu [n=kniu@OVERLORD.RES.CMU.EDU] has joined #scheme 05:26:35 ct2rips [n=ct2rips@blfd-4db0e34e.pool.einsundeins.de] has joined #scheme 05:38:53 -!- cracki [n=cracki@sglty.kawo2.RWTH-Aachen.DE] has quit ["The funniest things in my life are truth and absurdity."] 06:02:27 ecraven [n=nex@140.78.42.103] has joined #scheme 06:03:59 mmc [n=mima@esprx02x.nokia.com] has joined #scheme 06:04:21 -!- ct2rips [n=ct2rips@blfd-4db0e34e.pool.einsundeins.de] has quit ["Verlassend"] 06:05:59 -!- Kusanagi [n=Lernaean@unaffiliated/kusanagi] has quit [] 06:12:49 Kusanagi [n=Lernaean@unaffiliated/kusanagi] has joined #scheme 06:13:11 -!- dfeuer [n=dfeuer@wikimedia/Dfeuer] has quit [Read error: 113 (No route to host)] 06:17:02 -!- luz [n=davids@189.122.121.232] has quit ["Client exiting"] 06:24:59 -!- Kusanagi [n=Lernaean@unaffiliated/kusanagi] has quit [] 06:26:41 -!- kniu [n=kniu@OVERLORD.RES.CMU.EDU] has quit ["Leaving"] 06:28:06 -!- annodomini [n=lambda@wikipedia/lambda] has quit [] 06:28:38 Kusanagi [n=Lernaean@unaffiliated/kusanagi] has joined #scheme 06:30:39 Ragnaroek [i=54a6465e@gateway/web/ajax/mibbit.com/x-f3cf622f80a4ce4f] has joined #scheme 06:45:45 -!- synthase [n=synthase@68.63.19.212] has quit [Read error: 113 (No route to host)] 06:58:19 kniu [n=kniu@OVERLORD.RES.CMU.EDU] has joined #scheme 07:02:53 -!- raikov [n=igr@203.181.243.11] has quit [Remote closed the connection] 07:09:58 Mr-Cat [n=Miranda@hermes.lanit.ru] has joined #scheme 07:10:19 clouder`grr [n=clouder@cpe-24-175-1-35.elp.res.rr.com] has joined #scheme 07:11:24 hotblack23 [n=jh@p5B05423E.dip.t-dialin.net] has joined #scheme 07:12:43 raikov [n=igr@61.127.191.238] has joined #scheme 07:14:14 ejs [n=eugen@50-124-179-94.pool.ukrtel.net] has joined #scheme 07:15:11 synthase [n=synthase@68.63.19.212] has joined #scheme 07:15:25 npe [n=npe@195.207.5.2] has joined #scheme 07:22:43 -!- ejs [n=eugen@50-124-179-94.pool.ukrtel.net] has quit [Read error: 60 (Operation timed out)] 07:23:04 ejs [n=eugen@nat.ironport.com] has joined #scheme 07:27:40 cirquitz [n=cirquitz@203.199.114.33] has joined #scheme 07:31:04 -!- cirquitz [n=cirquitz@203.199.114.33] has quit [Read error: 113 (No route to host)] 07:41:48 -!- Ragnaroek [i=54a6465e@gateway/web/ajax/mibbit.com/x-f3cf622f80a4ce4f] has quit ["http://www.mibbit.com ajax IRC Client"] 07:42:59 MrFahrenheit [n=RageOfTh@92.36.215.160] has joined #scheme 07:54:56 -!- elderK [n=zk@122-57-250-71.jetstream.xtra.co.nz] has quit ["Leaving."] 07:57:25 -!- saccade_ [n=saccade@65-78-24-47.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com] has quit ["This computer has gone to sleep"] 08:00:24 -!- clouder`grr [n=clouder@cpe-24-175-1-35.elp.res.rr.com] has quit [Remote closed the connection] 08:09:24 -!- xwl_` is now known as xwl_ 08:18:37 pants1 [n=hkarau@206-248-177-37.dsl.teksavvy.com] has joined #scheme 08:20:33 -!- raikov [n=igr@61.127.191.238] has quit [Remote closed the connection] 08:29:27 -!- MrFahrenheit [n=RageOfTh@92.36.215.160] has quit [Read error: 101 (Network is unreachable)] 08:33:34 borism_ [n=boris@195-50-197-89-dsl.krw.estpak.ee] has joined #scheme 08:35:14 MichaelRaskin [n=MichaelR@213.171.48.239] has joined #scheme 08:35:31 -!- pants1 [n=hkarau@206-248-177-37.dsl.teksavvy.com] has quit [Read error: 113 (No route to host)] 08:37:43 pants1 [n=hkarau@76-10-155-36.dsl.teksavvy.com] has joined #scheme 08:37:58 -!- npe [n=npe@195.207.5.2] has quit [Remote closed the connection] 08:38:06 npe [n=npe@195.207.5.2] has joined #scheme 08:39:28 -!- borism [n=boris@195-50-197-14-dsl.krw.estpak.ee] has quit [Read error: 145 (Connection timed out)] 08:45:18 Nshag [i=user@Mix-Orleans-106-1-27.w193-248.abo.wanadoo.fr] has joined #scheme 08:58:34 hkBst [n=hkBst@gentoo/developer/hkbst] has joined #scheme 09:06:58 mike [n=m@dslb-088-066-233-187.pools.arcor-ip.net] has joined #scheme 09:07:25 -!- mike is now known as Guest14428 09:22:40 orgy` [n=ratm_@pD9FFE633.dip.t-dialin.net] has joined #scheme 09:26:50 -!- leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has quit [Remote closed the connection] 09:27:47 leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has joined #scheme 09:34:52 Elonetaru [n=elone@c-71-202-143-119.hsd1.ca.comcast.net] has joined #scheme 09:34:58 hi 09:35:46 ejs1 [n=eugen@50-124-179-94.pool.ukrtel.net] has joined #scheme 09:41:56 -!- dysinger [n=tim@cpe-75-80-200-182.hawaii.res.rr.com] has quit [] 09:45:38 -!- ejs [n=eugen@nat.ironport.com] has quit [Read error: 110 (Connection timed out)] 09:47:02 ejs2 [n=eugen@nat.ironport.com] has joined #scheme 09:48:29 -!- leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has quit [Read error: 104 (Connection reset by peer)] 09:49:17 leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has joined #scheme 09:50:50 araujo [n=araujo@gentoo/developer/araujo] has joined #scheme 09:53:14 puchacz [n=puchacz@87-194-5-99.bethere.co.uk] has joined #scheme 09:54:33 suppose i i have a string "(define a 0)" ~ is there way to execute that string in runtime? 09:56:22 yes, you can read from that string and eval the result 09:56:34 -!- borism_ [n=boris@195-50-197-89-dsl.krw.estpak.ee] has quit [Read error: 145 (Connection timed out)] 09:56:53 incubot: eval (eval (with-input-from-string "(+ 1 3)" read)) 09:56:53 4 09:57:43 -!- ejs1 [n=eugen@50-124-179-94.pool.ukrtel.net] has quit [Read error: 110 (Connection timed out)] 09:59:45 reference to undefined identifier: with-input-from-string :< 10:01:27 -!- leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has quit [Read error: 60 (Operation timed out)] 10:01:48 You'll need to import some kind of library for that, perhaps 10:01:56 Depends on the scheme you're using 10:02:00 it look a bit different in syntax thou ~ did that line work in drscheme? 10:02:23 I don't know, I don't run drscheme 10:02:24 leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has joined #scheme 10:02:37 Did you search the docs for something called "string ports"? 10:02:57 rudybot_: eval (eval (with-input-from-string "(+ 1 3)" read)) 10:02:58 hkBst: your sandbox is ready 10:02:58 hkBst: ; Value: 4 10:03:10 ah no ~ i am new to scheme 10:03:16 rudybot_: version? 10:03:16 hkBst: eh? Try "rudybot_: help". 10:03:24 rudybot_: eval (version) 10:03:25 hkBst: ; Value: "4.1.5.3" 10:03:29 Well, it's always a good idea to learn how to search for info 10:03:35 Elonetaru: rudybot_ runs plt-scheme 10:03:49 (Drscheme is also plt-scheme) 10:05:09 Elonetaru: which language are you running? 10:05:27 Elonetaru: The idea is that eval accepts only s-expressions (lists or symbols), and you have to first convert the string to an s-expression by READing from it 10:06:49 << totally new to scheme thing ~ just installed ~ trying to figure all the thing out for hw assignment >.< 10:07:23 so which language i should use and how function do i call to convert that ? 10:07:47 Language levels cannot be changed by calling functions 10:08:04 I think you have to go to a menu somewhere and select the correct language from it 10:08:22 i mean for string -> s-expression 10:08:58 oh, the READ procedure reads s-expressions from ports 10:09:22 And because you have your code in a string already, you need to convert the string to an input port, for READ to use. This is done through WITH-INPUT-FROM-STRING 10:09:57 Let's try this step-by-step 10:10:07 Type (read) in the REPL 10:10:16 Then type in your expression, and watch what it prints back 10:10:38 do i need "" / 10:10:41 ? 10:10:42 no 10:10:57 ok 10:11:07 See? It read in an s-expression 10:11:26 yes 10:11:58 Now, you can do the same from a file, by using (with-input-from-file "my-file.scm" read) 10:12:01 Try that 10:12:32 (put the text you had into the file named my-file.scm) 10:14:11 i see the first define statement 10:14:11 foof: http://synthcode.com/scheme/fmt/fmt-0.6.tar.gz is a 404 10:15:29 rotty: Try now 10:15:30 Ragnaroek [i=54a6459c@gateway/web/ajax/mibbit.com/x-5dc1da522b58df0a] has joined #scheme 10:19:28 Elonetaru: yes, read reads one s-expression. If you want to see more, you must call read several times 10:19:56 Like (with-input-from-file "my-file.scm" (lambda () (read) (read) (read))) would return the third s-expression 10:20:14 i see 10:20:31 (you don't need the lambda in case of a single read because (lambda () (read)) = read ) 10:21:06 sjamaan: don't you think they taught him SOMETHING in class? 10:21:34 hkBst: This (I/O stuff) is typically not the kind of thing they teach in class 10:23:13 hkBst, we start introducing what is scheme just this week ~ like (+ 1 1) stuff >.< 10:24:11 Elonetaru: and what is your assignement? 10:24:55 what is hate this class is we start exploring different languages ( C, objC, C++ fortan, scheme ,etc ) in short time >.< while all our other class uses javaa only 10:25:29 Try to take away as much as you can from this class 10:25:34 Java is the mind-killer 10:26:01 java is blub ;P 10:26:05 the assignment is to read simply spreadsheet file(tab delimited) 10:26:30 with support of expression like (A1+ B2) 10:28:10 i still can't get with-input-from-string work >.< 10:28:35 Elonetaru: there are ~4 language levels. Just try each one until it works 10:29:44 with-input-from-string is not standard Scheme, but with-input-from-file is. That's why the latter works out-of-the-box for you and the other doesn't. You need to enable PLT-specific extensions to make it work 10:31:14 i googled it ~ it need (require scheme/port) >.> 10:33:39 one more question, do scheme come with a string tokenizer? 10:34:08 like i will have to read a tab delimited spreadsheet file. 10:34:43 Try the one from srfi-13 10:34:52 srfi-13? 10:35:13 srfi.schemers.org ;) 10:35:31 13.th addendum to the srs6 ? 10:35:36 or 5 ? 10:35:50 srfi 13 10:35:59 it's (require srfi/13) in PLT scheme 10:36:06 r5rs srfi-13 10:36:06 Sorry, I couldn't find anything for srfi-13. 10:36:10 uiiii 10:36:45 rudybot_: eval (read (open-input-string "(foo)")) 10:36:47 eli: your "http://tmp.barzilay.org/x.scm" sandbox is ready 10:36:47 eli: ; Value: (foo) 10:40:49 ^^ thank ppl 10:42:08 jah [n=jah@133.56.76-86.rev.gaoland.net] has joined #scheme 10:46:12 foof: downloaded, thx 10:48:55 -!- leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has quit [Read error: 54 (Connection reset by peer)] 10:49:23 jewel_ [n=jewel@dsl-247-205-254.telkomadsl.co.za] has joined #scheme 10:51:01 leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has joined #scheme 10:53:39 -!- jah [n=jah@133.56.76-86.rev.gaoland.net] has quit [] 10:56:22 -!- sepult [n=buggarag@xdsl-87-78-30-252.netcologne.de] has quit ["leaving"] 10:56:26 -!- bsmntbombdood_ [i=gavin@97-118-133-183.hlrn.qwest.net] has quit [Read error: 60 (Operation timed out)] 10:57:26 -!- Guest14428 [n=m@dslb-088-066-233-187.pools.arcor-ip.net] has quit ["This computer has gone to sleep"] 10:59:01 mike [n=m@dslb-088-066-233-187.pools.arcor-ip.net] has joined #scheme 10:59:28 -!- mike is now known as Guest81476 11:22:00 -!- Guest81476 [n=m@dslb-088-066-233-187.pools.arcor-ip.net] has quit ["Leaving"] 11:22:46 borism [n=boris@195-50-204-145-dsl.krw.estpak.ee] has joined #scheme 11:23:19 -!- synthase [n=synthase@68.63.19.212] has quit [Read error: 113 (No route to host)] 11:29:38 bsmntbombdood [i=gavin@97-118-133-183.hlrn.qwest.net] has joined #scheme 11:31:53 synthase [n=synthase@68.63.19.212] has joined #scheme 11:37:50 -!- Ragnaroek [i=54a6459c@gateway/web/ajax/mibbit.com/x-5dc1da522b58df0a] has quit ["http://www.mibbit.com ajax IRC Client"] 11:46:22 -!- synx [i=synx@gateway/gpg-tor/key-0xA71B0C6A] has quit [Remote closed the connection] 11:48:34 cracki [n=cracki@45-221.eduroam.RWTH-Aachen.DE] has joined #scheme 11:50:08 synx [i=synx@gateway/gpg-tor/key-0xA71B0C6A] has joined #scheme 11:53:10 -!- jewel_ [n=jewel@dsl-247-205-254.telkomadsl.co.za] has quit [Operation timed out] 11:55:52 jewel_ [n=jewel@dsl-247-205-254.telkomadsl.co.za] has joined #scheme 11:59:46 Edico [n=Edico@unaffiliated/edico] has joined #scheme 12:01:21 -!- bsmntbombdood [i=gavin@97-118-133-183.hlrn.qwest.net] has quit [Read error: 110 (Connection timed out)] 12:07:13 Quadrescence [n=quad@c-71-193-68-220.hsd1.mn.comcast.net] has joined #scheme 12:13:26 ct2rips [n=ct2rips@blfd-4db0e34e.pool.einsundeins.de] has joined #scheme 12:18:08 Ragnaroek [i=54a6459c@gateway/web/ajax/mibbit.com/x-4aaa23b8b43b64bf] has joined #scheme 12:22:18 -!- leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has quit [Read error: 104 (Connection reset by peer)] 12:25:20 mejja [n=user@c-f6b6e555.023-82-73746f38.cust.bredbandsbolaget.se] has joined #scheme 12:26:46 -!- geckosenator [n=sean@c-71-237-94-78.hsd1.co.comcast.net] has quit [Read error: 60 (Operation timed out)] 12:27:46 alaricsp [n=alaricsp@88-202-215-235.rdns.as8401.net] has joined #scheme 12:30:14 cirquitz [n=cirquitz@203.199.114.33] has joined #scheme 12:31:04 dfeuer [n=dfeuer@wikimedia/Dfeuer] has joined #scheme 12:31:10 xwl [n=user@114.245.138.25] has joined #scheme 12:35:23 -!- cracki [n=cracki@45-221.eduroam.RWTH-Aachen.DE] has quit ["The funniest things in my life are truth and absurdity."] 12:39:52 -!- ejs2 [n=eugen@nat.ironport.com] has quit ["This computer has gone to sleep"] 12:41:28 leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has joined #scheme 12:41:33 annodomini [n=lambda@c-75-69-96-104.hsd1.nh.comcast.net] has joined #scheme 12:43:14 -!- AtnNn [n=welcome@modemcable087.62-56-74.mc.videotron.ca] has quit [Read error: 104 (Connection reset by peer)] 12:45:36 AtnNn [n=welcome@modemcable087.62-56-74.mc.videotron.ca] has joined #scheme 12:49:38 -!- jewel_ [n=jewel@dsl-247-205-254.telkomadsl.co.za] has quit [No route to host] 12:51:01 -!- dsmith [i=muj6v9se@cpe-71-74-230-225.neo.res.rr.com] has quit ["Leaving"] 12:57:27 -!- mindCrime [n=chatzill@cpe-075-177-141-190.nc.res.rr.com] has quit [No route to host] 13:17:00 cracki [n=cracki@sglty.kawo2.RWTH-Aachen.DE] has joined #scheme 13:17:16 ddrl [n=ryan@cpe-24-27-73-108.tx.res.rr.com] has joined #scheme 13:17:58 -!- ddrl [n=ryan@cpe-24-27-73-108.tx.res.rr.com] has left #scheme 13:28:27 -!- annodomini [n=lambda@wikipedia/lambda] has quit [] 13:30:31 -!- rudybot_ is now known as rudybot 13:31:27 -!- leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has quit [Read error: 104 (Connection reset by peer)] 13:31:33 -!- jeremiah [n=jeremiah@31.Red-213-98-123.staticIP.rima-tde.net] has quit [Read error: 104 (Connection reset by peer)] 13:35:10 leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has joined #scheme 13:44:43 -!- ttmrichter_ [n=ttmricht@219.140.250.126] has quit ["Ex-Chat"] 13:48:00 jeremiah [n=jeremiah@31.Red-213-98-123.staticIP.rima-tde.net] has joined #scheme 13:48:22 -!- ecraven [n=nex@140.78.42.103] has quit ["bbl"] 13:51:37 MrFahrenheit [n=RageOfTh@92.36.198.174] has joined #scheme 13:55:08 -!- leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has quit [Read error: 104 (Connection reset by peer)] 13:56:49 etoxam [n=etoxam@84.79.67.254] has joined #scheme 14:06:42 leppie [n=lolcow@dsl-243-51-87.telkomadsl.co.za] has joined #scheme 14:11:23 annodomini [n=lambda@130.189.179.215] has joined #scheme 14:13:44 -!- aardvarq [i=tgAardva@student3113.student.nau.edu] has quit [Read error: 104 (Connection reset by peer)] 14:23:40 luz [n=davids@139.82.89.70] has joined #scheme 14:30:22 jewel_ [n=jewel@dsl-247-205-254.telkomadsl.co.za] has joined #scheme 14:32:16 bsmntbombdood [i=gavin@97-118-133-183.hlrn.qwest.net] has joined #scheme 14:32:51 -!- eno [n=eno@nslu2-linux/eno] has quit [Read error: 60 (Operation timed out)] 14:33:57 jah [n=jah@133.56.76-86.rev.gaoland.net] has joined #scheme 14:34:06 eno [n=eno@nslu2-linux/eno] has joined #scheme 14:34:38 -!- Khisanth [n=Khisanth@pool-68-237-105-126.ny325.east.verizon.net] has quit ["Leaving"] 14:50:01 -!- bsmntbombdood [i=gavin@97-118-133-183.hlrn.qwest.net] has quit [Read error: 60 (Operation timed out)] 14:52:15 -!- hadronzoo [n=hadronzo@user-0c2h0f1.cable.mindspring.com] has quit [] 14:59:00 -!- jonrafkind [n=jon@c-98-202-86-149.hsd1.ut.comcast.net] has quit [Read error: 110 (Connection timed out)] 15:01:05 Cowmoo [n=Cowmoo@static-70-108-241-27.res.east.verizon.net] has joined #scheme 15:03:49 -!- jao [n=jao@54.Red-83-38-56.dynamicIP.rima-tde.net] has quit [Read error: 104 (Connection reset by peer)] 15:05:36 -!- Mr-Cat [n=Miranda@hermes.lanit.ru] has quit [Read error: 104 (Connection reset by peer)] 15:17:14 -!- weinholt [i=weinholt@debian/emeritus/weinholt] has quit [] 15:18:11 jlongster [n=user@75.148.111.133] has joined #scheme 15:19:55 -!- npe [n=npe@195.207.5.2] has quit [] 15:22:29 arcfide [n=arcfide@99.50.228.183] has joined #scheme 15:25:29 'Ello. 15:31:42 bweaver [n=user@75.148.111.133] has joined #scheme 15:31:50 -!- bweaver [n=user@75.148.111.133] has quit [Client Quit] 15:33:41 bweaver [n=user@75.148.111.133] has joined #scheme 15:34:42 -!- xwl [n=user@114.245.138.25] has quit [Remote closed the connection] 15:43:49 Fare [n=Fare@ita4fw1.itasoftware.com] has joined #scheme 15:52:47 saccade_ [n=saccade@65-78-24-47.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com] has joined #scheme 15:53:19 melgray [n=melgray@70.99.250.82] has joined #scheme 16:14:53 jonrafkind [n=jon@crystalis.cs.utah.edu] has joined #scheme 16:32:31 -!- tessier_ [n=treed@kernel-panic/sex-machines] has left #scheme 16:32:48 dysinger [n=tim@cpe-75-80-200-182.hawaii.res.rr.com] has joined #scheme 16:38:38 -!- saccade_ [n=saccade@65-78-24-47.c3-0.smr-ubr1.sbo-smr.ma.cable.rcn.com] has quit ["This computer has gone to sleep"] 16:41:12 -!- alaricsp [n=alaricsp@88-202-215-235.rdns.as8401.net] has quit [] 16:47:09 bsmntbombdood [i=gavin@97-118-113-91.hlrn.qwest.net] has joined #scheme 16:48:06 andrewSC [n=andrew@ipanema.parkpointrit.com] has joined #scheme 16:48:07 hi all 16:48:13 :) 16:48:38 so i've managed to do the recursion semi-properly 16:49:01 however, when the sums function reaches the first element in the list 16:49:45 Hello. 16:50:11 hi 16:50:49 please excuse my long pause. I thought i might have reached a conclusion 16:50:54 so i tried it 16:51:36 anyways, when i i reach the first element in the list it cannot add because i have used cons to put the values of the sublist into the list 16:52:03 basically i'm trying to sum all the numbers in a list that may or maynot have sublists 16:52:18 if it does have sublists i need to add those numbers to the sum also 16:57:31 andrewSC: Are you doing this to practice recursion? 16:57:54 well, i think i need to create this function so i can use it on my lab 16:58:10 afk 16:58:18 -!- jonrafkind [n=jon@crystalis.cs.utah.edu] has quit [No route to host] 16:59:01 back 16:59:14 See the problem is how to define a particular structure 16:59:55 i think if i have a struct with a height and weight i should be able to use nested lists to define the structure 17:00:09 this is a calider mobiles problem by the way. 17:00:20 in essence a type of tree 17:00:40 andrewSC: you're going to store the height and weight within the tree nodes? 17:01:09 i realize this doesn't make sense but how else could i do this using only one instance of struct 17:01:40 exexex [n=chatzill@88.234.120.66] has joined #scheme 17:01:58 seems inefficient; why do you need to store it, can't you just print it after each invocation of mobile-height or whatever? 17:01:59 if i create a struct that's supposed to represent a tree wouldn't i have to use sublists to represent the branches? 17:01:59 What end goal are you trying to accomplish? 17:02:20 Calider Mobiles? 17:02:31 i need to check and see if the supplied mobile is balanced, what it's weight is and what it's height is 17:02:39 so i need to write three functions and a struct 17:02:44 andrewSC: yeah; (define-struct mobile (left right)) should do you, though 17:03:06 calculate height and weight on the fly; store them in the balanced procedure via let 17:03:12 Sorry, I do not know what this term "mobile" means here. 17:03:28 arcfide: mobile is an analogy for a binary tree; contains left and right arms 17:03:34 Aaah. 17:04:00 And, the problem is to determine A) Height of the BT, B) depth, and C) whether it is balanced? 17:04:03 andrewSC: by the way, rochester, right? tell jason the #scheme trolls are after his ass ;) 17:04:09 hahaha 17:04:14 so i understand 17:04:17 yep Rochester.. 17:04:31 arcfide, that is correct 17:05:53 And you are just trying to do this the naive way, right, not get some kind of big boost or whatnot? 17:06:08 -!- Ragnaroek [i=54a6459c@gateway/web/ajax/mibbit.com/x-4aaa23b8b43b64bf] has quit ["http://www.mibbit.com ajax IRC Client"] 17:06:09 right 17:06:16 the naive way 17:06:34 Yeah, so, you can use a record to store the left and right if you want, or you can do this using cons cells. 17:06:44 slightly amusing that only now did i realize that this is literally a binary tree 17:07:16 andrewSC: Does the tree have values at the nodes? 17:07:38 yes but only at the end nodes? 17:08:03 So, the root node only has a left and a right, with nothing for a value at that node? 17:08:11 yes 17:08:14 well 17:08:26 the root node would only have a left seeing as the right would be terminal 17:08:32 this is more of a tree i guess.. 17:08:59 the root can only have one child but that child can have at most two children 17:09:12 andrewSC: Why would the right node be a terminal? 17:09:16 And what is a terminal? 17:09:39 the terminal would be a node with a null value and no children 17:10:13 well a mobile is this abstract art structure that has a root that links to a child 17:10:29 that child may have upto two children 17:11:01 i suppose the root may actually have upto two children but i've never seen a mobile like that 17:11:19 no, actually i have seen a root with two children 17:11:23 my apologies 17:11:42 so yes this is a binary tree 17:11:47 to some extent 17:12:35 however, you are not guaranteed that there are two children, most of the time it's just one child 17:14:57 andrewSC: which is to say, it's a binary tree; but not a complete binary tree 17:15:03 what are you using for null: #f? 17:15:12 haven't gotten that far.. 17:15:28 so: (define-struct mobile (left right value))? 17:15:42 or: (define-struct mobile (left right weight))? 17:15:43 i've literally just realized the past two days i've spent on this are worthless to some aspect. 17:16:02 i would assume the (define-struct mobile (left right weight)) 17:16:06 would be most fitting 17:16:15 does each piece have a height, or are the heights uniform? 17:16:26 otherwise: (define-struct mobile (left right weight height))? 17:16:34 each piece has an individual height 17:16:44 yeah; four pieces of info should do you, then 17:16:53 in practice you maybe use trees 5-10% of the time compared to other structures like hashtables and 'arraylists' 17:17:21 leppie: depends how much xml you're doing, i suppose ;) 17:17:37 hehe 17:17:46 cons is good enough to do that :p 17:18:20 sure; but that's essentially a tree, isn't it? 17:18:54 I will only use trees when I need some hierachial structure, they have little other benefit to me 17:20:58 well source code is a tree, so i guess i use it all the time :p 17:21:49 teiresias [n=user@ip68-12-115-220.ok.ok.cox.net] has joined #scheme 17:22:50 athos [n=philipp@92.250.250.68] has joined #scheme 17:23:25 incubot: Code is made by fools like me, but only God can make a tree. 17:23:28 Is that the april fools one? 17:23:37 he 17:23:54 and it only takes one fool to chop it down :( 17:26:59 incubot: it reminds me of this song: http://www.lyricstime.com/juliana-hatfield-feelin-massachussetts-lyrics.html 17:27:02 I'm feelin you bro. 17:27:03 -rudybot:#scheme- http://tinyurl.com/ch7vzx 17:31:54 -!- synthase [n=synthase@68.63.19.212] has quit [Read error: 110 (Connection timed out)] 17:32:14 synthase [n=synthase@68.63.19.212] has joined #scheme 17:33:14 hmm 17:33:31 i think height would simply be the depth of the tree, right? 17:33:42 so i could do with three values in my struct 17:33:51 left, right, weight 17:34:10 oh this is odd... 17:34:45 not every node has a value that needs to be calculated. I suppose i could just use zero 17:35:49 why not make it #f rather, and add a check to your iteration 17:36:30 well if it was #f how would i return the sum of the nodes in my tree? 17:38:26 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 17:39:08 andrewSC: As a smaller project to give you an idea, can you create a procedure to collect the sum of a list of numbers, without any sublists? 17:39:20 yep 17:39:26 i did that a little while ago 17:39:30 :) 17:39:53 Alright, now, can you create a procedure that collects the sum of a list of values each whose value is determined by some higher order procedure passed to that procedure? 17:40:07 s/whose value/whose value to be summed/ 17:40:09 -!- jah [n=jah@133.56.76-86.rev.gaoland.net] has quit [] 17:40:49 hmm 17:40:52 let me see 17:40:53 andrewSC: but didn't you say that every branch of the mobile can have an individual height as well as weight? 17:41:03 well 17:41:21 -!- REPLeffect_ [n=REPLeffe@69.54.115.254] has quit [Read error: 113 (No route to host)] 17:42:46 it can however, if i simply inserted a node and gave it a weight of 1 wouldn't that in essence give me the height? 17:43:41 each piece of cord has a weight of 1 17:43:41 and if the required height is 100? would you need 99 intermeditary nodes? 17:43:46 i suppose 17:44:13 would you have each node hold it's height? 17:44:16 if the height is small, that is ok 17:44:54 i agree 17:45:03 -!- mmc [n=mima@esprx02x.nokia.com] has quit ["Leaving."] 17:45:03 the thing is, you are changing a property of your structure, so it does not work like it did before 17:45:28 to be frank i started back at square one 17:45:36 so right now i'm just defining the struct 17:46:08 i would start at a single object, doesnt matter what 17:46:23 trees only have 1 root right? 17:46:39 Judofyr [n=Judofyr@c349BBF51.dhcp.bluecom.no] has joined #scheme 17:46:56 REPLeffect_ [n=REPLeffe@69.54.115.254] has joined #scheme 17:47:04 yes 17:48:39 now make a procedure, that can take that object and a procedure taking an object and returning it's children 17:49:01 arcfide, when you speak of a procedure that collects the sum of a list of values are you speaking of a procedure that uses another procedure to create the sum? 17:49:15 like a helper function? 17:49:25 eg (foo x get-children) 17:49:47 mhmm 17:50:05 how could i represent this in list format?? 17:50:22 '(9 8 7 (6 5) 4 (3) (2)(1)) 17:50:23 ? 17:50:27 alaricsp [n=alaricsp@88-202-215-235.rdns.as8401.net] has joined #scheme 17:50:35 -!- cirquitz [n=cirquitz@203.199.114.33] has quit ["Leaving"] 17:50:43 so get-children will be something like (lambda (x) (car x)) or just car 17:51:06 mhmm 17:52:05 so the car of a pair contains the children, forget about values for now 17:53:06 just think of the structure 17:53:59 ok 17:53:59 -!- synthase [n=synthase@68.63.19.212] has quit [Read error: 113 (No route to host)] 17:54:03 let me write a example 17:54:08 wait i think i get it 17:54:13 the car would return that sublist right? 17:54:18 yes 17:54:23 ok 17:54:29 deat [n=deat@fac34-8-88-172-174-215.fbx.proxad.net] has joined #scheme 17:55:08 and each of them would be another node, that you need to pass to get-children 17:57:02 so would i end up using lat? 17:57:25 now that is pretty useless as is :) but all you need to do is mold that into some other code to select the appropiate value from a node and collecting the results 17:58:02 so i would do this recursion on the left and right values on my mobile 17:58:13 while summing the results from both lists? 17:58:33 in essence i would be flattening the left and right sides of the tree?? 17:58:45 basically 17:58:57 jonrafkind [n=jon@crystalis.cs.utah.edu] has joined #scheme 17:59:04 i described more of a general tree iteration 17:59:25 mhmm 17:59:29 but the idea is the same 17:59:52 so i just continually car the lists then sum on the left and right sides 18:00:13 hmmm 18:00:31 yes, it will start at the bottom and move up to the root 18:00:31 how would i be able to utilize this for checking the balance and height.. 18:00:32 hmm 18:03:11 athos [n=philipp@92.250.250.68] has joined #scheme 18:03:51 mmm, i missed that part, will teach me to scroll up before joining a conversation :) 18:04:17 hehe 18:04:22 yes, the during the iteration you simply keep track of it 18:04:43 mhmmm 18:04:53 i cant help with the actual balancing though 18:05:01 mhmm 18:06:11 well, for checking on the balance wouldn't i just need to count how many sublists there are in the left and right sides then if they equal the tree is balanced? 18:06:32 or perhaps i just need to see if the height and weight of the left and right sides is equal? 18:06:33 hmmm 18:06:51 -!- MichaelRaskin [n=MichaelR@213.171.48.239] has left #scheme 18:08:17 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 18:08:31 well, i think i'm gonna ponder this a bit more and work on the other parts of this lab. 18:08:38 synthase [n=synthase@68.63.19.212] has joined #scheme 18:12:37 athos [n=philipp@92.250.250.68] has joined #scheme 18:13:58 sorry, my brain is bit rusty 18:17:41 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 18:19:14 no problems 18:19:16 :) 18:19:20 i appreciate any help i can get 18:19:39 athos [n=philipp@92.250.250.68] has joined #scheme 18:23:12 -!- alaricsp [n=alaricsp@88-202-215-235.rdns.as8401.net] has quit [] 18:23:53 Mr-Cat [n=Mr-Cat@bahirkin1507.static.corbina.ru] has joined #scheme 18:24:43 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 18:26:30 athos [n=philipp@92.250.250.68] has joined #scheme 18:30:09 -!- araujo [n=araujo@gentoo/developer/araujo] has quit [Read error: 60 (Operation timed out)] 18:31:34 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 18:33:26 athos [n=philipp@92.250.250.68] has joined #scheme 18:36:00 andrewSC: you're using define-struct, right? 18:36:05 indeed 18:36:11 then your accessors are already defined 18:36:22 yep 18:36:23 mobile-left, mobile-right, etc. 18:36:26 mhmm 18:37:09 but inside those left and right symbols are lists and sublists right? 18:37:31 no 18:37:57 oh? 18:37:58 they are of the same struct type 18:38:15 so mobile-left will return a mobile? 18:38:24 or nothing 18:38:26 or your null symbol if there is no child 18:38:30 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 18:38:32 mhmmm 18:38:45 What would a test case for this look like then? 18:38:53 balanced? 18:39:00 sure 18:39:17 athos [n=philipp@92.250.250.68] has joined #scheme 18:39:22 "a mobile is said to be balanced if the torque applied by its top-left branch is equal to that applied by its top-right branche" 18:39:26 is that what you have? 18:39:35 tripwyre [n=sathya@117.193.163.93] has joined #scheme 18:39:43 Wohooo! 18:39:51 the product of the weight of the mobile on the left with the 18:39:52 length of the left section of the strut is the same as the 18:39:52 product of the weight of the mobile on the right with the 18:39:52 length of the right section of the strut 18:39:55 oops 18:40:00 sorry for the flood 18:40:18 is that scheme to english translation? 18:40:52 eh? 18:41:10 (define (balanced? mobile) (= (* (weight (mobile-left mobile)) (height (mobile-left mobile))) (* (weight (mobile-right mobile)) (height (mobile-right mobile))))) 18:41:11 So...it's finally taking shape. It's not nearly ready for use, but...at least it's taking shape. 18:41:17 18:42:13 arcfide: IE asks me to save a page, is your content type set correctly? 18:42:24 leppie: Yep, IE isn't supported right now. 18:42:30 arcfide: is that that centralized scheme library you were talking about some time ago? 18:42:34 leppie: Only browser's that support application/xhtml+xml. 18:42:43 klutometis: Decentralized. 18:42:55 arcfide: grrr, now I have to copy/paste into my open FF instance instead of just double clicking! 18:43:07 klutometis: I've got rudimentary searching, browsing, and pretty soon, submissions. 18:43:20 afk 18:43:33 Then, I'll be getitng mirroring and the decentralized part going. 18:43:51 arcfide: nice 18:44:06 leppie: I'm not even close to comfortable with letting out in the wild of IE land yet. This is a special sneak peak for you #scheme folk. 18:44:33 klutometis: I'm working on simplifying the RDF vocabulary so that it's more convenient for users. 18:45:34 And the full dscription of a library isn't there yet. 18:47:31 -!- puchacz [n=puchacz@87-194-5-99.bethere.co.uk] has quit [Read error: 54 (Connection reset by peer)] 18:48:21 For those interested, there is an AnonCVS repo with the code for the site. All written in Scheme of course. 18:48:54 arcfide: how do people participate, then: is it a push model where people submit packages and you act as quality-arbiter, or is it more darwinian? 18:50:00 klutometis: Eventually, each repository can act independently, and have its own quality control. You could publish your own set of libraries rather easily from some web server if you wanted. This server, which I hope will become a standard aggregator, will accept submission and they'll be approved (or not) and then added to the system. 18:50:25 Likewise, you can submit a repository to another repository, and then, if approved, the repository will mirror the other one. 18:50:59 So, for example, I hope to have a mirror of the Chicken and PLT databases up relatively soon. 18:52:08 Also, nothing stops you from using other clients to get the content, as there is a plan for a query server, which, when combined with simple HTTP, should let you make a CPAN like tool. 18:52:19 Or, if you prefer, just a normal APT-like package management system. 18:53:44 Eventually, I want to provide some services that help people to port libraries from one system to another (a kind of semi-automatic assistant), but that's later down the road. 18:54:00 At the moment, Descot and its foundation aren't stable enough. 18:55:15 klutometis: You likey? 18:56:02 arcfide, that web page looks much nicer when I strip off the stylesheet. For example, it no longer makes my eyes physically hurt from the contrast of white text on black background. 18:56:18 Riastradh: Yes, the style sheet needs fixing. 18:56:34 Riastradh: And you can expect a mostly white background for most of it. 18:57:01 Or something much less straining to the eyes. 18:59:31 saccade_ [n=saccade@18.188.70.132] has joined #scheme 19:00:09 Riastradh: don't you strip off style sheets by default? makes the web much more bearable: 19:00:14 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 19:00:23 i, for instance, was blissfully unaware of that pathological inversion 19:01:54 athos [n=philipp@92.250.250.68] has joined #scheme 19:02:27 alaricsp [n=alaricsp@88-202-215-235.rdns.as8401.net] has joined #scheme 19:02:32 arcfide: nice; very ambitious 19:02:47 how much of the infrastructure is complete? 19:03:10 Lemonator [n=kniu@128.237.238.254] has joined #scheme 19:04:44 -!- alaricsp [n=alaricsp@88-202-215-235.rdns.as8401.net] has quit [Client Quit] 19:04:47 klutometis: Most of the RDF stuff is complete, the basics of searching are complete, and I anticipate the system being mostly useable by the Summer. However, some things, like SPARQL Servers, fast performance, good searching, &c., could take some more time. 19:05:01 It really is a pretty simple system. 19:05:23 It is designed to encourage folks to distribute their code metadata this way, so that more people can access it. 19:05:39 I'm focusing on the web front end right now for...marketing reasons. 19:06:59 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 19:08:59 Riastradh: you mentioned, incidentally, that scheme systems are free to "store octothorpes" and treat them distictly from digits 19:09:36 couldn't one equivalently store precision and exponentiation; such that 10# -> 1.0e2? 19:09:47 -!- kniu [n=kniu@OVERLORD.RES.CMU.EDU] has quit [Read error: 110 (Connection timed out)] 19:10:21 athos [n=philipp@92.250.250.68] has joined #scheme 19:15:25 -!- athos [n=philipp@92.250.250.68] has quit [Remote closed the connection] 19:16:25 athos [n=philipp@92.250.250.68] has joined #scheme 19:23:21 JasonPx [n=Jason@ipanema.parkpointrit.com] has joined #scheme 19:23:39 -!- hotblack23 [n=jh@p5B05423E.dip.t-dialin.net] has quit [Remote closed the connection] 19:26:41 hotblack23 [n=jh@p5B05423E.dip.t-dialin.net] has joined #scheme 19:27:34 MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has joined #scheme 19:27:36 -!- synthase [n=synthase@68.63.19.212] has quit [No route to host] 19:30:17 -!- Fare [n=Fare@ita4fw1.itasoftware.com] has quit ["Leaving"] 19:31:29 -!- Nshag [i=user@Mix-Orleans-106-1-27.w193-248.abo.wanadoo.fr] has quit [Remote closed the connection] 19:31:48 -!- elias` [n=me@unaffiliated/elias/x-342423] has quit [Connection timed out] 19:36:05 Ragnaroek [i=54a6459c@gateway/web/ajax/mibbit.com/x-9c8ab9fbaeecf455] has joined #scheme 19:40:15 -!- luz [n=davids@139.82.89.70] has quit ["Client exiting"] 19:41:01 carlos` [n=oded@93-172-161-165.bb.netvision.net.il] has joined #scheme 19:43:23 -!- carlos` [n=oded@93-172-161-165.bb.netvision.net.il] has quit [Client Quit] 19:47:18 synthase [n=synthase@68.63.19.212] has joined #scheme 19:53:43 elias` [n=me@cs78208074.pp.htv.fi] has joined #scheme 19:58:05 Khisanth [n=Khisanth@pool-141-157-237-196.ny325.east.verizon.net] has joined #scheme 20:00:54 Trollinator [n=foo@g226231019.adsl.alicedsl.de] has joined #scheme 20:01:08 hi 20:03:47 Elone_taru [n=elone@c-71-202-143-119.hsd1.ca.comcast.net] has joined #scheme 20:03:55 -!- Elonetaru [n=elone@c-71-202-143-119.hsd1.ca.comcast.net] has quit [Read error: 60 (Operation timed out)] 20:04:32 arcfide: remember the code i showed you yesterday? 20:04:58 -!- cracki [n=cracki@sglty.kawo2.RWTH-Aachen.DE] has quit ["The funniest things in my life are truth and absurdity."] 20:06:15 I've removed a lot of the redundancy, maybe you have further tips for improvement 20:07:15 http://codepad.org/mV7rEPyQ 20:10:16 benny [n=benny@i577A14D8.versanet.de] has joined #scheme 20:15:29 cracki [n=cracki@sglty.kawo2.RWTH-Aachen.DE] has joined #scheme 20:15:36 Trollinator: looks better. 20:16:47 :) 20:17:29 geckosenator [n=sean@c-71-237-94-78.hsd1.co.comcast.net] has joined #scheme 20:18:31 nibble70 [n=nibble70@net-93-150-24-174.t2.dsl.vodafone.it] has joined #scheme 20:19:12 Trollinator: why not do a table-based dispatch instead of the long case? 20:20:03 a what? 20:20:52 something along the lines of: (hash-table-ref/default translations instr default-translation), where default-translation is your else clause; and translations has 'x:=x+1 -> (list next '(cons 1 x) 'y) mappings? 20:21:13 -!- nibble70 [n=nibble70@net-93-150-24-174.t2.dsl.vodafone.it] has quit [Client Quit] 20:22:05 well, you couldn't store next in the translation table; but you get the picture 20:22:26 might be more elegant/extensible than a prolonged case expression 20:23:46 Riastradh: Is the website a little easier on your eyes now? 20:24:23 klutometis: You don't have stylesheets enabled by default, but it might make a difference if you could let me know if the style sheet stinks. 20:25:26 -!- benny` [n=benny@i577A1576.versanet.de] has quit [Success] 20:27:15 klutometis: does scheme have built-in dictionaries like python or the like? 20:27:27 Trollinator: Most Schemes have hashtables or the like. 20:28:44 -!- arcfide [n=arcfide@99.50.228.183] has quit [] 20:29:02 hm, it may be more elegent that way then. 20:29:28 but i don't think it buys much in terms of code complexity. 20:29:41 or rather simplicity 20:33:09 Trollinator: there's alists, which are really just lists; but they have a linear lookup time 20:33:26 srfi-69 describes O(1) lookup hashtables 20:33:29 it should be in any scheme 20:33:39 OK. 20:34:05 Trollinator: it may not buy you much in terms of complexity with so few rules; but it's forward-thinking (to many rules), and might impress the prof 20:34:09 (or not) 20:34:32 -!- elias` [n=me@unaffiliated/elias/x-342423] has quit [Read error: 145 (Connection timed out)] 20:35:42 -!- Adamant [n=Adamant@unaffiliated/adamant] has quit [] 20:36:06 klutometis: if they actually do extend the language (which i don't think they'll do), i'll rewrite that bit anway so that x:=x+1 isn't parsed as a single token anymore. 20:36:24 but rather as '(x := x + 1) 20:37:11 and i don't think my prof will be all that impressed by a hash table (given that i'm certainly not) 20:38:02 Adamant [n=Adamant@c-76-29-188-22.hsd1.ga.comcast.net] has joined #scheme 20:38:08 interesting; then a per-token Uebersetzungstabelle might be appropriate 20:38:33 (not that a hash-table per-se is impressive; but table-based translation is slightly more sophisticated than case-based) 20:40:18 -!- tripwyre [n=sathya@117.193.163.93] has quit ["bye all"] 20:42:42 elias` [n=me@cs78208074.pp.htv.fi] has joined #scheme 20:49:16 arcfide [n=arcfide@iub-vpn-205-77.noc.indiana.edu] has joined #scheme 20:50:56 ebzzry [n=ebzzry@124.217.74.227] has joined #scheme 20:51:43 eli: Are you partly in-charge of the content at docs.plt-scheme.org 20:52:22 -!- Trollinator [n=foo@g226231019.adsl.alicedsl.de] has left #scheme 20:55:39 -!- elias` [n=me@unaffiliated/elias/x-342423] has quit [Read error: 145 (Connection timed out)] 20:59:47 -!- ct2rips [n=ct2rips@blfd-4db0e34e.pool.einsundeins.de] has quit ["Verlassend"] 21:03:15 rail_tourist [n=ajoy@115.241.114.204] has joined #scheme 21:03:44 *arcfide* looks around. 21:04:00 *Cowmoo* looks innocent 21:04:05 Cowmoo: You! 21:04:32 elias` [n=me@cs78208074.pp.htv.fi] has joined #scheme 21:05:16 it is amusing being away from IRC for months on end 21:05:21 then coming back and seeing all the same people 21:05:40 perhaps I am an elementary person who is easily amused 21:06:14 yers 21:06:56 hello geckosenator 21:07:09 last I saw you a year or two ago you were working on 3d-rendering with scheme 21:09:59 really? 21:10:16 I'm doing superoptimization now 21:11:58 Cowmoo: heh; that's a tribute to our virtue, not your abstracting sophistication ;) 21:12:52 puchacz [n=puchacz@87-194-5-99.bethere.co.uk] has joined #scheme 21:15:13 -!- elias` [n=me@unaffiliated/elias/x-342423] has quit [Read error: 145 (Connection timed out)] 21:17:17 pfo_ [n=pfo@chello084114049188.14.vie.surfer.at] has joined #scheme 21:17:18 -!- ebzzry [n=ebzzry@124.217.74.227] has quit ["Leaving"] 21:18:53 -!- rail_tourist [n=ajoy@115.241.114.204] has quit [Read error: 104 (Connection reset by peer)] 21:19:17 rail_tourist [n=ajoy@115.241.114.204] has joined #scheme 21:23:25 -!- hkBst [n=hkBst@gentoo/developer/hkbst] has quit [Read error: 104 (Connection reset by peer)] 21:23:33 elias` [n=me@cs78208074.pp.htv.fi] has joined #scheme 21:23:59 -!- synthase [n=synthase@68.63.19.212] has quit [Read error: 110 (Connection timed out)] 21:29:06 -!- cracki [n=cracki@sglty.kawo2.RWTH-Aachen.DE] has quit ["The funniest things in my life are truth and absurdity."] 21:31:56 -!- Ragnaroek [i=54a6459c@gateway/web/ajax/mibbit.com/x-9c8ab9fbaeecf455] has quit ["http://www.mibbit.com ajax IRC Client"] 21:36:54 -!- Judofyr [n=Judofyr@c349BBF51.dhcp.bluecom.no] has quit [Remote closed the connection] 21:38:14 cracki [n=cracki@sglty.kawo2.RWTH-Aachen.DE] has joined #scheme 21:43:21 hadronzoo [n=hadronzo@user-0c2h0f1.cable.mindspring.com] has joined #scheme 21:43:36 -!- JasonPx [n=Jason@ipanema.parkpointrit.com] has quit [Read error: 54 (Connection reset by peer)] 21:43:53 JasonPx [n=Jason@ipanema.parkpointrit.com] has joined #scheme 21:45:30 gweiqi [n=greg@69.120.126.163] has joined #scheme 21:48:25 -!- puchacz [n=puchacz@87-194-5-99.bethere.co.uk] has quit [Read error: 54 (Connection reset by peer)] 22:00:12 JasonPhD [n=Jason@ipanema.parkpointrit.com] has joined #scheme 22:00:12 -!- JasonPx [n=Jason@ipanema.parkpointrit.com] has quit [Read error: 54 (Connection reset by peer)] 22:00:42 RageOfThou [n=RageOfTh@92.36.162.136] has joined #scheme 22:04:26 -!- hotblack23 [n=jh@p5B05423E.dip.t-dialin.net] has quit [Remote closed the connection] 22:06:13 -!- athos [n=philipp@92.250.250.68] has quit ["leaving"] 22:09:00 -!- rail_tourist [n=ajoy@115.241.114.204] has quit ["Konversation terminated!"] 22:16:57 superoptimization, is that optimizing optimization procedures, or is it like super duper optimization 22:16:57 -!- exexex [n=chatzill@88.234.120.66] has quit [Remote closed the connection] 22:18:34 -!- MrFahrenheit [n=RageOfTh@92.36.198.174] has quit [Read error: 110 (Connection timed out)] 22:19:30 -!- melgray [n=melgray@70.99.250.82] has quit [] 22:19:46 -!- orgy` [n=ratm_@pD9FFE633.dip.t-dialin.net] has quit ["Gone."] 22:19:56 orgy` [n=ratm_@pD9FFE633.dip.t-dialin.net] has joined #scheme 22:24:21 synx: lol 22:24:30 wait are u serious? 22:24:59 incubot: how do u u u u feel? 22:25:02 I know where I stand on r6rs, but I don't feel like I'm knowledgeable or experienced enough to vote on it. 22:27:22 -!- Elone_taru [n=elone@c-71-202-143-119.hsd1.ca.comcast.net] has quit [Remote closed the connection] 22:27:58 -!- jewel_ [n=jewel@dsl-247-205-254.telkomadsl.co.za] has quit [Read error: 113 (No route to host)] 22:30:56 -!- deat [n=deat@fac34-8-88-172-174-215.fbx.proxad.net] has quit [] 22:32:05 sort of JasonPhD. super in latin means above or around, like a superset. but maybe geckosenator was just bragging :) 22:37:48 -!- MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has left #scheme 22:38:25 bombshelter13_ [n=bombshel@209-161-233-254.dsl.look.ca] has joined #scheme 22:39:02 MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has joined #scheme 22:39:14 -!- Adamant [n=Adamant@unaffiliated/adamant] has quit [] 22:42:26 -!- bweaver [n=user@75.148.111.133] has quit ["ERC Version 5.3 (IRC client for Emacs)"] 22:43:03 -!- Mr-Cat [n=Mr-Cat@bahirkin1507.static.corbina.ru] has quit [Remote closed the connection] 22:43:58 ttmrichter [n=ttmricht@219.140.250.126] has joined #scheme 22:45:39 -!- annodomini [n=lambda@wikipedia/lambda] has quit [] 22:52:45 synx: super in the sense of micro/superfluous 22:53:35 microfluous? 22:55:00 synx: nice; log it. you have a meme-worthy neologism 23:03:43 JasonPx [n=Jason@ipanema.parkpointrit.com] has joined #scheme 23:03:43 -!- JasonPhD [n=Jason@ipanema.parkpointrit.com] has quit [Read error: 104 (Connection reset by peer)] 23:05:53 sohum [n=sohum@unaffiliated/sohum] has joined #scheme 23:06:11 what's the idiomatic way to read in a file one line at a time? 23:07:42 raikov [n=igr@203.181.243.11] has joined #scheme 23:09:42 -!- orgy` [n=ratm_@pD9FFE633.dip.t-dialin.net] has quit ["Gone."] 23:10:06 -!- Edico [n=Edico@unaffiliated/edico] has quit ["Leaving"] 23:11:34 SharkBrian [n=user@210.48.104.34] has joined #scheme 23:16:19 inforichland [n=inforich@96-42-29-58.dhcp.mdsn.wi.charter.com] has joined #scheme 23:19:00 -!- arcfide [n=arcfide@iub-vpn-205-77.noc.indiana.edu] has quit ["Leaving"] 23:19:17 -!- elias` [n=me@unaffiliated/elias/x-342423] has quit [Read error: 60 (Operation timed out)] 23:25:59 -!- jlongster [n=user@75.148.111.133] has quit [Read error: 113 (No route to host)] 23:27:04 mjonsson [n=mjonsson@66-234-42-80.nyc.cable.nyct.net] has joined #scheme 23:29:08 annodomini [n=lambda@c-75-69-96-104.hsd1.nh.comcast.net] has joined #scheme 23:32:44 sohum: not sure about idiomatic; but elegant is this approach: http://mumble.net/~campbell/scheme/foof-loop.txt 23:32:54 search for read-non-empty-lines 23:36:28 JasonPhD [n=Jason@ipanema.parkpointrit.com] has joined #scheme 23:36:28 -!- JasonPx [n=Jason@ipanema.parkpointrit.com] has quit [Read error: 54 (Connection reset by peer)] 23:46:30 -!- MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has quit [Remote closed the connection] 23:46:59 MichaelRaskin [n=MichaelR@gwh-1-177-mytn23k1.ln.rinet.ru] has joined #scheme 23:47:59 aardvarq [i=tgAardva@student3113.student.nau.edu] has joined #scheme 23:54:32 synthase [n=synthase@68.63.19.212] has joined #scheme