uiua 0.19.0-dev.4

# First/Last Min/Max Index
⍤⤙≍ 0 ⊢⍏[1 2 2 1]
⍤⤙≍ 2 ⊢⇌⍏[1 2 2 1]
⍤⤙≍ 1 ⊢⍖[1 2 2 1]
⍤⤙≍ 3 ⊢⇌⍖[1 2 2 1]

⍤⤙≍ ⊢⊃⍏(⊢⍏) [1 2 2 1]
⍤⤙≍ ⊢⊃(⇌⍏|⊢⇌⍏) [1 2 2 1]
⍤⤙≍ ⊢⊃⍖(⊢⍖) [1 2 2 1]
⍤⤙≍ ⊢⊃(⇌⍖|⊢⇌⍖) [1 2 2 1]

⍤⤙≍ 5 ⬚5(⊢⍏) []
⍤⤙≍ 5 ⬚5(⊢⍖) []
⍤⤙≍ 5 ⬚5(⊣⍏) []
⍤⤙≍ 5 ⬚5(⊣⍖) []
⍤⤙≍ ⬚5(⊢⊃⍏(⊢⍏)) []
⍤⤙≍ ⬚5(⊢⊃(⇌⍏|⊢⇌⍏)) []
⍤⤙≍ ⬚5(⊢⊃⍖(⊢⍖)) []
⍤⤙≍ ⬚5(⊢⊃(⇌⍖|⊢⇌⍖)) []

⍤⤙≍ 2 ⊢⍆ [2 8 4 9 3]
⍤⤙≍ 9 ⊣⍆ [2 8 4 9 3]
⍤⤙≍ 1 ⊢⍆ [1 2 3 4 5]
⍤⤙≍ 5 ⊣⍆ [1 2 3 4 5]
⍤⤙≍ 1 ⊢⍆ [5 4 3 2 1]
⍤⤙≍ 5 ⊣⍆ [5 4 3 2 1]

# First where
⍤⤙≍ 2 ⊢⊚[0 0 1 0]
⍤⤙≍ ⊢⊃⊚(⊢⊚) [0 0 1 0]

⍤⤙≍ 2 ⬚2(⊢⊚) [0 0 0]
⍤⤙≍ ⬚2(⊢⊃⊚(⊢⊚)) [0 0 0]

# Rows uncouple
⍤⤙≍ ⟜(⊟°⊟) ↯2_2_2⇡8
⍤⤙≍ ⟜(≡⊟≡°⊟) ↯2_2_2⇡8
⍤⤙≍ ⟜(≡≡⊟≡≡°⊟) ↯2_2_2⇡8
⍤⤙≍ ⊃⍉(⊟≡°⊟) °△5_2
⍤⤙≍ [[0_1_2 6_7_8 12_13_14] [3_4_5 9_10_11 15_16_17]] ⊟≡°⊟ °△3_2_3

# Rows unjoin
⍤⤙≍ ⟜(⊂°⊂)↯3_3_3⇡27
⍤⤙≍ ⟜(≡⊂≡°⊂)↯3_3_3⇡27
⍤⤙≍ ⟜(≡≡⊂≡≡°⊂)↯3_3_3⇡27

# Rows flip extraction
⍤⤙≍ ⊃(≡⊂⊙0|≡˜⊂0) °△100_3
⍤⤙≍ ⊃(˜≡⊂0|≡˜⊂0) °△100_3

# Sort
⍤⤙≍ ⇌ ⟜(⊏⊸⍏) ↯3_3⇌⇡9
⍤⤙≍ ⇌ ⟜(⊏⊸⍖) ↯3_3⇌9
⍤⤙≍ ⇌↯3_3⇡9 ≡(⊏⊸⍏) ↯3_3⇌⇡9
⍤⤙≍ ≡⇌ ⟜≡(⊏⊸⍖) ↯3_3⇡9

# Stencil
⍤⤙≍ [3 5 7] ⧈+ [1 2 3 4]
⍤⤙≍ [1 1 1] ⧈- [1 2 3 4]
⍤⤙≍ [4 9 16] ⧈(×+1) [1 2 3 4]
⍤⤙≍ [6 9] ⧈/+ 3 [1 2 3 4]
⍤⤙≍ [6 9] ⧈(++) [1 2 3 4]
⍤⤙≍ [[1_3 7_9] [7_9 13_15]] ≡/+⧈∘ 2_2 ↯3_3⇡9
⍤⤙≍ [] ⧈+ []
⍤⤙≍ [] ⧈+ [1]
⍤⤙≍ °△1_0 ⧈+ °△2_0
⍤⤙≍ °△0_0 ⧈+ °△1_0
⍤⤙≍ °△0_0 ⧈+ °△0_0
⍤⤙≍ °△0_2 ⧈+ °△0_2
⍤⤙≍ °△0_1 ⧈+ °△0_1

# Rows and Stencil optimizations
⍤⤙≍ {"ab" "cde"} ≡(□/$"__") [{"a" "b"} {"cd" "e"}]
⍤⤙≍ ⊃≡/$"_ _"≡(/$"_ _"∘) [{"hi" "there"}]
⍤⤙≍ ⊃≡/$"_ _"≡(/$"_ _"∘) [{"hi"}]
⍤⤙≍ ⊃≡/(+¯)≡(/(+¯)∘) [[1 2]]
⍤⤙≍ ⊃≡/(+¯)≡(/(+¯)∘) [[1]]
⍤⤙≍ ⊃⧈=⧈(=∘) "abc"
⍤⤙≍ ⊃⧈≠⧈(≠∘) "abc"
⍤⤙≍ ⊃⧈⇌(≡⇌⧈∘) 5 ⇡20
⍤⤙≍ ⊃⧈⇌(≡⇌⧈∘) 3 °△5_5
⍤⤙≍ ⊃⧈⇌(≡≡⇌⧈∘) 3_3 °△5_5
⍤⤙≍ ⊃⧈≡⇌(≡≡⇌⧈∘) 3 °△5_5
⍤⤙≍ ⟜⍜≡⊢∘ °△4_4_4
⍤⤙≍ ⟜⍜≡≡⊢∘ °△4_4_4

# Matrix mul
⍤⤙≍ [17_23 39_53] ⊞(/+×) [1_2 3_4] [5_6 7_8]
⍤⤙≍ [[14 32 50] [32 77 122] [50 122 194]] ˙⊞(/+×) +1↯3_3⇡9
⍤⤙≍ [[17 23 29] [39 53 67]] ⊞(/+×) [1_2 3_4] [5_6 7_8 9_10]
⍤⤙≍ [[0]] ˙⊞(/+×)°△1_0

# Conjoin
F ← /◇⊂
⍤⤙≍ [1] F {1}
⍤⤙≍ [1 2] F {1 2}
⍤⤙≍ [] /◇⊂ {}
⍤⤙≍ [] /◇(⊂?) {}
⍤⤙≍ [] /◇(⊂∘) {}

# Conjoin inventory
⍤⤙≍ ⊃(/◇⊂∘⍚⊂|/◇⊂⍚⊂) ⊙¤ {1 2_3 4_5_6} [7 8 9]
⍤⤙≍ ⊃(/◇⊂∘⍚⊂|/◇⊂⍚⊂) {1 2_3 4_5_6} [7 8 9]
⍤⤙≍ ⊃(/◇⊂∘⍚+|/◇⊂⍚+) 1 2
⍤⤙≍ ⊃(/◇⊂∘⍚⋅1|/◇⊂⍚⋅1) []

# Group/partition stuff
⍤⤙≍ [1 3 4] ⊜⊢ [1 1 2 3 3 3] [1 2 3 4 5 6]
⍤⤙≍ [2 3 6] ⊜⊣ [1 1 2 3 3 3] [1 2 3 4 5 6]
⍤⤙≍ [2 1 1] ˙⊜⧻ [0 2 2 0 1 2]
⍤⤙≍ [] ⊜⊢ [] []
⍤⤙≍ [] ⊜⊣ [] []
⍤⤙≍ [] ⊜⧻ [] []

⍤⤙≍ [1 5 2] ⊕⊢ [0 2 2 0 1 2] [1 2 3 4 5 6]
⍤⤙≍ [4 5 6] ⊕⊣ [0 2 2 0 1 2] [1 2 3 4 5 6]
⍤⤙≍ [2 1 3] ˙⊕⧻ [0 2 2 0 1 2]
⍤⤙≍ [] ⊕⊢ [] []
⍤⤙≍ [] ⊕⊣ [] []
⍤⤙≍ [] ⊕⧻ [] []

# Tabled fork inlining
⍤⤙≍ [˙⊞⊃+- ⇡5] [˙⊞⊃(+|-) ⇡5]
⍤⤙≍ {˙⊞(∘⊃(+|++))⇡2} {˙⊞⊃(+|++)⇡2}

# Fork reductions
⍤⤙≍ [5 ¯3] [⊃5¯] 3
⍤⤙≍ [¯3 5] [⊃¯ 5] 3

⍤⤙≍ [0 0 0] ≡⋅0 ⇡3
⍤⤙≍ [0 0 0] ≡₀⋅0 ⇡3
⍤⤙≍ [0 0 0] ≡⋅0 ↯3_3 0
⍤⤙≍ [0_0 0_0 0_0] ≡₀⋅0 ↯3_2 0
⍤⤙≍ [0_0 0_0 0_0] ≡≡⋅0 ↯3_2 0

# Rows box
⍤⤙≍ [{0_1_2 3_4_5 6_7_8} {9_10_11 12_13_14 15_16_17}] ≡≡□ °△ 2_3_3

# Length where
⍤⤙≍ ⊃(⧻∘⊚|⧻⊚) [1 2 3]
⍤⤙≍ ⊃(⧻∘⊚|⧻⊚) [1 0 3]
⍤⤙≍ ⊃(⧻∘⊚|⧻⊚) [1 0 1 0 1 0 1]

# Count unique
⍤⤙≍ ⊃(⧻∘◴|⧻◴) °△ 1_0

# Depth deshape
⍤⤙≍ ⊃≡(♭∘)≡♭ °△2_2_3_3
⍤⤙≍ ⊃≡(♭₀∘)≡♭₀ °△2_2_3_3
⍤⤙≍ ⊃≡(♭₁∘)≡♭₁ °△2_2_3_3
⍤⤙≍ ⊃≡(♭₂∘)≡♭₂ °△2_2_3_3
⍤⤙≍ ⊃≡♭₂≡♭₋₁ °△2_2_3_3

# Depth reverse
⍤⤙≍ ⊃≡(≡⇌⇌∘)≡(≡⇌⇌) °△2_3_4

# Depth rotate
⍤⤙≍ ⊃≡(≡↻⊙∘)≡≡↻ ⇡3 ↯3_3_3⇡27
⍤⤙≍ ⊃≡(≡↻⊙∘)≡≡↻ ¯1_1 ↯2↯3 0_1_0
⍤⤙≍ [5 5 5] ≡↻ [1 2 3] 5
⍤⤙≍ ⊃≡≡≡(↻∘)≡≡≡↻ [[1_2_3 4_5_6] [7_8_9 10_11_12]] [1_2 3_4]
⍤⤙≍ ⊃≡≡(↻∘) ≡≡↻ [1] [2]

# Depth first/last
⍤⤙≍ ⊃≡(∘⊢∘)≡⊢ °△2_3_4
⍤⤙≍ ⊃≡≡(∘⊢∘)≡≡⊢ °△2_3_4
⍤⤙≍ ⊃≡(∘⊢∘)≡⊢ °△2_1_4
⍤⤙≍ ⊃≡≡(∘⊢∘)≡≡⊢ °△2_1_4

⍤⤙≍ ⊃≡(∘⊣∘)≡⊣ °△2_3_4
⍤⤙≍ ⊃≡≡(∘⊣∘)≡≡⊣ °△2_3_4
⍤⤙≍ ⊃≡(∘⊣∘)≡⊣ °△2_1_4
⍤⤙≍ ⊃≡≡(∘⊣∘)≡≡⊣ °△2_1_4

# By to dup coherence
⍤⤙≍ [5_4 ¯1_0] [⊸+°⊟] [6_4 ¯1_0]

# Split by
⍤⤙≍ ⊃(⊜(□∘)⊸≠|⊜□⊸≠) @  " Hey    there buddy  "
⍤⤙≍ ⊃(⊜(□∘)¬⊸⦷|⊜□¬⊸⦷) @  " Hey    there buddy  "
⍤⤙≍ ⊃(⊜(□∘)⊸≠|⊜□⊸≠) 5 ◿20 ⇡100
⍤⤙≍ ⊃(⊜(□∘)¬⊸⦷|⊜□¬⊸⦷) " - " " - Hey - there - buddy - "
⍤⤙≍ ⊃(⊜(□∘)¬⊸⦷|⊜□¬⊸⦷) +5⇡5 ◿20 ⇡100

# Table
⍤⤙≍ ⊃⊞(∘+)⊞+ [1 2 3 4] [5 6 7 8]
⍤⤙≍ ⊃⊞(∘+)⊞+ [1_2 3_4] [1_2 3_4]
⍤⤙≍ ⊃⊞(∘+)⊞+ 1_2 [3_4_5 6_7_8]
⍤⤙≍ ⊃⊞(∘+)⊞+ [1_2_3 4_5_6] 7_8

⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ [1 2 3 4] [5 6 7 8]
⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ [1_2 3_4] [1_2 3_4]
⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ 1_2 [3_4_5 6_7_8]
⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ [1_2_3 4_5_6] 7_8

⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ "abcd" "efgh"
⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ ["ab" "cd"] ["ab" "cd"]
⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ "ab" ["cde" "fgh"]
⍤⤙≍ ⊃⊞(∘⊟)⊞⊟ ["abc" "def"] "gh"

⍤⤙≍ ⊃⊞(⊂∘)⊞⊂ [{1 2} {3 4}] {5 6}

# Reduce table
⍤⤙≍ [1 1 1] /+˙⊞= [1 2 3]
Test‼ ← (
  ⍤⤙≍ /^0∘⊞^1 ⊃⊙∘(/^0⊞^1) [1 2 3] [1 2 3 4]
  ⍤⤙≍ /^0∘⊞^1 ⊃⊙∘(/^0⊞^1) [1 2 3] [1.1 2 3 4]
)
Test‼++ Test‼+- Test‼+× Test‼+÷ Test‼+= Test‼+≤ Test‼+> Test‼+↧ Test‼+↥ Test‼+ℂ Test‼+⊟ Test‼+⊂
Test‼×+ Test‼×- Test‼×× Test‼×÷ Test‼×= Test‼×≤ Test‼×> Test‼×↧ Test‼×↥ Test‼×ℂ Test‼×⊟ Test‼×⊂
Test‼↧+ Test‼↧- Test‼↧× Test‼↧÷ Test‼↧= Test‼↧≤ Test‼↧> Test‼↧↧ Test‼↧↥ Test‼↧ℂ Test‼↧⊟ Test‼↧⊂
Test‼↥+ Test‼↥- Test‼↥× Test‼↥÷ Test‼↥= Test‼↥≤ Test‼↥> Test‼↥↧ Test‼↥↥ Test‼↥ℂ Test‼↥⊟ Test‼↥⊂
Test‼(+¯)+
Test‼∠(+∿)
Test‼+(□+)

Test‼ ← (
  ⍤⤙≍ /^0∘⊞^1 ⊃⊙∘(/^0⊞^1) [1 2 3] [1_2 3_4]
  ⍤⤙≍ /^0∘⊞^1 ⊃⊙∘(/^0⊞^1) [1 2 3] [1.1 2 3 4]
)
Test‼++ Test‼+- Test‼+× Test‼+÷ Test‼+= Test‼+≠ Test‼+≤ Test‼+> Test‼+↧ Test‼+↥ Test‼+⊂
Test‼↧+ Test‼↧- Test‼↧× Test‼↧÷ Test‼↧= Test‼↧≠ Test‼↧≤ Test‼↧> Test‼↧↧ Test‼↧↥ Test‼↧⊂
Test‼(+¯)+
Test‼∠(+∿)
Test‼+(□+)
⍤⤙≍ {/+∘⊞=} [1 2 3] [2 4 3] {/+⊞=} [1 2 3] [2 4 3]
⍤⤙≍ {/+∘⊸˙⊞=} [1 2 3] {/+⊸˙⊞=} [1 2 3]

F ← ⬚10(/+⊞+)
⍤⤙≍ [15 17 19] F [1 2] [1 2 3]
⍤⤙≍ [10 10 10] F [] [1 2 3]
⍤⤙≍ [] F [1 2] []

F ← ⬚10(/+∘⊞(ׯ))
⍤⤙≍ [7 4 1] F [1 2] [1 2 3]
⍤⤙≍ [10 10 10] F [] [1 2 3]
⍤⤙≍ [] F [1 2] []

F ← ⬚10(/+◌1⊞(ׯ))
⍤⤙≍ [7 4 1] F [1 2] [1 2 3]
⍤⤙≍ [10 10 10] F [] [1 2 3]
⍤⤙≍ [] F [1 2] []

⍤⤙≍ ⊃(/↥∘⊞=|/↥⊞=) 3 ⇡5
⍤⤙≍ ⊃(/↥∘⊞=|/↥⊞=) ⇡5 3

⍤⤙≍ ⊃(⍉⍉⍉⍉|⍥⍉4) °△2_2_2_2_2_2

# Replacements
⍤⤙≍ [0 0 0] ≡⋅0 [1_2 3_4 5_6]
⍤⤙≍ [0_0 0_0 0_0] ≡₀⋅0 [1_2 3_4 5_6]
⍤⤙≍ 3 ⧻◴ ≡⋅⚂ [1_2 3_4 5_6]
⍤⤙≍ {3 3_2} {⊃(⧻◴)△} ≡₀⋅⚂ [1_2 3_4 5_6]

⍤⤙≍ ⊃{⊸≡⋅0}{≡⊸0} [1_2 3_4 5_6]
⍤⤙≍ ⊃{⊸≡₀⋅0}{≡₀⊸0} [1_2 3_4 5_6]
⍤⤙≍ {3 ∘} ⟜{⧻◴ ≡⊸⚂} [1_2 3_4 5_6]
⍤⤙≍ {3 3_2 ∘} ⟜{⊃(⧻◴)△ ≡₀⊸⚂} [1_2 3_4 5_6]

⍤⤙≍ ⊃{⟜≡⋅0}{≡⟜0} [1_2 3_4 5_6]
⍤⤙≍ ⊃{⟜≡₀⋅0}{≡₀⟜0} [1_2 3_4 5_6]
⍤⤙≍ {⊙3} ⟜{⊙(⧻◴) ≡⟜⚂} [1_2 3_4 5_6]
⍤⤙≍ {⊙(3 3_2)} ⟜{⊙⊃(⧻◴)△ ≡₀⟜⚂} [1_2 3_4 5_6]

# Member of Range
⍤⤙≍ ⊃(∊∘⇡|∊⇡) 3 [0 2 3 π ∞ ¯∞ NaN e ¯π]
⍤⤙≍ ⊃(∊∘⇡|∊⇡) 100000 [7_8 10.5_π]
⍤⤙≍ ⊃(∊∘⇡|∊⇡) 100600 [0_100599 100601_100600]
⍤⤙≍ ⊃(∊∘⇡|∊⇡) ¯100 [0 2 3 π ∞ ¯∞ NaN e ¯π]
⍤⤙≍ ⊃(∊∘⇡|∊⇡) 0 [0 2 3 π ∞ ¯∞ NaN e ¯π]
⍤⤙≍ ⊃(∊∘♭₂⇡|∊♭₂⇡) [5 ¯5] [[2_¯1 3_0 0_¯5][0_0 5_¯5 ¯2_1]]
⍤⤙≍ ⊃(∊∘♭₂⇡|∊♭₂⇡) [5 ¯5 10] [[2_¯1 3_0 0_¯5][0_0 5_¯5 ¯2_1]]
⍤⤙≍ ⊃(∊∘♭₂⇡|∊♭₂⇡) [5 ¯5] [[2_¯π 3_∞ 0_¯5][NaN_0 5_¯5 ¯2_1]]
⍤⤙≍ ⊃(∊∘♭₂⇡|∊♭₂⇡) 3 °△2_3
⍤⤙≍ ⊃(∊∘♭₂⇡|∊♭₂⇡) 3_6 5
⍤⤙≍ ⊃(∊∘♭₂⇡|∊♭₂⇡) 5_5 ¤5

# Random Row
⍤⤙≍ ⊃(⊢°⍆|⊢∘°⍆) °△1_4_5_6
⍤⤙≍ ∩△ ⊃(⊢°⍆|⊢∘°⍆) °△3_4_5_6
⍤⤙≍ ⊃(⊣°⍆|⊣∘°⍆) °△1_4_5_6
⍤⤙≍ ∩△ ⊃(⊣°⍆|⊣∘°⍆) °△3_4_5_6

# All same
⍤⤙≍ [≍∘⊸↻1] ⟜(◴[⊃(≤1⧻◴|≍⊸↻1|≍⊸(↻1))]) [1 1 1]
⍤⤙≍ [≍∘⊸↻1] ⟜(◴[⊃(≤1⧻◴|≍⊸↻1|≍⊸(↻1))]) [1 2 3]
⍤⤙≍ [≍∘⊸↻1] ⟜(◴[⊃(≤1⧻◴|≍⊸↻1|≍⊸(↻1))]) [1_2 1_2]
⍤⤙≍ [≍∘⊸↻1] ⟜(◴[⊃(≤1⧻◴|≍⊸↻1|≍⊸(↻1))]) [1_2 3_4]
⍤⤙≍ [≍∘⊸↻1] ⟜(◴[⊃(≤1⧻◴|≍⊸↻1|≍⊸(↻1))]) []
⍤⤙≍ ⊃(/×∘⧈≍|/×⧈≍) [1 2 3]
⍤⤙≍ ⊃(/×∘⧈≍|/×⧈≍) [1_2 3_4 5_6]
⍤⤙≍ ⊃(/×∘⧈≍|/×⧈≍) [1 1]
⍤⤙≍ ⊃(/×∘⧈≍|/×⧈≍) [1 0]
⍤⤙≍ ⊃(/×∘⧈≍|/×⧈≍) [1]
⍤⤙≍ ⊃(/×∘⧈≍|/×⧈≍) []

# One unique
⍤⤙≍ 1 =1⧻◴ [4 4 4 4 4 4]
⍤⤙≍ 0 =1⧻◴ [4 4 4 5 4 4]
⍤⤙≍ 0 ≠1⧻◴ [4 4 4 4 4 4]
⍤⤙≍ 1 ≠1⧻◴ [4 4 4 5 4 4]

# Tuples
⍤⤙≍ ⊃⧅≠⧅(∘≠) 3 ⇡4
⍤⤙≍ ⊃⧅≠⧅(∘≠) 4 ⇡4
⍤⤙≍ ⊃⧅<⧅(∘<) 3 ⇡4
⍤⤙≍ ⊃⧅≤⧅(∘≤) 3 ⇡4
⍤⤙≍ ⊃⧅>⧅(∘>) 3 ⇡4
⍤⤙≍ ⊃⧅≥⧅(∘≥) 3 ⇡4
⍤⤙≍ ⊃⧅≠⧅(∘≠) 3 ⇡5
⍤⤙≍ ⊃⧅<⧅(∘<) 3 ⇡5
⍤⤙≍ ⊃⧅≤⧅(∘≤) 3 ⇡5
⍤⤙≍ ⊃⧅>⧅(∘>) 3 ⇡5
⍤⤙≍ ⊃⧅≥⧅(∘≥) 3 ⇡5
⍤⤙≍ ⊃⧅≠⧅(∘≠) 5 ⇡5
⍤⤙≍ ⊃⧅<⧅(∘<) 5 ⇡5
⍤⤙≍ ⊃⧅≤⧅(∘≤) 5 ⇡5
⍤⤙≍ ⊃⧅>⧅(∘>) 5 ⇡5
⍤⤙≍ ⊃⧅≥⧅(∘≥) 5 ⇡5
⍤⤙≍ ⊃⧅≠⧅(∘≠) 3 4
⍤⤙≍ ⊃⧅≠⧅(∘≠) 4 4
⍤⤙≍ ⊃⧅<⧅(∘<) 3 4
⍤⤙≍ ⊃⧅≤⧅(∘≤) 3 4
⍤⤙≍ ⊃⧅>⧅(∘>) 3 4
⍤⤙≍ ⊃⧅≥⧅(∘≥) 3 4
⍤⤙≍ ⊃⧅<⧅(∘<) 7 4
⍤⤙≍ ⊃⧅≤⧅(∘≤) 7 4
⍤⤙≍ ⊃⧅>⧅(∘>) 7 4
⍤⤙≍ ⊃⧅≥⧅(∘≥) 7 4
⍤⤙≍ ⊃⧅≠⧅(∘≠) 3 5
⍤⤙≍ ⊃⧅<⧅(∘<) 3 5
⍤⤙≍ ⊃⧅<⧅(∘<) 6 12
⍤⤙≍ ⊃⧅≤⧅(∘≤) 3 5
⍤⤙≍ ⊃⧅>⧅(∘>) 3 5
⍤⤙≍ ⊃⧅≥⧅(∘≥) 3 5
⍤⤙≍ ⊃⧅≠⧅(∘≠) 4 ⇡3
⍤⤙≍ ⊃⧅<⧅(∘<) 4 ⇡3
⍤⤙≍ ⊃⧅>⧅(∘>) 4 ⇡3
⍤⤙≍ ⊃⧅≤⧅(∘≤) 4 ⇡3
⍤⤙≍ ⊃⧅≥⧅(∘≥) 4 ⇡3
⍤⤙≍ ⊃⧅≠⧅(∘≠) ¯1 ⇡4
⍤⤙≍ ⊃⧅<⧅(∘<) ¯1 ⇡4
⍤⤙≍ ⊃(⧅≠3|⧅≠¯2) 5
⍤⤙≍ 42 ⧅= ∞ 42
⍤⤙≍ [0 3] △ ⧅≤ 3 °△[0]
⍤⤙≍ [1 3] △ ⧅≤ 3 °△[1]
⍤⤙≍ [4 3] △ ⧅≤ 3 °△[2]
⍤⤙≍ [0 3 2] △ ⧅≤ 3 °△[0 2]
⍤⤙≍ [1 3 2] △ ⧅≤ 3 °△[1 2]
⍤⤙≍ [4 3 2] △ ⧅≤ 3 °△[2 2]
⍤⤙≍ [0 3] △ ⧅(≤∘) 3 °△[0]
⍤⤙≍ [1 3] △ ⧅(≤∘) 3 °△[1]
⍤⤙≍ [4 3] △ ⧅(≤∘) 3 °△[2]
⍤⤙≍ [0 3 2] △ ⧅(≤∘) 3 °△[0 2]
⍤⤙≍ [1 3 2] △ ⧅(≤∘) 3 °△[1 2]
⍤⤙≍ [4 3 2] △ ⧅(≤∘) 3 °△[2 2]
⍤⤙≍ ⊃⧅(∘1◌◌)⧅⋅⋅1 4 3
⍤⤙≍ ⊃⧅(∘1◌◌)⧅⋅⋅1 4 ⇡3
⍤⤙≍ ⊃⧅(∘1◌◌)⧅⋅⋅1 4 [1_2 3_4]
⍤⤙≍ ⊃⧅(∘2◌◌)⧅⋅⋅2 2 3
⍤⤙≍ ⊃⧅(∘2◌◌)⧅⋅⋅2 2 ⇡3
⍤⤙≍ ⊃⧅(∘2◌◌)⧅⋅⋅2 2 [1_2 3_4]
⍤⤙≍ [0 3] △ ⧅⋅⋅1 3 []
⍤⤙≍ [0 3 5] △ ⧅⋅⋅1 3 °△0_5

⍤⤙≍ ℂ5 0 ¯₄ 5
⍤⤙≍ ℂ¯π 0 °¯₄ π
⍤⤙≍ ℂ0 5 ⁅₁₀ ⍥₃¯₃ 5
⍤⤙≍ ℂ0 5 ⁅₁₀ ⍥₃¯₋₃ 5
⍤⤙≍ ℂ0 5 ⁅₁₀ ⍥₇¯₇ 5

# Abslute value Complex
⍤⤙≍ ⊃(⌵∘ℂ|⌵ℂ) π 2
⍤⤙≍ ⊃(⌵∘ℂ|⌵ℂ) 1 1
⍤⤙≍ ⊃(⌵∘ℂ|⌵ℂ) ℂ1 2 ℂ3 4
⍤⤙≍ ⊃(⌵∘ℂ|⌵ℂ) 2 ℂ3 4
⍤⤙≍ ⊃(⌵∘ℂ|⌵ℂ) ℂ2 3 π

# Squared Abs

⍤⤙≍ ∩⁅₁₄ ⊃(˙×∘⌵|˙×⌵) ℂπ 2
⍤⤙≍ ∩⁅₁₄ ⊃(°√∘⌵|°√⌵) ℂ¯1 3
⍤⤙≍ ∩⁅₁₄ ⊃(˙×∘⌵|˙×⌵) ℂ5 ¯3
⍤⤙≍ ⊃(˙×∘⌵|˙×⌵) ¯3

# Reduce min/max sorted
⍤⤙≍ 0 /↧ ⇡5
⍤⤙≍ 0 /↧ ⇌⇡5
⍤⤙≍ 4 /↥ ⇡5
⍤⤙≍ 4 /↥ ⇌⇡5
⍤⤙≍ 5 ⬚5/↧ [10]
⍤⤙≍ 5 ⬚5/↧ []
⍤⤙≍ 5 ⬚5/↥ [0]
⍤⤙≍ 5 ⬚5/↥ []

# Sorted flag
⍤⤙≍ [0_3 1_2] ⍆≡⍆ [1_2 3_0]
⍤⤙≍ [1 1 0] ⧈≠ [1 2 3 3]
◌≡(⍆∘) ≡⊏⊙¤ ⊸(≡⍏ gen⊙0 ⊟100⧻) °△21_2
⍤⤙≍ 1 /↥ [NaN 1]
⍤⤙≍0 ˜⨂1 ⍆[1 1 1 1 1 1 1 1]
⍤⤙≍ °△1_0 ◴ °△ 1_0
⍤⤙≍ °△1_0 ◴ ↯ 1_0 [0]
⍤⤙≍ 2_3 ⍆⊢⍆ [5_4 3_2]
⍤⤙≍ 0 /↧ ⊢⍆ [3_2 1_0]

# Rows extraction
⍤⤙≍ ⊃⬚0≡◇(∘=@i)⬚0≡◇(=@i) {"uiua" "is"}