make ⟨⟩≡∾⟨⟩ under PROPER_FILLS
This commit is contained in:
parent
03f2f29f3b
commit
183f64c1f9
@ -718,7 +718,8 @@ B join_c1(B t, B x) {
|
||||
ur xr = RNK(x);
|
||||
usz xia = IA(x);
|
||||
if (xia==0) {
|
||||
B xf = getFillE(x);
|
||||
B xf = getFillR(x);
|
||||
if (noFill(xf)) return x;
|
||||
if (isAtm(xf)) {
|
||||
decA(xf); decG(x);
|
||||
if (!PROPER_FILLS && xr==1) return emptyHVec();
|
||||
|
||||
@ -199,6 +199,7 @@ w←1‿1⥊1 ⋄ x←2⥊1 ⋄ w‿x <¨↩ ⋄ {! (∾⟨•Repr𝕩,": Expe
|
||||
∾3‿3⥊<1‿0‿3⥊0 %% 3‿0‿3⥊0
|
||||
∾3‿3⥊<0‿0⥊⟨⟩ %% 0‿0⥊⟨⟩
|
||||
⊑1↑⥊∾3‿3⥊<1‿0‿3⥊<"hi" %% " "
|
||||
∾⟨⟩ %% ⟨⟩
|
||||
|
||||
# 𝕨∾𝕩
|
||||
!"∾: Lengths not matchable (⟨6⟩ ≡ ≢𝕨, 1‿1 ≡ ≢𝕩)" % ("abc"∾"def")∾≍"a"
|
||||
|
||||
Loading…
Reference in New Issue
Block a user