mirror of
https://gitlab.com/upRootNutrition/website.git
synced 2025-06-16 04:25:11 -05:00
55 lines
2.6 KiB
Elm
Executable file
55 lines
2.6 KiB
Elm
Executable file
module Config.Pages.Debate.Arguments.Inferences.AnimalRights exposing (..)
|
||
|
||
import Config.Pages.Debate.Arguments.Types exposing (..)
|
||
|
||
|
||
argumentAnimalRights : Argument
|
||
argumentAnimalRights =
|
||
{ argumentTitle = "Argument for Animal Rights"
|
||
, propositionTitle = "We should not exploit animals to any greater degree than we would tolerate for humans."
|
||
, propositionReductio = ""
|
||
, propositionSummary = "I view animal rights as the logical extension of trait-adjusted human rights to non-human animals. As such, if one wants to deny that animals should be given these trait-adjusted rights, they'll have to name a trait that accounts for the differential normative evaluation. Typically this is done by rejecting P3 and saying something retarded."
|
||
, proofLink = "https://www.umsu.de/trees/#(~6x(Px~5~3Qx)),(~3Pa~5~7t(Rta~5(Rth~5~3Ph))),(~3~7t(Rta~5(Rth~5~3Ph))),(Pa)|=(~3Qa)"
|
||
|
||
, argumentCertainty = 10
|
||
, argumentImage = "animalrights"
|
||
, definitionTable =
|
||
[ { definiendum = "P(x)"
|
||
, definiens = "(x) has moral worth"
|
||
}
|
||
, { definiendum = "Q(x)"
|
||
, definiens = "we should exploit (x) to any greater degree than we would tolerate for humans"
|
||
}
|
||
, { definiendum = "R(t,x)"
|
||
, definiens = "there exists a (t) that is absent in (x)"
|
||
}
|
||
, { definiendum = "x"
|
||
, definiens = "a being"
|
||
}
|
||
, { definiendum = "t"
|
||
, definiens = "trait"
|
||
}
|
||
, { definiendum = "a"
|
||
, definiens = "animal"
|
||
}
|
||
, { definiendum = "h"
|
||
, definiens = "human"
|
||
}
|
||
]
|
||
, argumentFormalization =
|
||
[ { premises =
|
||
[ { premise = "For all things, if a being has moral worth, then we should not exploit it to any greater degree than we would tolerate for humans."
|
||
, notation = "∀x(Px→¬Qx)"
|
||
}
|
||
, { premise = "If animals don’t have moral worth, then there exists a trait that is absent in animals such that if it were absent in humans, humans wouldn’t have moral worth."
|
||
, notation = "¬Pa→∃t(Rta→(Rth→¬Ph))"
|
||
}
|
||
, { premise = "There doesn’t exist a trait that is absent in animals such that if it were absent in humans, humans wouldn’t have moral worth"
|
||
, notation = "¬∃t(Rta→(Rth→¬Ph))"
|
||
}
|
||
]
|
||
, conclusion = "Therefore, we should not exploit animals to any greater degree than we would tolerate for humans."
|
||
, conclusionNotation = "¬Qa"
|
||
}
|
||
]
|
||
}
|