Subsets[{H,T}]