bit_read_TF (Bit_Chain *restrict dat, int length)
{
  BITCODE_RC *chain = malloc (length + 1);

  bit_read_fixed (dat, chain, length);
  chain[length] = '\0';

  return (BITCODE_TF)chain;
}
bit_read_TF (Bit_Chain *restrict dat, int length)
{
  BITCODE_RC *chain = malloc (length + 1);

  bit_read_fixed (dat, chain, length);
  chain[length] = '\0';

  return (BITCODE_TF)chain;
}