Eban numbers: Difference between revisions

Content added Content deleted
(K)
m (→‎{{header|K}}: slightly simpler)
Line 1,405: Line 1,405:
=={{header|K}}==
=={{header|K}}==
{{works with|ngn/k}}
{{works with|ngn/k}}
<syntaxhighlight lang=K>eban: 1_{{{y[&y<x+1]}[y]@,/x+/:1000*,/z}[,/(2*!4)+/:10*0,3+!4;x]/0}@
<syntaxhighlight lang=K>eban: 1_{{((y+1)>)#,/x+/:1000*,/z}[,/(2*!4)+/:10*0,3+!4;x]/0}@


#eban 1000
#eban 1000