{-# LANGUAGE OverloadedStrings #-} module Text.HTML5.MetaData.Schema.MiddleSchool where -- Valid: 2012-08-31 ( Schema.rdfs.org ) import Text.HTML5.MetaData.Class import Text.HTML5.MetaData.Type import Data.Text -- | A middle school. -- -- [@id@] MiddleSchool -- -- [@label@] Middle School -- -- [@comment@] A middle school. -- -- [@ancestors@] @'Thing','Organization','EducationalOrganization'@ -- -- [@subtypes@] -- -- [@supertypes@] @'EducationalOrganization'@ -- -- [@url@] data MiddleSchool = MiddleSchool { additionalType :: AdditionalType , description :: Description , image :: Image , name :: Name , url :: Url , address :: Address , aggregateRating :: AggregateRating , contactPoint :: ContactPoint , contactPoints :: ContactPoints , email :: Email , employee :: Employee , employees :: Employees , event :: Event , events :: Events , faxNumber :: FaxNumber , founder :: Founder , founders :: Founders , foundingDate :: FoundingDate , interactionCount :: InteractionCount , location :: Location , member :: Member , members :: Members , review :: Review , reviews :: Reviews , telephone :: Telephone , alumni :: Alumni } deriving (Show, Read, Eq) instance MetaData MiddleSchool where _label = const "Middle School" _comment_plain = const "A middle school." _comment = const "A middle school." _url = const "http://schema.org/MiddleSchool"