snd -package:singletons -package:rebase -package:protolude package:wakame

>>> :kind! Snd '(Bool, Char)
Snd '(Bool, Char) :: *
= Char