13/01/16 21:08:37.17
>>98 Io言語
f:=method(s,n:=s size;a:=s asMutable
for(i,0,2**n-1,g:=i^i/2
for(j,0,n-1,a atPut(j,s at(j)-g at(j)*32))
a println))
Io> f("new")
new
New
NEw
nEw
nEW
NEW
NeW
neW
13/01/16 21:08:37.17
>>98 Io言語
f:=method(s,n:=s size;a:=s asMutable
for(i,0,2**n-1,g:=i^i/2
for(j,0,n-1,a atPut(j,s at(j)-g at(j)*32))
a println))
Io> f("new")
new
New
NEw
nEw
nEW
NEW
NeW
neW