{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE DeriveDataTypeable #-} module Text.HTML5.MetaData.Schema.BloodTest where -- Valid: 2016-02-03 (Schema.rdfs.org) import Text.HTML5.MetaData.Class import Text.HTML5.MetaData.Type import Data.Text import Data.Typeable import {-# SOURCE #-} qualified Text.HTML5.MetaData.Schema.Thing import {-# SOURCE #-} qualified Text.HTML5.MetaData.Schema.MedicalEntity import {-# SOURCE #-} qualified Text.HTML5.MetaData.Schema.MedicalTest -- | A medical test performed on a sample of a patient's blood. -- -- [@id@] BloodTest -- -- [@label@] Blood Test -- -- [@comment@] A medical test performed on a sample of a patient's blood. -- -- [@ancestors@] @'Thing','MedicalEntity','MedicalTest'@ -- -- [@subtypes@] -- -- [@supertypes@] @'MedicalTest'@ -- -- [@url@] data BloodTest = BloodTest { affectedBy :: AffectedBy , normalRange :: NormalRange , signDetected :: SignDetected , usedToDiagnose :: UsedToDiagnose , usesDevice :: UsesDevice , code :: Code , guideline :: Guideline , medicineSystem :: MedicineSystem , recognizingAuthority :: RecognizingAuthority , relevantSpecialty :: RelevantSpecialty , study :: Study , 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 BloodTest where _label = const "Blood Test" _comment_plain = const "A medical test performed on a sample of a patient's blood." _comment = const "A medical test performed on a sample of a patient's blood." _url = const "http://schema.org/BloodTest" _ancestors = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.Thing.Thing) ,typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalEntity.MedicalEntity) ,typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalTest.MedicalTest)] _subtypes = const [] _supertypes = const [typeOf (undefined :: Text.HTML5.MetaData.Schema.MedicalTest.MedicalTest)]