6 lines
320 B
Text
6 lines
320 B
Text
# Takes strict range 0..<n and generates n! permutations
|
|
# (from https://github.com/Omnikar/uiua-math/blob/main/lib.ua).
|
|
Perms ← ♭₂⍉∧(≡↻⇡⟜↯+1⟜⊂)⊃⋅∘∘¤¤°⊂
|
|
|
|
Permute ← ≡⊏⊙¤⊸(Perms⇡⧻) # Generalised helper function.
|
|
⟜⧻Permute {"this" "is" "fine"} # Yoda simulator
|