freenode/#lisp - IRC Chatlog

5:12:00 Lord_of_Life_ ** NICK Lord_of_Life

5:26:18 beach Good morning everyone!

7:14:32 no-defun-allowed Random question, is it specified if #+FOO will intern FOO in the package KEYWORD?

7:16:40 Shinmera clhs 2.4.8.17

7:16:40 specbot Sharpsign Plus: http://www.lispworks.com/reference/HyperSpec/Body/02_dhq.htm

7:16:51 Shinmera "#+ operates by first reading the feature expression and then skipping over the form if the feature expression fails. While reading the test, the current package is the KEYWORD package. "

7:16:53 no-defun-allowed Thanks Shinmera

7:59:14 phoe morniiiing

8:01:06 no-defun-allowed Hello phoe

8:02:04 phoe hey setf-fdefinition-permitted

8:02:47 no-defun-allowed >:[

8:02:55 no-defun-allowed >:[

8:04:46 phoe okay, I'm sorry

8:12:31 ck_ no no I think those are function symbols

8:13:31 ck_ https://www.mindprod.com/jgloss/unmaintricks.html -> search for 'lisp

8:13:46 ck_ without the quote, sorry

8:14:25 no-defun-allowed O.o

8:22:20 easye Roedy Green, of Mind Products. A figure I haven't thought about for a while.

8:22:26 edgar-rft first (defun -_- nil 'zzZZ) now you can do (-_-) => zzZZ

8:29:36 ck_ edgar-rft: graphical programming is the future [tm]

8:35:52 jackdaniel (with-graphical-context () (-_-)) ; => graphical zzZZ

9:21:06 saturn2 ** NICK |endoftext|

9:22:48 |endoftext| ** NICK saturn2

9:53:16 xantoz_ ** NICK xantoz

9:58:59 phoe I have an EQUAL hash table with cons keys.

9:59:17 phoe What happens if I mutate the conses elsewhere? Is that behaviour defined?

9:59:55 beach I doubt it.

10:00:34 beach clhs 18.1.2

10:00:34 specbot Modifying Hash Table Keys: http://www.lispworks.com/reference/HyperSpec/Body/18_ab.htm

10:01:24 phoe oh, so it is!

10:01:27 phoe thanks, beach

10:01:32 beach Sure.

11:06:35 flip214 defined to be undefined

11:09:19 phoe good

11:09:29 phoe much better that is undefined to be undefined

12:36:49 norserob join #linux-wireless

12:38:29 phoe ACTION gives norserob a slash

12:39:29 norserob ACTION says oops...

12:46:00 flip214 there's a backslash coming

15:23:27 flip214 Is there some function that can convert a number to some indirectly specified type?

15:23:47 shka__ this sounds cryptic

15:23:59 flip214 I'd like an average to be of the same type as the input (integers, floats, ratios), but (coerce (/ sum count) (type-of (first input))) doesn't work

15:24:19 shka__ oh, it kinda should

15:24:35 flip214 sbcl says that this ratio can't be converted to (INTEGER 0 ...)

15:24:59 flip214 and doing typecase here feels _very_ unclean, in a dynamic programming language ;)

15:25:11 shka__ well, obviously

15:25:22 shka__ you can't convert ratio to integer

15:25:36 flip214 shka__: FLOOR could

15:25:37 shka__ you can round

15:25:53 shka__ yes, but floor does not convert

15:25:59 shka__ it does much more

15:26:02 flip214 I would like to avoid doing that "by hand" ...

15:26:13 flip214 ain't there some REALLY-COERCE function or so?

15:26:31 loke` flip214: What do you want such function to do?

15:26:42 shka__ what you are doing is not coercing though

15:27:20 flip214 well, it's not casting either, is it?

15:27:50 flip214 loke`: I'd like a lossy change from one number to the type of another

15:28:08 loke` flip214: Such as?

15:28:25 shka__ flip214: you will have to write your own function

15:28:39 flip214 loke`: converting a ratio to an integer

15:28:47 flip214 shka__: Yeah, I put a TYPECASE in now

15:29:11 loke` flip214: That would be TRUNCATE, no?

15:29:22 shka__ that would do

15:29:54 loke` I mean, when do you really need a coerce function where the type is variable?

15:30:03 shka__ there is no generic function for this because it wouldn't be usefull for general use

15:30:59 flip214 loke`: when the inputs are integer, I'd like the average to be an integer as well

15:31:49 loke` flip214: That sounds like a rather odd requirement.

15:32:05 loke` I'm sure you have a use case, but it's not really generic.

15:32:06 Bike but if they're ratios and the average is a ratio you want that ratio?

15:32:49 nirved the average of ratios can be integer

15:34:30 Bike that's why i said "and the average is a ratio", yeah

15:34:33 flip214 Bike: right

15:34:41 pjb flip214: use a hash-table, or a vector.

15:35:06 Bike i'm with loke in not understanding why you want this. you'll have to apply these rules yourself by checking the classes of the arguments.

15:35:49 Bike unlike the contagion rules in the language arithmetic these don't even associate, i don't think

15:36:12 pjb If you want to convert numbers to numbers, some rounding will be necessary. And even, how do you round #C(2 2) to integer? Is it 2? 3? 4? does this mean anything?

15:37:05 nirved flip214: maybe you'd like to take the median instead of mean

15:37:17 Bike well you could only get a complex average if one of the arguments was complex

15:37:27 Bike in which case presumably there would be no coercion to integer

15:37:29 loke` And even if you have solution in your specific case (such as for example just taking the realpart of a complex number), that's never a generic solution.

15:37:49 flip214 pjb: I'd like to print average and stddev in the same format as the input.. so that column values (1 2 3 4) don't require a 2.5 in the "average" row

15:38:02 Bike i mean, your average will be wrong, then

15:38:08 flip214 actual numbers are 7 digits or more, so rounding is insignificant

15:39:42 pjb (average '(#c(2 2) #c(0.5 4) -3)) #| --> #C(-0.16666667 2.0) |#

15:39:49 pjb What's wrong with ~A?

15:40:40 pjb The most typical number is not 0, it may be #c(1/2 4/3)…