Hashtron inference: Difference between revisions

m
m (→‎{{header|Phix}}: mior tidy)
Line 346:
if length(program) then
for j=0 to bits-1 do
integer input{ss, maxx} = or_bitsu(command,j<<16)program[1],
input = hashtron(or_bitsu(command,j<<16), {ss, maxx} = program[1])
input = hashtron(input, ss, maxx,1)
for p in program from 2 do
integer {s, mx} = p
maxx -= mx
input = hashtron(input, s, maxx,0)
end for
if odd(input) then
7,820

edits