RosettaCodeData/Task/Rot-13/YAMLScript/rot-13.ys

8 lines
191 B
Text
Raw Permalink Normal View History

2024-04-19 16:56:29 -07:00
!yamlscript/v0
s =: set(nil).into('abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ')
m =: drop(26 s).concat(take(26 s)).zipmap(s _)
defn main(s):
say: map(\(m %1 %1) s).apply(str _)