Source position: classesh.inc line 779
public function TBits.IntersectionPopCount(
Pos: SizeInt;
BBf: TBits;
BPos: SizeInt;
Count: SizeInt;
Lim: SizeInt = High(SizeInt)
):SizeInt;