{-# LANGUAGE DeriveGeneric #-} module Model where import GHC.Generics import Data.Yaml import Model.Identity (Identity) import Model.Job (Job) import Model.Degree (Degree) import Model.SkillType (SkillType) import Model.Project (Project) import Model.Translated (Translated) data Model = Model { description :: String , identity :: Identity , jobs :: [Job] , degrees :: [Degree] , skillTypes :: [SkillType] , interests :: [Translated] , projects :: [Project] } deriving (Show, Read, Eq, Generic) instance FromJSON Model