✨ more tinyapl solutions

codereport · codereport · commit 93b98b735462 · 2025-01-22T12:48:19.000-05:00
diff --git a/README.md b/README.md
@@ -163,6 +163,7 @@ Note that even when using `rlwrap`, some of the limitations will remain (such as
 | :-------: | :---: | :---: | :---: | :---: | :---: | :---: | :---: | :---: | :---: | :---: |
 |    APL    |   💚   |   ⛔   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |
 |    Kap    |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |
+|  TinyAPL  |   💚   |   💚   |   💚   |   💚   |   💚   |
 |     J     |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |
 |    BQN    |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |
 |   Uiua    |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |   💚   |
diff --git a/comparisons/leetcode/P0485_MCO.md b/comparisons/leetcode/P0485_MCO.md
@@ -10,6 +10,7 @@ There are two general solutions covered here.
 | :-------: | :--------------------------------------------------------------------------: | :---------------------------------------------------------------------------: |
 |    APL    |                            `mco ← {0⌈⌈/(≢¨⊆⍨)⍵}`                             | [Link](https://github.com/codereport/LeetCode/blob/master/0015_Problem_1.apl) |
 |    Kap    |                                `Mco ⇐ ⌈/≢¨⊂⍨`                                |
+|  TinyAPL  |                  `Mco ← {⌈⍆≢¨⊆⍨⍵}` <br> `Mco ← ⌈⍆⍤(≢¨⍤⊆⍨)`                   |
 |     J     |      `mco =. [: >./ [: (#;._1) 0,]` <br> `mco =. {{ >./ (#;._1) 0,y }}`      | [Link](https://github.com/codereport/LeetCode/blob/master/0015_Problem_1.ijs) |
 |    BQN    |                           ``Mco ← ⌈´·+´¨(+`¬)⊸⊔ ``                           | [Link](https://github.com/codereport/LeetCode/blob/master/0015_Problem_1.bqn) |
 |   Uiua    |                                `Mco ← /↥⊜⧻.`                                 |                                                                               |
@@ -31,6 +32,7 @@ There are two general solutions covered here.
 | :-------: | :--------------------------------------------------------------: | :---------------------------------------------------------------------------: |
 |    APL    |                          scan is broken                          |                                                                               |
 |    Kap    |                         `mco ⇐ ⌈/⊢«×»+\`                         |                                                                               |
+|  TinyAPL  |                       `Mco ← ⦅⌈⍆⋄⊢«×»+⍆↟⦆`                       |
 |     J     |               `mco =. {{ >./(([*+)/\.)&.\|. y }}`                |                                                                               |
 |    BQN    |                       ``Mco ← ⌈´(⊢×+)` ``                        | [Link](https://github.com/codereport/LeetCode/blob/master/0015_Problem_1.bqn) |
 |   Uiua    |                         `Mco ← /↥\(×+,)`                         |                                                                               |
diff --git a/comparisons/leetcode/P1351_Count_Negatives.md b/comparisons/leetcode/P1351_Count_Negatives.md
@@ -8,6 +8,7 @@
 | :-------: | :-----------------------------------------------: | :-----------------------------------------------------------------------------------------------------------------: |
 |    APL    |                      `+/0>,`                      |                    [Link](https://github.com/codereport/LeetCode/blob/master/0176_Problem_1.apl)                    |
 |    Kap    |                      `+/,0>`                      |                                                                                                                     |
+|  TinyAPL  |                   `⦅+⍆⋄0⋄>⋄,⦆`                    |
 |     J     |                     `[:+/0>,`                     |                    [Link](https://github.com/codereport/LeetCode/blob/master/0176_Problem_1.ijs)                    |
 |    BQN    |                      `+´0>⥊`                      |                                                                                                                     |
 |   Uiua    |                      `/+<0♭`                      |
diff --git a/comparisons/leetcode/P1614_Max_Paren_Depth.md b/comparisons/leetcode/P1614_Max_Paren_Depth.md
@@ -9,6 +9,7 @@
 | :-------: | :--------------------------------------------: | :---------------------------------------------------------------------------: |
 |    APL    |         `maxDepth ← {⌈/+\-⌿'()'∘.=⍵}`          | [Link](https://github.com/codereport/LeetCode/blob/master/0210_Problem_1.apl) |
 |    Kap    |           `MaxDepth ⇐ ⌈/+\-⌿"()"=⌻`            |                                                                               |
+|  TinyAPL  |          `MaxDepth ←{⌈⍆+⍆↟-⍆"()"=⊞⍵}`          |
 |     J     |      `maxDepth =. {{ >./+/\-/'()'=/y }}`       |                                                                               |
 |    BQN    |         ``MaxDepth ← ⌈´·+`·-˝"()"=⌜⊢``         | [Link](https://github.com/codereport/LeetCode/blob/master/0210_Problem_1.bqn) |
 |     Q     | `maxDepth: { max sums (-) over "()" =/:\: x }` |  [Link](https://github.com/codereport/LeetCode/blob/master/0210_Problem_1.q)  |
diff --git a/comparisons/leetcode/P1672_Richest_Customer_Wealth.md b/comparisons/leetcode/P1672_Richest_Customer_Wealth.md
@@ -8,6 +8,7 @@
 | :-------: | :-----------------------------: | :-------------------------------------------------------------------------------------------------------------------------: |
 |    APL    |             `⌈/+/`              |                        [Link](https://github.com/codereport/LeetCode/blob/master/0217_Problem_1.apl)                        |
 |    Kap    |             `⌈/+/`              |                                                                                                                             |
+|  TinyAPL  |           `⦅⌈⍆⋄+⍆⍤1⦆`           |
 |     J     |          `[: >./ +/"1`          |                        [Link](https://github.com/codereport/LeetCode/blob/master/0217_Problem_1.ijs)                        |
 |    BQN    |            `⌈´+˝⎉1`             |                        [Link](https://github.com/codereport/LeetCode/blob/master/0217_Problem_1.bqn)                        |
 |   Uiua    |             `/↥≡/+`             |                                                                                                                             |
