11 lines
106 B
Text
11 lines
106 B
Text
c : 'abcdefghijklmnopqrstuvwxyz'
|
|
|
|
c []
|
|
$s
|
|
#c j
|
|
if j > 0
|
|
- j
|
|
+ c.j $s 1
|
|
goif
|
|
endif
|
|
$s []
|