generated at
Indexable型クラス
hs
class Lookup f => Indexable f where index :: f a -> Key f -> a