module Text.HTML5.MetaData.Schema.TherapeuticProcedure 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.MedicalEntity
import qualified Text.HTML5.MetaData.Schema.MedicalProcedure
import qualified Text.HTML5.MetaData.Schema.MedicalTherapy
data TherapeuticProcedure = TherapeuticProcedure { additionalType :: AdditionalType
, alternateName :: AlternateName
, description :: Description
, image :: Image
, name :: Name
, sameAs :: SameAs
, url :: Url
, code :: Code
, guideline :: Guideline
, medicineSystem :: MedicineSystem
, recognizingAuthority :: RecognizingAuthority
, relevantSpecialty :: RelevantSpecialty
, study :: Study
, adverseOutcome :: AdverseOutcome
, contraindication :: Contraindication
, duplicateTherapy :: DuplicateTherapy
, indication :: Indication
, seriousAdverseOutcome :: SeriousAdverseOutcome
, followup :: Followup
, howPerformed :: HowPerformed
, preparation :: Preparation
, procedureType :: ProcedureType
}
deriving (Show, Read, Eq, Typeable)
instance MetaData TherapeuticProcedure where
_label = const "Therapeutic Procedure"
_comment_plain = const ""
_comment = const ""
_url = const "http://schema.org/TherapeuticProcedure"
_ancestors = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.Thing.Thing)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalEntity.MedicalEntity)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalProcedure.MedicalProcedure)]
_subtypes = const []
_supertypes = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalProcedure.MedicalProcedure)
,typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalTherapy.MedicalTherapy)]