module Text.HTML5.MetaData.Schema.ControlAction 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.Action
import qualified Text.HTML5.MetaData.Schema.ActivateAction
import qualified Text.HTML5.MetaData.Schema.DeactivateAction
import qualified Text.HTML5.MetaData.Schema.ResumeAction
import qualified Text.HTML5.MetaData.Schema.SuspendAction
data ControlAction = ControlAction { actionStatus :: ActionStatus
, agent :: Agent
, endTime :: EndTime
, error :: Error
, instrument :: Instrument
, location :: Location
, object :: Object
, participant :: Participant
, result :: Result
, startTime :: StartTime
, target :: Target
, additionalType :: AdditionalType
, alternateName :: AlternateName
, description :: Description
, image :: Image
, mainEntityOfPage :: MainEntityOfPage
, name :: Name
, potentialAction :: PotentialAction
, sameAs :: SameAs
, url :: Url
}
deriving (Show, Read, Eq, Typeable)
instance MetaData ControlAction where
_label = const "Control Action"
_comment_plain = const "An agent controls a device or application."
_comment = const "An agent controls a device or application."
_url = const "http://schema.org/ControlAction"
_ancestors = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.Thing.Thing)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.Action.Action)]
_subtypes = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.ActivateAction.ActivateAction)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.DeactivateAction.DeactivateAction)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.ResumeAction.ResumeAction)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.SuspendAction.SuspendAction)]
_supertypes = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.Action.Action)]