RosettaCodeData/Task/Gray-code/Frink/gray-code.frink

for i=0 to 31
{
   gray = binaryToGray[i]
   back = grayToBinary[gray]
   println[(i->binary) + "\t" + (gray->binary) + "\t" + (back->binary)]
}