snd -package:clash-prelude -package:regex-tdfa -package:linear-base package:wakame

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