2016-06-08T00:01:40Z bokr quit (Quit: Leaving.) 2016-06-08T00:02:03Z edgar-rft quit (Quit: edgar-rft) 2016-06-08T00:08:14Z cemerick joined #scheme 2016-06-08T00:14:42Z tax joined #scheme 2016-06-08T00:19:40Z nisstyre quit (Changing host) 2016-06-08T00:19:40Z nisstyre joined #scheme 2016-06-08T00:22:40Z mastokley joined #scheme 2016-06-08T00:26:42Z annodomini quit (Quit: annodomini) 2016-06-08T00:30:52Z noethics quit (Remote host closed the connection) 2016-06-08T00:31:15Z noethics joined #scheme 2016-06-08T00:31:17Z Khisanth quit (Ping timeout: 244 seconds) 2016-06-08T00:32:04Z Khisanth joined #scheme 2016-06-08T00:36:36Z githogori quit (Read error: Connection reset by peer) 2016-06-08T00:38:28Z githogori joined #scheme 2016-06-08T00:41:40Z mokuso joined #scheme 2016-06-08T00:41:43Z Khisanth quit (Ping timeout: 252 seconds) 2016-06-08T00:42:07Z Khisanth joined #scheme 2016-06-08T00:45:09Z daviid joined #scheme 2016-06-08T00:45:47Z shdeng joined #scheme 2016-06-08T01:24:53Z bjz quit (Quit: My MacBook Pro has gone to sleep. ZZZzzz…) 2016-06-08T01:43:07Z badkins quit (Remote host closed the connection) 2016-06-08T01:46:00Z groscoe quit (Ping timeout: 240 seconds) 2016-06-08T01:56:20Z sethalves joined #scheme 2016-06-08T02:04:30Z ArneBab joined #scheme 2016-06-08T02:08:46Z ArneBab_ quit (Ping timeout: 244 seconds) 2016-06-08T02:18:09Z fugastrega quit (Quit: Leaving) 2016-06-08T02:18:31Z jyc joined #scheme 2016-06-08T02:31:34Z grettke quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T02:43:57Z zv quit (Ping timeout: 260 seconds) 2016-06-08T02:47:08Z scarygelatin quit (Quit: Leaving) 2016-06-08T02:53:45Z daviid quit (Ping timeout: 260 seconds) 2016-06-08T02:59:00Z bokr joined #scheme 2016-06-08T03:04:35Z andrewvic1 joined #scheme 2016-06-08T03:08:52Z jao quit (Ping timeout: 244 seconds) 2016-06-08T03:27:48Z fugastrega joined #scheme 2016-06-08T03:34:27Z leot quit (Remote host closed the connection) 2016-06-08T03:46:15Z tmtwd quit (Ping timeout: 246 seconds) 2016-06-08T03:59:40Z andrewvic1 quit (Ping timeout: 260 seconds) 2016-06-08T04:02:26Z tmtwd joined #scheme 2016-06-08T04:04:52Z jackdaniel quit (Quit: Lost terminal) 2016-06-08T04:05:33Z jackdaniel joined #scheme 2016-06-08T04:11:17Z bokr quit (Quit: Leaving.) 2016-06-08T04:13:24Z bokr joined #scheme 2016-06-08T04:16:04Z zv joined #scheme 2016-06-08T04:21:21Z mbuf joined #scheme 2016-06-08T05:04:13Z groovy2shoes joined #scheme 2016-06-08T05:08:10Z andrewvic joined #scheme 2016-06-08T05:19:03Z fugastrega quit (Quit: Leaving) 2016-06-08T05:20:27Z andrewvic quit (Quit: andrewvic) 2016-06-08T05:21:59Z andrewvic joined #scheme 2016-06-08T05:22:12Z andrewvic quit (Client Quit) 2016-06-08T05:23:01Z ecraven: hey :) 2016-06-08T05:23:08Z jackdaniel: o/ 2016-06-08T05:28:50Z dfr33zy joined #scheme 2016-06-08T05:31:51Z groovy2shoes: hey y'all :) 2016-06-08T05:32:27Z ecraven: interesting discussion about immutable strings on srfi 135 2016-06-08T05:32:48Z ecraven: I just fear it'll splinter things even more :-/ string- vs. text- vs. textual- :-( 2016-06-08T05:37:48Z pierpa: no, I think srfi-135 is promising 2016-06-08T05:38:57Z ecraven: pierpa: I agree with the srfi in general, I just don't like two new prefixes... 2016-06-08T05:38:58Z pierpa: and there's a chance that the current mess of undefined behaviors can be reduced 2016-06-08T05:39:22Z ecraven: I'd prefer making string immutable and adding a mutable string type... but that's for r8rs, if ever 2016-06-08T05:40:43Z pierpa: Yes, of course. But they don't want to make changes this big. So something like srfi-135 is the second best thing 2016-06-08T05:41:28Z ecraven: pierpa: but it will also introduce a lot of legacy code using textual- and text-, making the step to immutable string (with prefix string-) even harder 2016-06-08T05:42:46Z pierpa: string may remain for the mutable ones, and text for the immutable. Then the double quote syntax may be repurposed to produce texts... 2016-06-08T05:43:10Z lambda-11235 quit (Quit: Bye) 2016-06-08T05:43:31Z AlexDenisov quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T05:43:59Z pierpa: and gradually strings will be a legacy feature 2016-06-08T05:44:20Z ecraven: ... and we're stuck with text- for strings, instead of string- 2016-06-08T05:44:33Z ecraven: I feel names are very important, so I wouldn't like that :-/ 2016-06-08T05:44:45Z pierpa: text is not a bad name 2016-06-08T05:45:29Z pierpa: think about it... :) 2016-06-08T05:45:55Z ecraven: text to me implies a certain minimum length :) 2016-06-08T05:46:00Z ecraven: a long string is a text :p 2016-06-08T05:46:06Z pierpa: hmmm 2016-06-08T05:52:28Z dfr33zy quit (Remote host closed the connection) 2016-06-08T05:54:06Z andrewvic joined #scheme 2016-06-08T06:08:23Z andrewvic quit (Quit: andrewvic) 2016-06-08T06:14:04Z turbofail quit (Remote host closed the connection) 2016-06-08T06:21:24Z stepnem joined #scheme 2016-06-08T06:28:54Z pepton3 joined #scheme 2016-06-08T06:35:51Z tmtwd quit (Ping timeout: 250 seconds) 2016-06-08T06:37:34Z sethalves quit (Ping timeout: 252 seconds) 2016-06-08T06:38:15Z leot joined #scheme 2016-06-08T06:40:00Z mokuso quit (Ping timeout: 276 seconds) 2016-06-08T06:42:02Z sethalves joined #scheme 2016-06-08T06:43:41Z SamF quit (Remote host closed the connection) 2016-06-08T06:47:12Z sethalves quit (Ping timeout: 272 seconds) 2016-06-08T06:48:05Z sethalves joined #scheme 2016-06-08T06:52:39Z pepton3 quit (Ping timeout: 264 seconds) 2016-06-08T06:54:29Z sethalves quit (Ping timeout: 244 seconds) 2016-06-08T06:55:14Z sethalves joined #scheme 2016-06-08T06:58:22Z bokr1 joined #scheme 2016-06-08T06:59:52Z bokr quit (Ping timeout: 264 seconds) 2016-06-08T07:01:58Z pierpa quit (Remote host closed the connection) 2016-06-08T07:02:13Z pierpa joined #scheme 2016-06-08T07:09:08Z pierpa quit (Ping timeout: 250 seconds) 2016-06-08T07:14:21Z sethalves quit (Ping timeout: 250 seconds) 2016-06-08T07:15:24Z sethalves joined #scheme 2016-06-08T07:17:33Z andrewvic joined #scheme 2016-06-08T07:30:22Z bjz joined #scheme 2016-06-08T07:30:23Z lritter quit (Ping timeout: 258 seconds) 2016-06-08T07:33:46Z tmtwd joined #scheme 2016-06-08T07:37:12Z AlexDenisov joined #scheme 2016-06-08T07:40:43Z Muir joined #scheme 2016-06-08T07:41:18Z andrewvic quit (Quit: andrewvic) 2016-06-08T07:41:30Z cemerick quit (Ping timeout: 258 seconds) 2016-06-08T07:43:01Z sethalves quit (Ping timeout: 250 seconds) 2016-06-08T07:43:34Z sethalves joined #scheme 2016-06-08T07:44:41Z tax quit (Quit: Leaving) 2016-06-08T07:50:18Z bjz quit (Quit: My MacBook Pro has gone to sleep. ZZZzzz…) 2016-06-08T07:56:23Z tmtwd quit (Ping timeout: 250 seconds) 2016-06-08T08:06:23Z bjz joined #scheme 2016-06-08T08:06:25Z noethics quit (Ping timeout: 260 seconds) 2016-06-08T08:19:21Z przl joined #scheme 2016-06-08T08:29:32Z mbrock joined #scheme 2016-06-08T08:51:57Z ByronJohnson quit (Ping timeout: 244 seconds) 2016-06-08T08:52:19Z zv quit (Ping timeout: 252 seconds) 2016-06-08T08:53:48Z ByronJohnson joined #scheme 2016-06-08T08:53:58Z ByronJohnson quit (Changing host) 2016-06-08T08:53:58Z ByronJohnson joined #scheme 2016-06-08T08:55:12Z sethalves quit (Ping timeout: 276 seconds) 2016-06-08T08:56:25Z sethalves joined #scheme 2016-06-08T08:57:04Z zv joined #scheme 2016-06-08T09:00:11Z bokr joined #scheme 2016-06-08T09:00:33Z bokr1 quit (Ping timeout: 246 seconds) 2016-06-08T09:12:00Z arbv joined #scheme 2016-06-08T09:12:08Z mokuso joined #scheme 2016-06-08T09:13:00Z arbv quit (Remote host closed the connection) 2016-06-08T09:17:10Z arbv joined #scheme 2016-06-08T09:34:12Z edgar-rft joined #scheme 2016-06-08T09:44:10Z fugastrega joined #scheme 2016-06-08T09:44:15Z SamF joined #scheme 2016-06-08T09:48:41Z SamF quit (Ping timeout: 250 seconds) 2016-06-08T09:48:45Z arbv quit (Quit: rcirc on GNU Emacs 25.0.94.2) 2016-06-08T09:49:48Z sethalves quit (Ping timeout: 276 seconds) 2016-06-08T09:50:53Z durm joined #scheme 2016-06-08T09:51:03Z mokuso quit (Remote host closed the connection) 2016-06-08T09:51:12Z sethalves joined #scheme 2016-06-08T09:55:40Z sethalves quit (Ping timeout: 264 seconds) 2016-06-08T09:59:42Z sethalves joined #scheme 2016-06-08T10:08:54Z arbv joined #scheme 2016-06-08T10:12:39Z sethalves quit (Ping timeout: 246 seconds) 2016-06-08T10:13:42Z bjz_ joined #scheme 2016-06-08T10:13:51Z bjz quit (Ping timeout: 276 seconds) 2016-06-08T10:14:00Z sethalves joined #scheme 2016-06-08T10:15:58Z fugastrega quit (Quit: Leaving) 2016-06-08T10:19:05Z sethalves quit (Ping timeout: 244 seconds) 2016-06-08T10:24:05Z sethalves joined #scheme 2016-06-08T10:24:25Z aries_liuxueyang quit (Ping timeout: 258 seconds) 2016-06-08T10:28:08Z badkins joined #scheme 2016-06-08T10:29:48Z smc joined #scheme 2016-06-08T10:34:23Z sbwhitecap quit (Remote host closed the connection) 2016-06-08T10:35:12Z TheLemonMan joined #scheme 2016-06-08T10:40:43Z noethics joined #scheme 2016-06-08T10:42:19Z przl quit (Ping timeout: 252 seconds) 2016-06-08T10:49:07Z annodomini joined #scheme 2016-06-08T10:51:53Z aries_liuxueyang joined #scheme 2016-06-08T10:55:08Z bjz joined #scheme 2016-06-08T10:55:26Z bjz_ quit (Ping timeout: 244 seconds) 2016-06-08T10:56:32Z annodomini quit (Quit: annodomini) 2016-06-08T10:56:56Z annodomini joined #scheme 2016-06-08T10:59:34Z sethalves quit (Ping timeout: 244 seconds) 2016-06-08T11:05:55Z annodomini quit (Quit: annodomini) 2016-06-08T11:06:41Z annodomini joined #scheme 2016-06-08T11:15:18Z sethalves joined #scheme 2016-06-08T11:16:33Z przl joined #scheme 2016-06-08T11:16:35Z shdeng quit (Quit: Leaving) 2016-06-08T11:19:14Z ByronJohnson quit (Ping timeout: 258 seconds) 2016-06-08T11:20:55Z przl quit (Ping timeout: 250 seconds) 2016-06-08T11:31:53Z ByronJohnson joined #scheme 2016-06-08T11:32:29Z jao joined #scheme 2016-06-08T11:41:47Z sethalves quit (Ping timeout: 260 seconds) 2016-06-08T11:42:44Z sethalves joined #scheme 2016-06-08T11:43:37Z inferno joined #scheme 2016-06-08T11:44:00Z inferno quit (Remote host closed the connection) 2016-06-08T11:52:39Z sethalves quit (Ping timeout: 276 seconds) 2016-06-08T11:53:52Z sethalves joined #scheme 2016-06-08T11:55:40Z bikeshedr quit (Ping timeout: 264 seconds) 2016-06-08T11:55:48Z bikeshedr joined #scheme 2016-06-08T11:59:04Z mbuf quit (Quit: Ex-Chat) 2016-06-08T12:01:20Z sethalves quit (Ping timeout: 272 seconds) 2016-06-08T12:02:15Z sethalves joined #scheme 2016-06-08T12:04:03Z kuribas joined #scheme 2016-06-08T12:17:28Z przl joined #scheme 2016-06-08T12:21:32Z przl quit (Ping timeout: 244 seconds) 2016-06-08T12:31:35Z civodul joined #scheme 2016-06-08T12:32:34Z cemerick joined #scheme 2016-06-08T12:32:41Z bokr quit (Remote host closed the connection) 2016-06-08T12:43:47Z annodomini quit (Quit: annodomini) 2016-06-08T12:54:04Z TCZ joined #scheme 2016-06-08T12:57:46Z TCZ quit (Client Quit) 2016-06-08T13:04:42Z grettke joined #scheme 2016-06-08T13:06:06Z jao quit (Ping timeout: 276 seconds) 2016-06-08T13:10:39Z sethalves quit (Ping timeout: 276 seconds) 2016-06-08T13:11:51Z sethalves joined #scheme 2016-06-08T13:12:39Z SamF joined #scheme 2016-06-08T13:16:42Z sethalves quit (Ping timeout: 272 seconds) 2016-06-08T13:18:35Z sethalves joined #scheme 2016-06-08T13:26:07Z Khisanth quit (Ping timeout: 258 seconds) 2016-06-08T13:27:06Z jlongster joined #scheme 2016-06-08T13:27:44Z jvn_ joined #scheme 2016-06-08T13:28:21Z sethalves quit (Ping timeout: 244 seconds) 2016-06-08T13:29:07Z sethalves joined #scheme 2016-06-08T13:34:23Z sethalves quit (Ping timeout: 250 seconds) 2016-06-08T13:35:08Z sethalves joined #scheme 2016-06-08T13:39:38Z Khisanth joined #scheme 2016-06-08T13:40:15Z sethalves quit (Ping timeout: 244 seconds) 2016-06-08T13:41:20Z sethalves joined #scheme 2016-06-08T13:41:47Z turbopape joined #scheme 2016-06-08T13:47:22Z grettke quit (Quit: Textual IRC Client: www.textualapp.com) 2016-06-08T13:50:55Z sethalves quit (Ping timeout: 244 seconds) 2016-06-08T13:56:28Z edw joined #scheme 2016-06-08T13:57:15Z lambda-11235 joined #scheme 2016-06-08T14:01:21Z cemerick quit (Ping timeout: 276 seconds) 2016-06-08T14:01:31Z ics joined #scheme 2016-06-08T14:11:04Z kuribas quit (Quit: ERC Version 5.3 (IRC client for Emacs)) 2016-06-08T14:15:47Z benregn joined #scheme 2016-06-08T14:20:01Z przl joined #scheme 2016-06-08T14:27:21Z jvn_ quit (Quit: Lost terminal) 2016-06-08T14:29:55Z sethalves joined #scheme 2016-06-08T14:31:16Z tmtwd joined #scheme 2016-06-08T14:35:09Z sethalves quit (Ping timeout: 276 seconds) 2016-06-08T14:36:55Z Tenhi_ joined #scheme 2016-06-08T14:39:48Z annodomini joined #scheme 2016-06-08T14:39:48Z annodomini quit (Changing host) 2016-06-08T14:39:48Z annodomini joined #scheme 2016-06-08T14:40:17Z tmtwd quit (Ping timeout: 260 seconds) 2016-06-08T14:41:59Z Tenhi_ quit (K-Lined) 2016-06-08T14:43:24Z sethalves joined #scheme 2016-06-08T14:52:02Z groscoe joined #scheme 2016-06-08T14:54:11Z sethalves quit (Ping timeout: 250 seconds) 2016-06-08T14:55:56Z sethalves joined #scheme 2016-06-08T14:58:31Z pierpa joined #scheme 2016-06-08T15:00:30Z przl quit (Ping timeout: 276 seconds) 2016-06-08T15:05:50Z sethalves quit (Ping timeout: 260 seconds) 2016-06-08T15:06:09Z SamF quit (Remote host closed the connection) 2016-06-08T15:07:51Z przl joined #scheme 2016-06-08T15:07:52Z SamF joined #scheme 2016-06-08T15:07:59Z benregn quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T15:08:27Z mejja joined #scheme 2016-06-08T15:14:05Z grettke joined #scheme 2016-06-08T15:15:57Z AlexDenisov quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T15:16:57Z turbopape_ joined #scheme 2016-06-08T15:17:12Z turbopape quit (Ping timeout: 244 seconds) 2016-06-08T15:18:12Z arbv quit (Ping timeout: 246 seconds) 2016-06-08T15:18:40Z _sjs quit (Ping timeout: 240 seconds) 2016-06-08T15:19:37Z aries_liuxueyang quit (Quit: No Ping reply in 180 seconds.) 2016-06-08T15:20:54Z jao joined #scheme 2016-06-08T15:21:04Z aries_liuxueyang joined #scheme 2016-06-08T15:26:50Z przl quit (Ping timeout: 260 seconds) 2016-06-08T15:30:21Z edgar-rft quit (Quit: edgar-rft) 2016-06-08T15:33:25Z alezost joined #scheme 2016-06-08T15:33:47Z sethalves joined #scheme 2016-06-08T15:34:19Z Muir quit (Quit: Leaving) 2016-06-08T15:36:43Z samw3 joined #scheme 2016-06-08T15:40:06Z sethalves quit (Ping timeout: 250 seconds) 2016-06-08T15:42:43Z sethalves joined #scheme 2016-06-08T15:43:27Z przl joined #scheme 2016-06-08T15:49:35Z sethalves quit (Ping timeout: 260 seconds) 2016-06-08T15:52:42Z grettke quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T15:54:30Z smc quit (Quit: leaving) 2016-06-08T15:55:04Z _sjs joined #scheme 2016-06-08T15:59:37Z przl quit (Ping timeout: 260 seconds) 2016-06-08T16:11:41Z alezost quit (Ping timeout: 250 seconds) 2016-06-08T16:12:33Z galex-713 quit (Ping timeout: 250 seconds) 2016-06-08T16:21:47Z galex-713 joined #scheme 2016-06-08T16:25:46Z przl joined #scheme 2016-06-08T16:26:01Z mbrock quit (Quit: Connection closed for inactivity) 2016-06-08T16:28:43Z leot quit (Quit: BBL) 2016-06-08T16:29:39Z badkins quit (Remote host closed the connection) 2016-06-08T16:30:51Z przl quit (Ping timeout: 276 seconds) 2016-06-08T16:35:10Z mejja quit (Quit: \ No newline at end of file) 2016-06-08T16:37:09Z sethalves joined #scheme 2016-06-08T16:37:57Z taylan quit (Disconnected by services) 2016-06-08T16:38:17Z taylan joined #scheme 2016-06-08T16:38:42Z alezost joined #scheme 2016-06-08T16:39:45Z Ravana quit (Ping timeout: 246 seconds) 2016-06-08T16:44:21Z Ravana joined #scheme 2016-06-08T16:46:56Z turbopape_ quit (Quit: Quitte) 2016-06-08T16:56:05Z galex-713 quit (Ping timeout: 260 seconds) 2016-06-08T16:56:21Z badkins joined #scheme 2016-06-08T16:56:34Z cemerick joined #scheme 2016-06-08T16:57:19Z rx80 quit (Remote host closed the connection) 2016-06-08T16:58:36Z Riastradh joined #scheme 2016-06-08T16:59:04Z rx80 joined #scheme 2016-06-08T16:59:11Z badkins_ joined #scheme 2016-06-08T17:02:52Z badkins quit (Ping timeout: 250 seconds) 2016-06-08T17:10:19Z grettke joined #scheme 2016-06-08T17:29:17Z rjnw joined #scheme 2016-06-08T17:34:18Z annodomini quit (Quit: annodomini) 2016-06-08T17:35:27Z pierpa: how do I get cpu elapsed time in Larceny? (or even real time, is cpu is not available) 2016-06-08T17:35:40Z pierpa: -is+if 2016-06-08T17:40:11Z pjb joined #scheme 2016-06-08T17:45:02Z wasamasa: I recall something about jiffies 2016-06-08T17:45:35Z wasamasa: http://www.larcenists.org/benchmarksAboutR7.html mentions current-jiffy 2016-06-08T17:46:41Z jcowan: If you wrap your expression in (time ...) you will get elapsed system and user time printed out. 2016-06-08T17:47:11Z jcowan: (import (larceny benchmarking)) first 2016-06-08T17:50:52Z galex-713 joined #scheme 2016-06-08T17:58:59Z pepton3 joined #scheme 2016-06-08T18:18:28Z rszeno joined #scheme 2016-06-08T18:21:22Z groscoe quit (Ping timeout: 260 seconds) 2016-06-08T18:22:01Z badkins_ quit (Read error: Connection reset by peer) 2016-06-08T18:25:40Z acarrico joined #scheme 2016-06-08T18:29:50Z IstiCusi joined #scheme 2016-06-08T18:30:52Z annodomini joined #scheme 2016-06-08T18:31:41Z rszeno quit (Quit: Leaving.) 2016-06-08T18:32:07Z badkins joined #scheme 2016-06-08T18:32:44Z nowhere_man joined #scheme 2016-06-08T18:33:43Z nilg joined #scheme 2016-06-08T18:41:16Z pierpa: wasamasa: jcowan: thank you 2016-06-08T18:52:34Z teurastaja joined #scheme 2016-06-08T18:59:31Z n_blownapart joined #scheme 2016-06-08T18:59:43Z n_blownapart: hi when this function recurses, the operation (* x   occurs outside the recursive function. so when we have (exponent 4 0) return 1, does (exponent x (- y 1)) reduce to (1) and move to the left like this? : (* 4 (1)). or is the >* move to the right into the function’ space something like this : (exponent (>* x (1)) ? thanks 2016-06-08T18:59:43Z n_blownapart:  https://www.refheap.com/120056 2016-06-08T19:00:12Z n_blownapart: does* 2016-06-08T19:05:45Z teurastaja: (define (exponent x y) (if (zero? y) 1 (* x (exponent x (- y 1))))) 2016-06-08T19:09:52Z jcowan: n_blownapart: What does >* mean? 2016-06-08T19:11:38Z pierpa: Any Larceny user here? 2016-06-08T19:12:45Z pierpa: This is what "larceny -r7rs" produces: https://bpaste.net/show/8a4911f940cd looks like it's non-working 2016-06-08T19:12:51Z gravicappa joined #scheme 2016-06-08T19:13:05Z grettke quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T19:14:23Z jcowan: Indeed. 2016-06-08T19:15:22Z teurastaja: is there any code associated with it? 2016-06-08T19:15:28Z noethics quit (Ping timeout: 250 seconds) 2016-06-08T19:16:00Z pierpa: ? 2016-06-08T19:22:25Z yrdz quit (Remote host closed the connection) 2016-06-08T19:22:34Z taylan quit (Disconnected by services) 2016-06-08T19:22:44Z jcowan: pierpa: I can't reproduce this on Linux. Did you build Larceny from source, or install a binary? 2016-06-08T19:22:52Z taylan joined #scheme 2016-06-08T19:24:25Z daviid joined #scheme 2016-06-08T19:30:15Z tristero joined #scheme 2016-06-08T19:32:49Z edgar-rft joined #scheme 2016-06-08T19:35:33Z n_blownapart: sorry jcowan had to step out suddenly. thats an alias because I was trying to follow the output better. 2016-06-08T19:36:48Z n_blownapart: jcowan: I think in this case you cannot do a trace on * because it is primative. 2016-06-08T19:36:56Z teurastaja: need help diagnosing this neural network: http://pastebin.com/MccBTS1V 2016-06-08T19:37:19Z teurastaja: *** ERROR: argument lists contained an improper list ending with: 3 2016-06-08T19:37:20Z teurastaja: Stack Trace: 2016-06-08T19:37:20Z teurastaja: _______________________________________ 2016-06-08T19:37:20Z teurastaja: 0 (hadamard (list 3 x) (transpose xy)) 2016-06-08T19:37:20Z teurastaja: At line 14 of "(standard input)" 2016-06-08T19:37:22Z teurastaja: 1 (dot-product in (car ws)) 2016-06-08T19:37:24Z teurastaja: At line 46 of "(standard input)" 2016-06-08T19:37:26Z teurastaja: 2 (eval expr env) 2016-06-08T19:37:28Z teurastaja: At line 179 of "/usr/share/gauche-0.9/0.9.4/lib/gauche/interactive.scm" 2016-06-08T19:37:30Z teurastaja: gosh[r7rs.user]> 2016-06-08T19:38:44Z n_blownapart: jcowan: what I'd like to know is how to conceptualize the * operator in that recursion, where it is sitting outside and to the left of the recursive func. 2016-06-08T19:38:55Z n_blownapart: >* 2016-06-08T19:39:17Z teurastaja: everything goes well until feedforward, but i rewrote feedforward differently and it gives me the same error 2016-06-08T19:39:59Z teurastaja: n_blownapart: i answered you earlier 2016-06-08T19:40:56Z nilg quit (Read error: Connection reset by peer) 2016-06-08T19:41:08Z n_blownapart: sorry I missed that teurastaja thanks I 'll figure out your answer. 2016-06-08T19:41:41Z pierpa: jcowan: it's a binary from larcenists.org. It appears to work only in -r5rs mode 2016-06-08T19:41:52Z teurastaja: well its easy to see it works. it may be that your interpreter treats ">" differently? 2016-06-08T19:42:21Z teurastaja: rudybot: (define (exponent x y) (if (zero? y) 1 (* x (exponent x (- y 1))))) 2016-06-08T19:42:21Z rudybot: teurastaja: your sandbox is ready 2016-06-08T19:42:22Z rudybot: teurastaja: Done. 2016-06-08T19:42:42Z teurastaja: rudybot: (exponent 4 5) 2016-06-08T19:42:43Z rudybot: teurastaja: ; Value: 1024 2016-06-08T19:43:21Z jcowan: In any case you should be using expt, which is a standard Scheme function 2016-06-08T19:43:27Z teurastaja: exactly 2016-06-08T19:44:13Z teurastaja: jcowan could you look at this please?: http://pastebin.com/MccBTS1V 2016-06-08T19:44:47Z teurastaja: its just 34 lines 2016-06-08T19:44:55Z teurastaja: and it breaks 2016-06-08T19:46:00Z jcowan: okay, what doesn't work? 2016-06-08T19:46:59Z n_blownapart: teurastaja: the thing is could you answer me this? : how do you write out by hand the output so that you can see how the arguments look after the base case; ie is it (* x (1)) , or is it (exponent (* x (1)) ? 2016-06-08T19:47:17Z teurastaja: *** ERROR: argument lists contained an improper list ending with: 3 2016-06-08T19:47:18Z teurastaja: Stack Trace: 2016-06-08T19:47:18Z teurastaja: _______________________________________ 2016-06-08T19:47:18Z teurastaja: 0 (hadamard (list 3 x) (transpose xy)) 2016-06-08T19:47:18Z teurastaja: At line 14 of "(standard input)" 2016-06-08T19:47:19Z teurastaja: 1 (dot-product in (car ws)) 2016-06-08T19:47:23Z teurastaja: At line 46 of "(standard input)" 2016-06-08T19:47:25Z teurastaja: 2 (eval expr env) 2016-06-08T19:47:27Z teurastaja: At line 179 of "/usr/share/gauche-0.9/0.9.4/lib/gauche/interactive.scm" 2016-06-08T19:47:29Z teurastaja: gosh[r7rs.user]> 2016-06-08T19:48:03Z teurastaja: n_blownapart: dont understand your question 2016-06-08T19:49:03Z teurastaja: n_blownapart: (... (* x 1)) 2016-06-08T19:49:33Z teurastaja: actually its not x its the accumulated value 2016-06-08T19:49:57Z jcowan: So it's getting a 3 where a pair is expected. 2016-06-08T19:49:58Z teurastaja: of exponent over x 2016-06-08T19:50:22Z n_blownapart: jcowan: sorry that is directed to me? 2016-06-08T19:50:29Z teurastaja: jcowan: cant visualize where that would be 2016-06-08T19:50:40Z teurastaja: n_blownapart: no 2016-06-08T19:50:43Z n_blownapart: sorry 2016-06-08T19:51:35Z teurastaja: n_blownapart: what you are studying is called a fold 2016-06-08T19:51:52Z n_blownapart: so teurastaja (... indicates (exponent in your post above? 2016-06-08T19:52:36Z jcowan: (list 3 x) produces (3 x), but hadamard appears to expect a list of lists 2016-06-08T19:52:40Z teurastaja: ... indicates previous values. remember that scheme is textually scoped 2016-06-08T19:53:03Z teurastaja: jcowan: omg!!! i did this?? 2016-06-08T19:53:11Z teurastaja: i meant make-list lol 2016-06-08T19:53:56Z pierpa: the joys of dinamism :) 2016-06-08T19:53:59Z teurastaja: damn... i thought my mistakes were a little less stupid 2016-06-08T19:55:03Z grettke joined #scheme 2016-06-08T19:59:40Z AlexDenisov joined #scheme 2016-06-08T20:02:11Z edgar-rft quit (Quit: edgar-rft) 2016-06-08T20:03:11Z n_blownapart: so does (>* 4 (exponent 4 (1))) look like this (*> 4 (>* 4 (1)) in the next step, or does it look like this : (*> 16 (1)) ? teurastaja 2016-06-08T20:04:03Z cemerick quit (Ping timeout: 276 seconds) 2016-06-08T20:04:38Z n_blownapart: ie if the multiplication is on the right of the inner nested function, how does it handle two argument : (exponent 4 1) ? 2016-06-08T20:04:48Z n_blownapart: arguments* 2016-06-08T20:05:34Z fantazo joined #scheme 2016-06-08T20:05:55Z alezost quit (Quit: I live in GuixSD and Emacs ) 2016-06-08T20:06:17Z n_blownapart: isn't the interpreter looking at this ? : (* 4 (exponent 4 1)) 2016-06-08T20:07:47Z IstiCusi quit (Quit: WeeChat 1.4) 2016-06-08T20:07:47Z turbofail joined #scheme 2016-06-08T20:10:01Z rjnw quit (Quit: Connection closed for inactivity) 2016-06-08T20:11:03Z teurastaja: n_blownapart: (1) means execute 1 which is a mistake 2016-06-08T20:11:14Z teurastaja: it doesnt do that 2016-06-08T20:11:36Z n_blownapart: teurastaja: I'm reading about left and right folds now but I'm confused. 2016-06-08T20:12:25Z n_blownapart: let me post something if you have time. its code I understand that involve what I believe to be a left fold. 2016-06-08T20:12:31Z n_blownapart: teurastaja: ^ 2016-06-08T20:16:57Z mumptai joined #scheme 2016-06-08T20:17:44Z n_blownapart: teurastaja: I'd really appreciate it if you wrote out the output of our exponent func. in a similar fashion to the commented output here : https://www.refheap.com/120061 2016-06-08T20:22:06Z n_blownapart: sorry that has other code this is much simpler. I need to be able to conceptualize the fold in a similar way : https://www.refheap.com/120065 teurastaja 2016-06-08T20:25:44Z n_blownapart: very sorry I need to leave if you have time teurastaja I'd really appreciate a post answering this. thanks ! 2016-06-08T20:28:42Z juanfra quit (Quit: juanfra) 2016-06-08T20:30:40Z fantazo quit (Quit: Verlassend) 2016-06-08T20:33:00Z pjb quit (Remote host closed the connection) 2016-06-08T20:34:07Z teurastaja: rudybot: (require racket/trace) 2016-06-08T20:34:08Z rudybot: teurastaja: Done. 2016-06-08T20:34:23Z teurastaja: rudybot: (define (exponent x y) (if (zero? y) 1 (* x (exponent x (- y 1))))) 2016-06-08T20:34:23Z rudybot: teurastaja: Done. 2016-06-08T20:34:23Z badkins quit (Read error: Connection reset by peer) 2016-06-08T20:34:35Z teurastaja: rudybot: (trace exponent) 2016-06-08T20:34:35Z rudybot: teurastaja: Done. 2016-06-08T20:34:42Z teurastaja: (exponent 4 5) 2016-06-08T20:34:49Z teurastaja: rudybot: (exponent 4 5) 2016-06-08T20:34:50Z rudybot: teurastaja: ; Value: 1024 2016-06-08T20:34:51Z rudybot: teurastaja: ; stdout: ">(exponent 4 5)\n> (exponent 4 4)\n> >(exponent 4 3)\n> > (exponent 4 2)\n> > >(exponent 4 1)\n> > > (exponent 4 0)\n< < < 1\n< < <4\n< < 16\n< <64\n< 256\n<1024\n" 2016-06-08T20:37:10Z teurastaja: n_blownapart: there you go 2016-06-08T20:37:46Z teurastaja: rudybot: (display ">(exponent 4 5)\n> (exponent 4 4)\n> >(exponent 4 3)\n> > (exponent 4 2)\n> > >(exponent 4 1)\n> > > (exponent 4 0)\n< < < 1\n< < <4\n< < 16\n< <64\n< 256\n<1024\n") 2016-06-08T20:37:46Z rudybot: teurastaja: ; stdout: ">(exponent 4 5)\n> (exponent 4 4)\n> >(exponent 4 3)\n> > (exponent 4 2)\n> > >(exponent 4 1)\n> > > (exponent 4 0)\n< < < 1\n< < <4\n< < 16\n< <64\n< 256\n<1024\n" 2016-06-08T20:37:56Z teurastaja: :/ 2016-06-08T20:45:44Z m1dnight_ quit (Ping timeout: 272 seconds) 2016-06-08T20:51:30Z gravicappa quit (Ping timeout: 276 seconds) 2016-06-08T20:58:10Z daviid quit (Ping timeout: 260 seconds) 2016-06-08T20:58:24Z m1dnight_ joined #scheme 2016-06-08T20:59:54Z badkins joined #scheme 2016-06-08T21:01:26Z civodul quit (Quit: ERC (IRC client for Emacs 24.5.1)) 2016-06-08T21:04:46Z noethics joined #scheme 2016-06-08T21:08:19Z badkins quit (Remote host closed the connection) 2016-06-08T21:14:04Z turbofail: damn. chez scheme is awesome 2016-06-08T21:16:24Z SamF quit (Quit: Leaving...) 2016-06-08T21:28:27Z SamF joined #scheme 2016-06-08T21:29:12Z edw quit (Ping timeout: 276 seconds) 2016-06-08T21:29:23Z AlexDenisov quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T21:30:53Z TheLemonMan quit (Quit: "It's now safe to turn off your computer.") 2016-06-08T21:33:01Z turbofail: though i do miss the nonstandard racket things 2016-06-08T21:33:27Z rjnw joined #scheme 2016-06-08T21:37:17Z n_blownapart: teurastaja: thanks kindly ! I will sort through that ! 2016-06-08T21:37:34Z SamF quit (Quit: Leaving...) 2016-06-08T21:41:06Z juanfra joined #scheme 2016-06-08T21:45:07Z groscoe joined #scheme 2016-06-08T21:45:09Z edw joined #scheme 2016-06-08T21:47:14Z lritter joined #scheme 2016-06-08T21:47:37Z n_blownapart quit 2016-06-08T21:49:21Z stepnem quit (Ping timeout: 276 seconds) 2016-06-08T21:49:30Z edw quit (Ping timeout: 246 seconds) 2016-06-08T21:55:30Z jlongster quit (Quit: My Mac has gone to sleep. ZZZzzz…) 2016-06-08T21:57:41Z pepton3 quit (Quit: WeeChat 1.4) 2016-06-08T22:05:02Z teurastaja quit (Remote host closed the connection) 2016-06-08T22:09:58Z clog quit (Ping timeout: 272 seconds) 2016-06-08T22:13:04Z edw joined #scheme 2016-06-08T22:14:54Z jlongster joined #scheme 2016-06-08T22:17:28Z edw quit (Ping timeout: 250 seconds) 2016-06-08T22:23:03Z acarrico quit (Ping timeout: 240 seconds) 2016-06-08T22:31:18Z n_blownapart joined #scheme 2016-06-08T22:34:37Z jcowan quit (Quit: Leaving) 2016-06-08T22:34:56Z ics quit (Quit: Connection closed for inactivity) 2016-06-08T22:48:48Z edw joined #scheme 2016-06-08T22:52:26Z mumptai quit (Quit: Verlassend) 2016-06-08T22:53:12Z edw quit (Ping timeout: 246 seconds) 2016-06-08T22:56:50Z badkins joined #scheme 2016-06-08T22:58:54Z edw joined #scheme 2016-06-08T23:01:04Z fugastrega joined #scheme 2016-06-08T23:03:12Z n_blownapart quit (Remote host closed the connection) 2016-06-08T23:03:38Z clog joined #scheme 2016-06-08T23:09:33Z edw` joined #scheme 2016-06-08T23:14:47Z edw` quit (Ping timeout: 260 seconds) 2016-06-08T23:30:29Z edw` joined #scheme 2016-06-08T23:30:45Z aries_liuxueyang quit (Ping timeout: 276 seconds) 2016-06-08T23:35:18Z edw` quit (Ping timeout: 276 seconds) 2016-06-08T23:38:21Z annodomini quit (Quit: annodomini) 2016-06-08T23:52:42Z _sjs quit (Ping timeout: 260 seconds) 2016-06-08T23:56:35Z sethalves quit (Remote host closed the connection)