{-# LANGUAGE TypeFamilies #-} module Classes.FromDatabase where -- internal imports import Classes.DatabaseRepresentation class DatabaseRepresentation a => FromDatabase a where -- type OutTuple a :: Type fromDatabase :: Representation a -> a