diff --git a/README.md b/README.md index 05e4aaf..aaa208e 100644 --- a/README.md +++ b/README.md @@ -28,27 +28,28 @@ There are several sites that do these kinds of comparisons: ### Language / Library Websites -| | Language | :heavy_dollar_sign: | Main Website | Help / Docs | Online REPL | -| :---: | :--------: | :-----------------: | :----------------------------------------------------------------------------------: | :-------------------------------------------------------------------------: | :------------------------------------------------------------------: | -| πŸ’š | Dyalog APL | | [dyalog.com](https://www.dyalog.com/) | [Dyalog Help](https://help.dyalog.com/18.2/) | [TryAPL](https://tryapl.org/) | -| πŸ’› | Kap | | [kapdemo.dhsdevelopments.com](https://kapdemo.dhsdevelopments.com/) | [Kap Ref](https://kapdemo.dhsdevelopments.com/reference.html) | [Kap Interpreter](https://kapdemo.dhsdevelopments.com/clientweb2/) | -| πŸ’š | J | | [jsoftware.com](https://www.jsoftware.com/) | [J NuVoc](https://code.jsoftware.com/wiki/NuVoc) | [J Playground](https://jsoftware.github.io/j-playground/bin/html2/#) | -| πŸ’š | BQN | | [mlochbaum.github.io/BQN](https://mlochbaum.github.io/BQN/) | [BQN Docs](https://mlochbaum.github.io/BQN/doc/index.html) | [BQNPAD](https://bqnpad.mechanize.systems/) | -| πŸ’š | Uiua | | [uiua.org](https://www.uiua.org/) | [Uiua Docs](https://www.uiua.org/docs) | [UiuaPAD](https://www.uiua.org/pad) | -| πŸ’š | Q | :heavy_dollar_sign: | [code.kx.com/q](https://code.kx.com/q/) | [Q Ref](https://code.kx.com/q4m3/A_Built-in_Functions/) | β›” | -| πŸ’™ | Julia | | [julialang.org](https://julialang.org/) | [Julia Docs](https://docs.julialang.org/en/v1/) | [Replit](https://julialang.org/learning/tryjulia/) | -| πŸ’™ | MATLAB | :heavy_dollar_sign: | [mathworks.com/products/matlab.html](https://www.mathworks.com/products/matlab.html) | [MATLAB Help](https://www.mathworks.com/help/matlab/) | :heavy_dollar_sign: | -| πŸ’™ | NumPy* | | [numpy.org](https://numpy.org/) | [NumPy Docs](https://numpy.org/doc/stable/) | [Replit](https://replit.com/languages/python3) | -| πŸ’™ | R | | [r-project.org](https://www.r-project.org/) | [R Docs](https://www.rdocumentation.org/) | [JDoodle](https://www.jdoodle.com/execute-r-online/) | -| πŸ’œ | Nial | | [nial-array-language.org](https://www.nial-array-language.org/) | [Nial Dictionary](https://www.nial-array-language.org/ndocs/NialDict2.html) | [TIO](https://tio.run/#Nial) | -| πŸ’œ | Futhark | | [futhark-lang.org](https://futhark-lang.org/) | [Futhark Docs](https://futhark-lang.org/docs.html) | β›” | -| πŸ’œ | Dex | | [github.com/google-research/dex-lang](https://github.com/google-research/dex-lang) | [InDex](https://google-research.github.io/dex-lang/index.html) | β›” | -| πŸ’œ | Ivy | | [pkg.go.dev/robpike.io/ivy](https://pkg.go.dev/robpike.io/ivy) | [Ivy Docs](https://pkg.go.dev/robpike.io/ivy#section-documentation) | β›” | -| πŸ’œπŸ’— | SaC | | [sac-home.org](https://www.sac-home.org/) | [SaC Docs](https://www.sac-home.org/docs:main) | β›” | -| πŸ’— | ArrayFire* | | [arrayfire.com](https://arrayfire.com/) | [ArrayFire Docs](https://arrayfire.org/docs/) | β›” | -| πŸ’— | MatX* | | [nvidia.github.io/MatX](https://nvidia.github.io/MatX/index.html) | [MatX API Ref](nvidia.github.io/MatX) | β›” | -| πŸ’— | ATen* | | - | [ATen Docs](https://pytorch.org/cppdocs/#aten) | β›” | -| πŸ’— | Eigen* | | [eigen.tuxfamily.org](https://eigen.tuxfamily.org/) | [Eigen Dox](https://eigen.tuxfamily.org/dox/) | [Godbolt](https://godbolt.org/) | +| | Language | πŸ’² | Main Website | Help / Docs | Online REPL | +| :---: | :--------: | :---: | :----------------------------------------------------------------------------------: | :-------------------------------------------------------------------------: | :------------------------------------------------------------------: | +| πŸ’š | Dyalog APL | | [dyalog.com](https://www.dyalog.com/) | [Dyalog Help](https://help.dyalog.com/18.2/) | [TryAPL](https://tryapl.org/) | +| πŸ’› | Kap | | [kapdemo.dhsdevelopments.com](https://kapdemo.dhsdevelopments.com/) | [Kap Ref](https://kapdemo.dhsdevelopments.com/reference.html) | [Kap Interpreter](https://kapdemo.dhsdevelopments.com/clientweb2/) | +| πŸ’› | TinyAPL | | [tinyapl.rubenverg.com](https://tinyapl.rubenverg.com/) | [TinAPL Primitives](https://tinyapl.rubenverg.com/docs/primitive) | [Online REPL](https://tinyapl.rubenverg.com/run/latest/) | +| πŸ’š | J | | [jsoftware.com](https://www.jsoftware.com/) | [J NuVoc](https://code.jsoftware.com/wiki/NuVoc) | [J Playground](https://jsoftware.github.io/j-playground/bin/html2/#) | +| πŸ’š | BQN | | [mlochbaum.github.io/BQN](https://mlochbaum.github.io/BQN/) | [BQN Docs](https://mlochbaum.github.io/BQN/doc/index.html) | [BQNPAD](https://bqnpad.mechanize.systems/) | +| πŸ’š | Uiua | | [uiua.org](https://www.uiua.org/) | [Uiua Docs](https://www.uiua.org/docs) | [UiuaPAD](https://www.uiua.org/pad) | +| πŸ’š | Q | πŸ’² | [code.kx.com/q](https://code.kx.com/q/) | [Q Ref](https://code.kx.com/q4m3/A_Built-in_Functions/) | β›” | +| πŸ’™ | Julia | | [julialang.org](https://julialang.org/) | [Julia Docs](https://docs.julialang.org/en/v1/) | [Replit](https://julialang.org/learning/tryjulia/) | +| πŸ’™ | MATLAB | πŸ’² | [mathworks.com/products/matlab.html](https://www.mathworks.com/products/matlab.html) | [MATLAB Help](https://www.mathworks.com/help/matlab/) | πŸ’² | +| πŸ’™ | NumPy* | | [numpy.org](https://numpy.org/) | [NumPy Docs](https://numpy.org/doc/stable/) | [Replit](https://replit.com/languages/python3) | +| πŸ’™ | R | | [r-project.org](https://www.r-project.org/) | [R Docs](https://www.rdocumentation.org/) | [JDoodle](https://www.jdoodle.com/execute-r-online/) | +| πŸ’œ | Nial | | [nial-array-language.org](https://www.nial-array-language.org/) | [Nial Dictionary](https://www.nial-array-language.org/ndocs/NialDict2.html) | [TIO](https://tio.run/#Nial) | +| πŸ’œ | Futhark | | [futhark-lang.org](https://futhark-lang.org/) | [Futhark Docs](https://futhark-lang.org/docs.html) | β›” | +| πŸ’œ | Dex | | [github.com/google-research/dex-lang](https://github.com/google-research/dex-lang) | [InDex](https://google-research.github.io/dex-lang/index.html) | β›” | +| πŸ’œ | Ivy | | [pkg.go.dev/robpike.io/ivy](https://pkg.go.dev/robpike.io/ivy) | [Ivy Docs](https://pkg.go.dev/robpike.io/ivy#section-documentation) | β›” | +| πŸ’œπŸ’— | SaC | | [sac-home.org](https://www.sac-home.org/) | [SaC Docs](https://www.sac-home.org/docs:main) | β›” | +| πŸ’— | ArrayFire* | | [arrayfire.com](https://arrayfire.com/) | [ArrayFire Docs](https://arrayfire.org/docs/) | β›” | +| πŸ’— | MatX* | | [nvidia.github.io/MatX](https://nvidia.github.io/MatX/index.html) | [MatX API Ref](nvidia.github.io/MatX) | β›” | +| πŸ’— | ATen* | | - | [ATen Docs](https://pytorch.org/cppdocs/#aten) | β›” | +| πŸ’— | Eigen* | | [eigen.tuxfamily.org](https://eigen.tuxfamily.org/) | [Eigen Dox](https://eigen.tuxfamily.org/dox/) | [Godbolt](https://godbolt.org/) | \* Library, not an actual language * πŸ’š Main (APL-Family) Array Languages @@ -75,6 +76,7 @@ There are several sites that do these kinds of comparisons: | :-------: | :---: | :-------------: | :-------: | :---: | :----: | | APL | πŸ’š | 1 (or `βŽ•IO`) | `LA`/`TA` | `RL` | Row | | Kap | πŸ’š | 0 | `LA`/`TA` | `RL` | Row | +| TinyAPL | πŸ’š | 0 | `LA` | `RL` | Row | | J | πŸ’š | 0 | `LA` | `RL` | Row | | BQN | πŸ’š | 0 | `LA` | `RL` | Row | | Uiua | πŸ’š | 0 | `LA` | `RL` | Row | @@ -100,6 +102,7 @@ There are several sites that do these kinds of comparisons: | :-------: | :------------: | :----------: | :---------------: | :------------------: | | APL | `β‰’` | `⍴` | `⍴⍴` | `Γ—/⍴` | | Kap | `β‰’` | `⍴` | `⍴⍴` | `Γ—/⍴` | +| TinyAPL | `β‰’` | `⍴` | `ΟΌ` | `×⍆⍴` | | J | `#` | `$` | `$$` | `*/@$` | | BQN | `β‰ ` | `β‰’` | `β‰’β‰’` | `Γ—Β΄β‰’` | | Uiua | `β§»` | `β–³` | `β§»β–³` | `β§»β™­` | @@ -160,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/P0064_Max_Gap.md b/comparisons/leetcode/P0064_Max_Gap.md index 23ee124..f7328b3 100644 --- a/comparisons/leetcode/P0064_Max_Gap.md +++ b/comparisons/leetcode/P0064_Max_Gap.md @@ -5,7 +5,8 @@ | | Solution | Link | | :-------: | :-----------------------------------: | :---: | | APL | `MaxGap ← {⌈/2-/(βŠ‚β€β’βŒ·βŠ’)⍡}` | | -| Kap | `MaxGap ⇐ ⌈/2-⍨/(βŠ‚β‹)β›βŒ·` | | +| Kap | `MaxGap ⇐ ⌈/2-/∨` | | +| TinyAPL | `MaxGap ← {βŒˆβ†2-β†β†‘βŠ΅β΅}` | | J | `MaxGap =. {{ >./ 2-/\ \:~ y }}` | | | BQN | `MaxGap ← {⌈´-´˘2β†•βˆ¨π•©}` | | | Uiua | `MaxGap ← /β†₯≑/-β—«2⊏⍏.` | | diff --git a/comparisons/leetcode/P0485_MCO.md b/comparisons/leetcode/P0485_MCO.md index bce0f67..3c968dd 100644 --- 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 ← {βŒˆβ†β‰’Β¨βŠ†β¨β΅}`
`Mco ← βŒˆβ†β€(β‰’Β¨β€βŠ†β¨)` | | J | `mco =. [: >./ [: (#;._1) 0,]`
`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/P0674_LCIS.md b/comparisons/leetcode/P0674_LCIS.md index 549517b..eb2b827 100644 --- a/comparisons/leetcode/P0674_LCIS.md +++ b/comparisons/leetcode/P0674_LCIS.md @@ -6,6 +6,7 @@ | :-------: | :----------------------------------------------------: | :---------------------------------------------------------------------------: | | APL | `lcis ← ⌈/β‰’Β¨((1,2β‰₯/⊒)βŠ‚βŠ’)`
`lcis ← {1⌈1+⌈/β‰’Β¨βŠ†β¨2./ (#;._1) 0,2β—«2` | | diff --git a/comparisons/leetcode/P1351_Count_Negatives.md b/comparisons/leetcode/P1351_Count_Negatives.md index d9940a8..3d2a871 100644 --- 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 index 5c0713a..b2d314c 100644 --- 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 index 0657bc2..503fecc 100644 --- a/comparisons/leetcode/P1672_Richest_Customer_Wealth.md +++ b/comparisons/leetcode/P1672_Richest_Customer_Wealth.md @@ -8,8 +8,9 @@ | :-------: | :-----------------------------: | :-------------------------------------------------------------------------------------------------------------------------: | | APL | `⌈/+/` | [Link](https://github.com/codereport/LeetCode/blob/master/0217_Problem_1.apl) | | Kap | `⌈/+/` | | +| TinyAPL | `β¦…βŒˆβ†β‹„+⍆◑⦆` | | 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) | +| BQN | `⌈´+˝˘` | [Link](https://github.com/codereport/LeetCode/blob/master/0217_Problem_1.bqn) | | Uiua | `/β†₯≑/+` | | | Q | `max sum each x` | | | Julia | `sum(x, dims=2) \|> maximum` | [Link](https://github.com/codereport/LeetCode/blob/master/0217_Problem_1.jl) | diff --git a/comparisons/leetcode/P1822_Sign_Product_Array.md b/comparisons/leetcode/P1822_Sign_Product_Array.md index 6d06f1b..c0085ac 100644 --- a/comparisons/leetcode/P1822_Sign_Product_Array.md +++ b/comparisons/leetcode/P1822_Sign_Product_Array.md @@ -8,6 +8,7 @@ | :-------: | :-------------------------------------------: | :--------------------------------------------------------------------------------------------------------------: | | APL | `Γ—/Γ—` | [Link](https://github.com/codereport/LeetCode/blob/master/0236_Problem_1.apl) | | Kap | `Γ—/Γ—` | | +| TinyAPL | `×⍆⍀×` | | J | `*/*` | | | BQN | `×´×` | | | Uiua | `/Γ—Β±` | | diff --git a/comparisons/leetcode/P2319_Check_Matrix.md b/comparisons/leetcode/P2319_Check_Matrix.md index 7dd37bd..1a32282 100644 --- a/comparisons/leetcode/P2319_Check_Matrix.md +++ b/comparisons/leetcode/P2319_Check_Matrix.md @@ -8,6 +8,7 @@ | :-------: | :---------------------------------------------------------------------------: | :-----------------------------------------------------------------------------------------------------------------: | | APL | `checkMatrix ← {(1⌊⍡)≑(βŠ–βŒˆβŠ’)∘.=⍨⍳≒⍡}` | [Link](https://github.com/codereport/LeetCode/blob/master/0299_Problem_1.apl) | | Kap | `CheckMatrix ⇐ {(1⌊⍡)β‰‘βŒ½β›βŒˆ=βŒ»β¨β³β‰’β΅}` | | +| TinyAPL | `checkMatrix ← {(1⌊⍡)β‰‘βŠ–βŠΈβŒˆ=βŠžβ¨β³β‰’β΅}` | | J | `checkMatrix =. {{ (1<.y)-:(\|.>.])=/~i.#y }}` | [Link](https://github.com/codereport/LeetCode/blob/master/0299_Problem_1.ijs) | | BQN | `CheckMatrix ← {(1βŒŠπ•©)β‰‘βŒ½βŠΈβŒˆ=βŒœΛœβ†•β‰ π•©}` | [Link](https://github.com/codereport/LeetCode/blob/master/0299_Problem_1.bqn) | | Uiua | `CheckMatrix ← ≅↧1∢β†₯β‡Œ.⊞=.⇑⧻.` | | diff --git a/comparisons/matrix_identity.md b/comparisons/matrix_identity.md index 7ecb8c9..7750f30 100644 --- a/comparisons/matrix_identity.md +++ b/comparisons/matrix_identity.md @@ -5,6 +5,8 @@ | | Identity Matrix | | :-------: | :--------------------------------------------------------------------------------: | | APL | `∘.=⍨⍳` | +| Kap | `=⌻⍨⍳` | +| TinyAPL | `=⊞⍨⍀⍳` | | J | `e.@i.` | | BQN | `=βŒœΛœβ†•` | | Uiua | `⊞=.⇑` | diff --git a/comparisons/matrix_iota.md b/comparisons/matrix_iota.md index 8fd4103..3a2116e 100644 --- a/comparisons/matrix_iota.md +++ b/comparisons/matrix_iota.md @@ -5,6 +5,8 @@ | | Iota Matrix | | :-------: | :-----------------------------------: | | APL | `3 4⍴⍳12` | +| Kap | `3 4⍴⍳12` | +| TinyAPL | `3β€Ώ4⍴⍳12` | | J | `i.3 4` | | BQN | `3β€Ώ4β₯Šβ†•12` | | Uiua | `β†―3_4⇑12` | diff --git a/comparisons/matrix_reversing.md b/comparisons/matrix_reversing.md index a320d37..f9a62a9 100644 --- a/comparisons/matrix_reversing.md +++ b/comparisons/matrix_reversing.md @@ -5,8 +5,10 @@ | | Reverse In Memory | Reverse Columns | Reverse Rows | | :-------: | :------------------------------------: | :------------------------------------------------------------: | :------------------------------------: | | APL | ravel, reverse, reshape | `βŠ–` | `⌽`
`βŠ–β€1` | +| Kap | `βŠ–β’,` | `βŠ–` | `βŠ–β—‘` | +| TinyAPL | `βŠ–β’,` | `βŠ–` | `βŠ–β€1` | | J | ravel, reverse, reshape | `\|.` | `\|."1` | -| BQN | `⌽⌾β₯Š` | `⌽` | `⌽˘`
`βŒ½βŽ‰1` | +| BQN | `⌽⌾β₯Š` | `⌽` | `⌽˘`
`⌽˘` | | Uiua | `βœβ‡Œβ™­`* | `β‡Œ` | `β‰‘β‡Œ` | | Q | deshape, reverse, reshape | `reverse` | `reverse each` | | Julia | `reverse(a)`
`reverse(a, dims=:)` | `reverse(a, dims=1)` | `reverse(a, dims=2)` | @@ -95,7 +97,7 @@ 8 7 6 β”˜ # or - βŒ½βŽ‰1 a + ⌽˘ a β”Œβ”€ β•΅ 2 1 0 5 4 3 diff --git a/comparisons/matrix_summing.md b/comparisons/matrix_summing.md index 8a84040..304c50b 100644 --- a/comparisons/matrix_summing.md +++ b/comparisons/matrix_summing.md @@ -5,8 +5,10 @@ | | Summing All | Summing Columns | Summing Rows | | :-------: | :------------------------------: | :-------------------------------: | :----------------------------------------------------------------------------------------------------: | | APL | `+/,` | `+⌿` | `+/`
`+/⍀1` | +| Kap | `+/,` | `+⌿` | `+/`
`+/⍀1` | +| TinyAPL | `+⍆,` | `+⍆` | `+⍆◑` | | J | `+/&,` | `+/` | `+/"1` | -| BQN | `+Β΄β₯Š` | `+˝` | `+´˘`
`+ΛβŽ‰1` | +| BQN | `+Β΄β₯Š` | `+˝` | `+´˘`
`+˝˘` | | Uiua | `/+β™­` | `/+` | `≑/+` | | Q | `sum raze` | `sum` | `sum each` | | Julia | `sum(a)`
`sum(a, dims=:)` | `sum(a, dims=1)` | `sum(a, dims=2)` | diff --git a/comparisons/pwc/PWC198_P1_Max_Gap_Count.md b/comparisons/pwc/PWC198_P1_Max_Gap_Count.md index 4c3f6ac..0df9bef 100644 --- a/comparisons/pwc/PWC198_P1_Max_Gap_Count.md +++ b/comparisons/pwc/PWC198_P1_Max_Gap_Count.md @@ -5,6 +5,8 @@ | | Solution | Link | | :-------: | :------------------------------------------------------: | :---: | | APL | `MaxGapCount ← {+/(⌈/=⊒)2-/(βŠ‚β€β’βŒ·βŠ’)⍡}` | | +| Kap | `MaxGapCount ⇐ +/⌈/⍛=2-/∨` | +| TinyAPL | `MaxGapCount ← {+β†βŒˆβ†βŠΈ=2-β†β†‘βŠ΅β΅}` | | J | `MaxGapCount =. {{ +/ (= >./) 2-/\ \:~ y }}` | | | BQN | `MaxGapCount ← {+´⌈´⊸=-´˘2β†•βˆ¨π•©}` | | | Uiua | `MaxGapCount ← /+=/β†₯.≑/-β—«2⊏⍏.` | |