how to use modifier to create multiple functions?

[goyalyashpal]

description

• i was trying to create ⊂@0 ⊂@1 using ∩,
• so, smth like ∩(⊂) @0 @1 to get ⊂@0 ⊂@1 to be then used with other modifiers like bracket, fork, etc

is this possible?

minimum working example

⊞= ⊓'⊂@0'⊂@1 "abac" "cbaa"

titles (or alternate ways to say this)

• how to use modifier to create multiple (partially applied) functions?
• how to terminate a dyadic function at first argument?
• how to curry functions?

legend

⊂join, ↻rotate, ∩both, ⊓bracket, ⊙dip

[kaikalii]

In the ⊞= ⊓'⊂@0'⊂@1 "abac" "cbaa" example, you could do a ⊙∶ to get the values in the right order and a ∩⊂ to join them. For cases with more arguments, you'd need a ⊃ with planet notation.

[goyalyashpal]

a ⊙∶ to get the values in the right order and a ∩⊂ to join them

[∶] ∩⊂ ⊙∶ @0 @1 "ab" "bc"
≅ ["1bc" "0ab"] # 1

:+1:

[goyalyashpal]

~self hiding as offtopic~

---

things i got stuck at:

• [x] 1. getting an arbitrary stack inside an array. like above [:] is done for only top 2 elements. use case eg: assert match.
• [x] 2. extension of this issue: getting a combo, so getting "1bc" "1ab" "0bc" "0ab" from "01" "ab" "bc" in no particular order
• [x] tried for above via bothboth; ~stuck~
• [ ] tried via tablejoin, or tab[: :] stuck. next guess: tabjoin with level tab[: :] "01" "ab" "bc" tabjoin "01" "ab" "bc"
• [x] 3. extension of above: applying rot on each cell of the combo; or say, combo of rot1 rot2 and 1_2_3 4_5_6 \ Like: ⊞↻ [1 2] [1_2_3 4_5_6]. Use case example: cross product
• [ ] 4. getting secondary diagonal elements of 2×2 array i.e. [0_1 1_0] from an array shaped [3 3 2 2] which is obtained from window 2_2 on a 2d array. use case: thinking for LCS algorithm: win2_2 tab= bothjoin dipflip @0 @1 "aba" "baa"\n⍚2'⊡0_1
• [ ] 5. i, j custom iteration on a 2d array. Use Case: LCS

---

1. Getting arbitrary stack on array:

# All of these work same for unloading a 4 member stack onto an array
# Rest can be figured out the same way
Mov ← [∩(∶∶)]
Mov ← [∩(⊙∘)]
Mov ← [⊙⊙⊙∘]

2. Getting a join combo

# Get a `join` combo
∩∩(|1 ⊂∶/⊔) ⍥(⍚2(|1 /⊔))2 ⊞⊂ "01" {"ab" "bc"}
⍤ ∶≅, ["1bc" "0bc" "1ab" "0ab"] [∩(∶∶)]

2. Getting a rot combo

# Get a `rot` combo
∩∩(|1 ↻∶/⊔) ⍥(⍚2(|1 /⊔))2 ⊞⊂ [1 2] {"abc" "fgh"}
⍤ ∶≅, ["hfg" "ghf" "cab" "bca"] [∩(∶∶)]

3. Converting an array of arrays into array of boxes (to be used by above "combo" functions

[∶]/□⊔ [1_2_3 4_5_6]
⍤ ∶≅, {1_2_3 4_5_6}

[kaikalii]

Sorry, what are you asking?