Fold over multiple SieveBlocks

[Bodigrim]

TB{A,C,D}