ngn/k
19
63
Fork
You've already forked k
17

{x,y}/ vs ,/ #58

Open
opened 2023年05月22日 07:52:29 +02:00 by ngn · 2 comments
Owner
Copy link
 x:(`a`b!1 2;`b`c!3 4)
,/x
(`a`b!1 2
 `b`c!3 4)
{x,y}/x
`a`b`c!1 3 4

they should be the same (except for identity element)

``` x:(`a`b!1 2;`b`c!3 4) ,/x (`a`b!1 2 `b`c!3 4) {x,y}/x `a`b`c!1 3 4 ``` they should be the same (except for identity element)

figuring out it was indeed an issue rather than designed behaviour took considerable amount of time from me.

figuring out it was indeed an issue rather than designed behaviour took considerable amount of time from me.
Collaborator
Copy link

I think this should fix it:

-X1(raz,RA(U n=0;F(xn,n+=_N(xa))A y=xx;y=ytT&&!ytA?AN(0,an(n,ytE?tG:yt)):aA0(n);F(xn,y=Nx(cat10(y,xa)))x(y))Rm(raz(val(x)))R_(x))
+X1(raz,RA(U n=0;F(xn,n+=_N(xa))A y=xx;y=ytT&&!ytA?AN(0,an(n,ytE?tG:yt)):ytm?am(emp(tS),emp(tA)):aA0(n);F(xn,y=Nx(cat10(y,xa)))x(y))Rm(raz(val(x)))R_(x))
I think this should fix it: ``` -X1(raz,RA(U n=0;F(xn,n+=_N(xa))A y=xx;y=ytT&&!ytA?AN(0,an(n,ytE?tG:yt)):aA0(n);F(xn,y=Nx(cat10(y,xa)))x(y))Rm(raz(val(x)))R_(x)) +X1(raz,RA(U n=0;F(xn,n+=_N(xa))A y=xx;y=ytT&&!ytA?AN(0,an(n,ytE?tG:yt)):ytm?am(emp(tS),emp(tA)):aA0(n);F(xn,y=Nx(cat10(y,xa)))x(y))Rm(raz(val(x)))R_(x)) ```
growler referenced this issue from a commit 2024年11月25日 10:23:25 +01:00
Sign in to join this conversation.
No Branch/Tag specified
master
pages
No results found.
Labels
Clear labels
No items
No labels
Milestone
Clear milestone
No items
No milestone
Projects
Clear projects
No items
No project
Assignees
Clear assignees
No assignees
3 participants
Notifications
Due date
The due date is invalid or out of range. Please use the format "yyyy-mm-dd".

No due date set.

Dependencies

No dependencies set.

Reference
ngn/k#58
Reference in a new issue
ngn/k
No description provided.
Delete branch "%!s()"

Deleting a branch is permanent. Although the deleted branch may continue to exist for a short time before it actually gets removed, it CANNOT be undone in most cases. Continue?