module Text.HTML5.MetaData.Schema.PeopleAudience where
import Text.HTML5.MetaData.Class
import Text.HTML5.MetaData.Type
import Data.Text
import Data.Typeable
import qualified Text.HTML5.MetaData.Schema.Thing
import qualified Text.HTML5.MetaData.Schema.Intangible
import qualified Text.HTML5.MetaData.Schema.Audience
import qualified Text.HTML5.MetaData.Schema.MedicalAudience
import qualified Text.HTML5.MetaData.Schema.ParentAudience
data PeopleAudience = PeopleAudience { additionalType :: AdditionalType
, alternateName :: AlternateName
, description :: Description
, image :: Image
, name :: Name
, sameAs :: SameAs
, url :: Url
, audienceType :: AudienceType
, geographicArea :: GeographicArea
, healthCondition :: HealthCondition
, requiredGender :: RequiredGender
, requiredMaxAge :: RequiredMaxAge
, requiredMinAge :: RequiredMinAge
, suggestedGender :: SuggestedGender
, suggestedMaxAge :: SuggestedMaxAge
, suggestedMinAge :: SuggestedMinAge
}
deriving (Show, Read, Eq, Typeable)
instance MetaData PeopleAudience where
_label = const "People Audience"
_comment_plain = const ""
_comment = const ""
_url = const "http://schema.org/PeopleAudience"
_ancestors = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.Thing.Thing)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.Intangible.Intangible)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.Audience.Audience)]
_subtypes = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalAudience.MedicalAudience)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.ParentAudience.ParentAudience)]
_supertypes = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.Audience.Audience)]