121 lines
3.6 KiB
Text
121 lines
3.6 KiB
Text
H
|
|
a
|
|
100
|
|
.
|
|
# iota.ed
|
|
g/[^0-9]{1,}/s///g
|
|
,p
|
|
# decimal -> unary
|
|
g/^0+([0-9])/s//\1/
|
|
g/^9([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiiii/
|
|
g/^8([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiii/
|
|
g/^7([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiii/
|
|
g/^6([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiii/
|
|
g/^5([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiii/
|
|
g/^4([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiii/
|
|
g/^3([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iii/
|
|
g/^2([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2ii/
|
|
g/^1([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2i/
|
|
g/^0([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2/
|
|
g/^9([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiiii/
|
|
g/^8([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiii/
|
|
g/^7([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiii/
|
|
g/^6([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiii/
|
|
g/^5([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiii/
|
|
g/^4([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiii/
|
|
g/^3([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iii/
|
|
g/^2([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2ii/
|
|
g/^1([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2i/
|
|
g/^0([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2/
|
|
g/^9([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiiii/
|
|
g/^8([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiii/
|
|
g/^7([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiii/
|
|
g/^6([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiii/
|
|
g/^5([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiii/
|
|
g/^4([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiii/
|
|
g/^3([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iii/
|
|
g/^2([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2ii/
|
|
g/^1([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2i/
|
|
g/^0([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2/
|
|
g/^9([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiiii/
|
|
g/^8([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiii/
|
|
g/^7([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiii/
|
|
g/^6([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiii/
|
|
g/^5([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiii/
|
|
g/^4([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiii/
|
|
g/^3([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iii/
|
|
g/^2([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2ii/
|
|
g/^1([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2i/
|
|
g/^0([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2/
|
|
g/^9([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiiii/
|
|
g/^8([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiiii/
|
|
g/^7([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiiii/
|
|
g/^6([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiiii/
|
|
g/^5([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiiii/
|
|
g/^4([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iiii/
|
|
g/^3([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2iii/
|
|
g/^2([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2ii/
|
|
g/^1([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2i/
|
|
g/^0([0-9]*)(i*)/s//\1\2\2\2\2\2\2\2\2\2\2/
|
|
# iota logic
|
|
s/\B/\
|
|
/g
|
|
a
|
|
|
|
.
|
|
y
|
|
d
|
|
g/i/x\
|
|
s/.*/&i/\
|
|
-1d\
|
|
y
|
|
# fizzbuzz
|
|
g/^(i{15})+$/s//FizzBuzz/
|
|
g/^(i{5})+$/s//Buzz/
|
|
g/^(i{3})+$/s//Fizz/
|
|
# unary -> decimal (for 0-10000 range)
|
|
g/i{9000}(i{0,999})/s//9\1/
|
|
g/i{8000}(i{0,999})/s//8\1/
|
|
g/i{7000}(i{0,999})/s//7\1/
|
|
g/i{6000}(i{0,999})/s//6\1/
|
|
g/i{5000}(i{0,999})/s//5\1/
|
|
g/i{4000}(i{0,999})/s//4\1/
|
|
g/i{3000}(i{0,999})/s//3\1/
|
|
g/i{2000}(i{0,999})/s//2\1/
|
|
g/i{1000}(i{0,999})/s//1\1/
|
|
v/^[0-9]i*$/s/.*/0&/
|
|
g/i{900}(i{0,99})/s//9\1/
|
|
g/i{800}(i{0,99})/s//8\1/
|
|
g/i{700}(i{0,99})/s//7\1/
|
|
g/i{600}(i{0,99})/s//6\1/
|
|
g/i{500}(i{0,99})/s//5\1/
|
|
g/i{400}(i{0,99})/s//4\1/
|
|
g/i{300}(i{0,99})/s//3\1/
|
|
g/i{200}(i{0,99})/s//2\1/
|
|
g/i{100}(i{0,99})/s//1\1/
|
|
v/^[0-9]{2}i*$/s/^([0-9])(i*)$/\10\2/
|
|
g/i{90}(i{0,9})/s//9\1/
|
|
g/i{80}(i{0,9})/s//8\1/
|
|
g/i{70}(i{0,9})/s//7\1/
|
|
g/i{60}(i{0,9})/s//6\1/
|
|
g/i{50}(i{0,9})/s//5\1/
|
|
g/i{40}(i{0,9})/s//4\1/
|
|
g/i{30}(i{0,9})/s//3\1/
|
|
g/i{20}(i{0,9})/s//2\1/
|
|
g/i{10}(i{0,9})/s//1\1/
|
|
v/^[0-9]{3}i*$/s/^([0-9]{2})(i*)$/\10\2/
|
|
g/i{9}/s//9/
|
|
g/i{8}/s//8/
|
|
g/i{7}/s//7/
|
|
g/i{6}/s//6/
|
|
g/i{5}/s//5/
|
|
g/i{4}/s//4/
|
|
g/i{3}/s//3/
|
|
g/i{2}/s//2/
|
|
g/i{1}/s//1/
|
|
v/^[0-9]{4}i*$/s/^([0-9]{3})(i*)$/\10\2/
|
|
g/^0+([0-9])/s//\1/
|
|
g/0F1zz/s//Fizz/
|
|
g/0Buzz/s//Buzz/
|
|
,p
|
|
Q
|