Word64MultiplyWord8

procedure Word64MultiplyWord8(

  const A: Word64Rec;

  const B: Byte;

  var R: Word128

); overload;

procedure Word64MultiplyWord8(

  var A: Word64Rec;

  const B: Byte

); overload;