stripsFromAllPentagons :: [[[Int]]]
stripsFromAllPentagons = concatMap stripsFromPentagon snubPentagons
stripsFromAllPentagons :: [[[Int]]]
stripsFromAllPentagons = concatMap stripsFromPentagon snubPentagons
stripsFromAllPentagons = concatMap stripsFromPentagon snubPentagons