module Text.HTML5.MetaData.Schema.InfectiousAgentClass where
import Text.HTML5.MetaData.Class
import Text.HTML5.MetaData.Type hiding ( InfectiousAgentClass )
import Data.Text
data InfectiousAgentClass = Bacteria
| Fungus
| MulticellularParasite
| Prion
| Protozoa
| Virus
deriving (Show, Read, Eq)
instance MetaData InfectiousAgentClass where
_label = const "Infectious Agent Class"
_comment_plain = const "Classes of agents or pathogens that transmit infectious diseases. Enumerated type."
_comment = const "Classes of agents or pathogens that transmit infectious diseases. Enumerated type."
_url = const "http://schema.org/InfectiousAgentClass"