sum
5
%
10
*
103
+
digits
( "\x0f\x02\xa2f\xf9\xba\xf5Dw%8\xbb\x04\x1f/Z\xedkk\xd4@j\xb2C\xca\xe2f\x82\xd8q\xe5\x1c\x14._K\x85mS\xc9*}\x97#0\xc4\x8dLl\xa3\xb83" )
256
base #(list to num)
28
base #(num to list)
lines
select
flatten
w( "New file" )
new-line
8
ljust
itemize
5
range1
map-show
cartesian-product
":"
cartesian-product
"*"
show-space
cartesian-product
catenate #(list+list)
new-line
w( "Not found" "O.K.? " "*" "Abort edit (Y/N)? " )
cartesian-product
catenate #(list+list)
push-a
lines
catenate #(list+list)
select