{-# LANGUAGE TypeFamilies #-} {-# LANGUAGE AllowAmbiguousTypes #-} module Classes.Renderable where class Renderable a where type VertexObjects a :: * type ShaderObjects a :: * init :: IO () draw :: VertexObjects a -> ShaderObjects a -> a -> IO ()