We currently have ```haskell class RawKey a where rawKey :: Iso a ByteString ``` but we really don't ever use the `from rawKey :: RawKey a => ByteString -> a` method at all. We should change the class to ```haskell class RawKey a where rawKey :: a -> ByteString ```