zip7 package:singletons-base
type family Unzip7 (a1 :: [(a, b, c, d, e, f, g)]) :: ([a], [b], [c], [d], [e], [f], [g]) data Unzip7Sym0 (a1 :: TyFun [(a, b, c, d, e, f, g)] ([a], [b], [c], [d], [e], [f], [g])) type family Unzip7Sym1 (a6989586621679544824 :: [(a, b, c, d, e, f, g)]) :: ([a], [b], [c], [d], [e], [f], [g])