procedure MCSetBit(var Word:MCWordform;BitIndex:MCBitIndex);
extern;

procedure MCGetBit(word:MCWordForm;BitIndex:MCBitIndex;
                   var ResultBit:MCBit);
extern;

procedure MCSetByte(var Word:MCWordForm;ByteIndex:MCByteIndex;
                    DataByte:MCByte);
extern;

procedure PredictedError(Code:Scalar);
extern;