hideMods :: Bool -> Mod f a
hideMods hide = if hide then internal <> hidden else idm
hideMods :: Bool -> Mod f a
hideMods hide = if hide then internal <> hidden else idm
hideMods hide = if hide then internal <> hidden else idm