Time for an 2014 update…
This commit is contained in:
parent
372c577f83
commit
09687c4926
2520 changed files with 34227 additions and 7318 deletions
|
|
@ -1,12 +1,12 @@
|
|||
multisplit=:4 :0
|
||||
'sep begin'=.|:t=. y /:~&.:(|."1)@;@(i.@#@[ ,.L:0"0 I.@E.L:0) x
|
||||
multisplit=: 4 :0
|
||||
'sep begin'=. |: t=. y /:~&.:(|."1)@;@(i.@#@[ ,.L:0"0 I.@E.L:0) x
|
||||
end=. begin + sep { #@>y
|
||||
last=.next=.0
|
||||
r=.2 0$0
|
||||
while.next<#begin do.
|
||||
r=.r,.(last}.x{.~next{begin);next{t
|
||||
last=.next{end
|
||||
next=.1 i.~(begin>next{begin)*.begin>:last
|
||||
last=. next=. 0
|
||||
r=. 2 0$0
|
||||
while. next<#begin do.
|
||||
r=. r,.(last}.x{.~next{begin);next{t
|
||||
last=. next{end
|
||||
next=. 1 i.~(begin>next{begin)*.begin>:last
|
||||
end.
|
||||
r=.r,.'';~last}.x
|
||||
r=. r,.'';~last}.x
|
||||
)
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
S=:'a!===b=!=c'
|
||||
S=: 'a!===b=!=c'
|
||||
S multisplit '==';'!=';'='
|
||||
┌───┬───┬───┬───┬─┐
|
||||
│a │ │b │ │c│
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue