diff --git a/frontend/src/Debate/Arguments/Ethics/EfilismPatrolSquad.elm b/frontend/src/Debate/Arguments/Ethics/EfilismPatrolSquad.elm index d01a804..9a9db3d 100755 --- a/frontend/src/Debate/Arguments/Ethics/EfilismPatrolSquad.elm +++ b/frontend/src/Debate/Arguments/Ethics/EfilismPatrolSquad.elm @@ -6,9 +6,9 @@ import Debate.Types exposing (..) argumentEfilismPatrolSquad : Argument argumentEfilismPatrolSquad = { argumentTitle = "The Eternal Intergalactic Sentience Patrol Squad" - , propositionTitle = "Efilists should not abstain from procreation until all sentient life in the universe is sterilized" + , propositionTitle = "Efilists are committed to pragmatic natalism" , propositionSummary = "Summary" - , proofLink = "https://www.umsu.de/trees/#(P~5Q),(~3Q),(~3P~1R~5~3S),(R)%7C=(~3S)" + , proofLink = "https://www.umsu.de/trees/#(P~5Q),(~3Q),(~3P~1R~5~3S),(R),(~3S~5T)|=(T)" , definitionTable = [ { definiendum = "P" , definiens = "humans abstaining from procreation maximally reduces rights violations" @@ -22,6 +22,9 @@ argumentEfilismPatrolSquad = , { definiendum = "S" , definiens = "efilists should abstain from procreation until all sentient life in the universe is sterilized" } + , { definiendum = "T" + , definiens = "efilists are committed to pragmatic natalism" + } ] , argumentFormalization = [ { premises = @@ -37,9 +40,12 @@ argumentEfilismPatrolSquad = , { premise = "Many more generations are required to sterilize all sentient life in the universe." , notation = "(R)" } + , { premise = "If efilists should not abstain from procreation until all sentient life in the universe is sterilized, then efilists are committed to pragmatic natalism." + , notation = "(¬S→T)" + } ] - , conclusion = "Therefore, efilists should not abstain from procreation until all sentient life in the universe is sterilized." - , conclusionNotation = "(∴)" + , conclusion = "Therefore, efilists are committed to pragmatic natalism." + , conclusionNotation = "(∴T)" } ] } diff --git a/frontend/src/Debate/Arguments/Nutrition/HealthyPlantFoods.elm b/frontend/src/Debate/Arguments/Nutrition/HealthyPlantFoods.elm new file mode 100644 index 0000000..07463fb --- /dev/null +++ b/frontend/src/Debate/Arguments/Nutrition/HealthyPlantFoods.elm @@ -0,0 +1,39 @@ +module Debate.Arguments.Nutrition.HealthyPlantFoods exposing (..) + +import Debate.Types exposing (..) + + +argumentHealthyPlantFoods : Argument +argumentHealthyPlantFoods = + { argumentTitle = "Argument for Overwhelmingly Healthy Plant Foods" + , propositionTitle = "Whole plant foods are overwhelmingly healthy." + , propositionSummary = "Summary" + , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qf)|=(Pf)" + , definitionTable = + [ { definiendum = "P(x)" + , definiens = "(x) is overwhelmingly healthy" + } + , { definiendum = "Q(x)" + , definiens = "(x) consistently associates with a reduced risk of morbidity and mortality after adjustment or control over relevant confounders and covariates" + } + , { definiendum = "x" + , definiens = "a food" + } + , { definiendum = "w" + , definiens = "whole plant foods" + } + ] + , argumentFormalization = + [ { premises = + [ { premise = "For all things, food (x) is overwhelmingly healthy if, and only if, food (x) consistently associates with a reduced risk of morbidity and mortality after adjustment or control over relevant confounders and covariates." + , notation = "(∀x(Px↔Qx))" + } + , { premise = "Whole plant foods consistently associates with a reduced risk of morbidity and mortality after adjustment or control over relevant confounders and covariates." + , notation = "(Qw)" + } + ] + , conclusion = "Therefore, whole plant foods are overwhelmingly healthy." + , conclusionNotation = "(∴Pw)" + } + ] + } \ No newline at end of file diff --git a/frontend/src/Debate/Arguments/Nutrition/HealthySoy.elm b/frontend/src/Debate/Arguments/Nutrition/HealthySoy.elm new file mode 100644 index 0000000..d631d79 --- /dev/null +++ b/frontend/src/Debate/Arguments/Nutrition/HealthySoy.elm @@ -0,0 +1,39 @@ +module Debate.Arguments.Nutrition.HealthySoy exposing (..) + +import Debate.Types exposing (..) + + +argumentHealthySoy : Argument +argumentHealthySoy = + { argumentTitle = "Argument for Soy Products" + , propositionTitle = "Soy products are overwhelmingly healthy." + , propositionSummary = "Summary" + , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qs)|=(Ps)" + , definitionTable = + [ { definiendum = "P(x)" + , definiens = "(x) is overwhelmingly healthy" + } + , { definiendum = "Q(x)" + , definiens = "(x) consistently associates with a reduced risk of morbidity and mortality after adjustment or control over relevant confounders and covariates" + } + , { definiendum = "x" + , definiens = "a food" + } + , { definiendum = "s" + , definiens = "soy products" + } + ] + , argumentFormalization = + [ { premises = + [ { premise = "For all things, food (x) is overwhelmingly healthy if, and only if, food (x) consistently associates with a reduced risk of morbidity and mortality after adjustment or control over relevant confounders and covariates." + , notation = "(∀x(Px↔Qx))" + } + , { premise = "Soy products consistently associate with a reduced risk of morbidity and mortality after adjustment or control over relevant confounders and covariates." + , notation = "(Qs)" + } + ] + , conclusion = "Therefore, soy products are overwhelmingly healthy." + , conclusionNotation = "(∴Ps)" + } + ] + } \ No newline at end of file diff --git a/frontend/src/Debate/Arguments/Nutrition/Omega3Omega6Ratio.elm b/frontend/src/Debate/Arguments/Nutrition/Omega3Omega6Ratio.elm new file mode 100644 index 0000000..8298d0a --- /dev/null +++ b/frontend/src/Debate/Arguments/Nutrition/Omega3Omega6Ratio.elm @@ -0,0 +1,32 @@ +module Debate.Arguments.Nutrition.Omega3Omega6Ratio exposing (..) + +import Debate.Types exposing (..) + +argumentOmega3Omega6Ratio : Argument +argumentOmega3Omega6Ratio = + { argumentTitle = "Argument Against the Omega-6/Omega-3 Ratio" + , propositionTitle = "The omega-6/omega-3 ratio is unlikely to matter for health." + , propositionSummary = "Summary" + , proofLink = "https://www.umsu.de/trees/#(P~5Q),(~3Q)|=(~3P)" + , definitionTable = + [ { definiendum = "P" + , definiens = "increases or decreases in disease risk associated with a high or low omega-6/omega-3 ratio are better explained by changes in omega-3 alone" + } + , { definiendum = "Q" + , definiens = "the omega-6/omega-3 ratio is likely to matter for health" + } + ] + , argumentFormalization = + [ { premises = + [ { premise = "If increases or decreases in disease risk associated with a high or low omega-6/omega-3 ratio are better explained by changes in omega-3 alone, then the omega-6/omega-3 ratio is not likely to matter for health." + , notation = "(P→¬Q)" + } + , { premise = "Increases or decreases in disease risk associated with a high or low omega-6/omega-3 ratio are better explained by changes in omega-3 alone." + , notation = "(P)" + } + ] + , conclusion = "Therefore, the omega-6/omega-3 ratio is not likely to matter for health." + , conclusionNotation = "(∴¬Q)" + } + ] + } \ No newline at end of file diff --git a/frontend/src/Debate/Arguments/Ancestry/PolyphenolReductio.elm b/frontend/src/Debate/Arguments/Nutrition/PolyphenolReductio.elm similarity index 56% rename from frontend/src/Debate/Arguments/Ancestry/PolyphenolReductio.elm rename to frontend/src/Debate/Arguments/Nutrition/PolyphenolReductio.elm index d91b9e3..36e2acc 100755 --- a/frontend/src/Debate/Arguments/Ancestry/PolyphenolReductio.elm +++ b/frontend/src/Debate/Arguments/Nutrition/PolyphenolReductio.elm @@ -1,14 +1,14 @@ -module Debate.Arguments.Ancestry.PolyphenolReductio exposing (..) +module Debate.Arguments.Nutrition.PolyphenolReductio exposing (..) import Debate.Types exposing (..) argumentPolyphenolReductio : Argument argumentPolyphenolReductio = - { argumentTitle = "Harmful Polyphenol Reductio" - , propositionTitle = "Genetic modification that removes polyphenols from grass renders grass-fed beef less harmful." + { argumentTitle = "Anti-Polyphenol Reductio" + , propositionTitle = "Anti-polyphenol, ancestral diet advocates are committed to favouring GMOs." , propositionSummary = "Summary" - , proofLink = "https://www.umsu.de/trees/#(~6x~6y(Hx~1Cxy~5Vxy)),(Hp),(Cpg),(Vpg~5Mpg),(Vpg)%7C=(Mpg)" + , proofLink = "https://www.umsu.de/trees/#(~6x~6y(Hx~1Cxy~5Vxy)),(Hp),(Cpg),(Vpg~5Mpg),(Vpg),(Mpg~5Gp)|=(Gp)" , definitionTable = [ { definiendum = "H(x)" , definiens = "(x) is harmful" @@ -20,16 +20,19 @@ argumentPolyphenolReductio = , definiens = "(x) renders (y) harmful" } , { definiendum = "M(p,g)" - , definiens = "genetic modification that removes (p) renders (g) less harmful" + , definiens = "genetic modification that removes (p) from grass renders (g) less harmful" + } + , { definiendum = "G(p)" + , definiens = "health-conscious, anti-polyphenol, ancestral diet advocates are committed to favouring GMOs" } , { definiendum = "x" , definiens = "plant defense chemicals" } , { definiendum = "y" - , definiens = "food" + , definiens = "a food" } , { definiendum = "p" - , definiens = "polyphenols from grass" + , definiens = "polyphenols" } , { definiendum = "g" , definiens = "grass-fed beef" @@ -37,7 +40,7 @@ argumentPolyphenolReductio = ] , argumentFormalization = [ { premises = - [ { premise = "If plant defense chemicals are harmful and plant defense chemicals are contained in a food, then plant defense chemicals render the food harmful." + [ { premise = "If plant defense chemicals (x) are harmful and plant defense chemicals (x) are contained in a food (y), then plant defense chemicals (x) render the food (y) harmful." , notation = "(∀x∀y(Hx∧Cxy→Vxy))" } , { premise = "Polyphenols from grass are harmful." @@ -52,9 +55,12 @@ argumentPolyphenolReductio = , { premise = "Polyphenols from grass render grass-fed beef harmful." , notation = "(Vpg)" } + , { premise = "If genetic modification that removes polyphenols from grass renders grass-fed beef less harmful, then health-conscious, anti-polyphenol, ancestral diet advocates are committed to favouring GMOs." + , notation = "(Mpg→Gp)" + } ] - , conclusion = "Therefore, genetic modification that removes polyphenols from grass renders grass-fed beef less harmful." - , conclusionNotation = "(∴Mpg)" + , conclusion = "Therefore, health-conscious, anti-polyphenol, ancestral diet advocates are committed to favouring GMOs." + , conclusionNotation = "(∴Gp)" } ] } diff --git a/frontend/src/Debate/Arguments/Nutrition/TMAOCausality.elm b/frontend/src/Debate/Arguments/Nutrition/TMAOCausality.elm new file mode 100644 index 0000000..83d2fac --- /dev/null +++ b/frontend/src/Debate/Arguments/Nutrition/TMAOCausality.elm @@ -0,0 +1,39 @@ +module Debate.Arguments.Nutrition.TMAOCausality exposing (..) + +import Debate.Types exposing (..) + + +argumentTMAOCausality : Argument +argumentTMAOCausality = + { argumentTitle = "Argument Against TMAO Being Causal in CVD" + , propositionTitle = "TMAO is not likely to be causative of heart disease." + , propositionSummary = "Summary" + , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(~3Qt)|=(~3Pt)" + , definitionTable = + [ { definiendum = "P(x)" + , definiens = "(x) is likely to be causative of heart diseas" + } + , { definiendum = "Q(x)" + , definiens = "(x) consistently associates with an increased risk of heart disease after adjustment or control over relevant confounders and covariates" + } + , { definiendum = "x" + , definiens = "a substance" + } + , { definiendum = "t" + , definiens = "TMAO" + } + ] + , argumentFormalization = + [ { premises = + [ { premise = "For all things, if substance (x) is likely to be causative of heart disease if, then substance (x) consistently associates with an increased risk of heart disease after adjustment or control over relevant confounders and covariates." + , notation = "(∀x(Px↔Qx))" + } + , { premise = "TMAO consistently associates with an increased risk of heart disease after adjustment or control over relevant confounders and covariates." + , notation = "(¬Qt)" + } + ] + , conclusion = "Therefore, TMAO is not likely to be causative of heart disease." + , conclusionNotation = "(∴¬Pt)" + } + ] + } \ No newline at end of file diff --git a/frontend/src/Debate/Arguments/Nutrition/UnhealthySaturatedFat.elm b/frontend/src/Debate/Arguments/Nutrition/UnhealthySaturatedFat.elm new file mode 100644 index 0000000..3c119a1 --- /dev/null +++ b/frontend/src/Debate/Arguments/Nutrition/UnhealthySaturatedFat.elm @@ -0,0 +1,39 @@ +module Debate.Arguments.Nutrition.UnhealthySaturatedFat exposing (..) + +import Debate.Types exposing (..) + + +argumentUnhealthySaturatedFat : Argument +argumentUnhealthySaturatedFat = + { argumentTitle = "Argument Against Saturated Fat" + , propositionTitle = "Most sources of saturated fat are overwhelmingly unhealthy." + , propositionSummary = "Summary" + , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qf)|=(Pf)" + , definitionTable = + [ { definiendum = "P(x)" + , definiens = "(x) is overwhelmingly unhealthy" + } + , { definiendum = "Q(x)" + , definiens = "(x) consistently associates with an increased risk of morbidity and mortality after adjustment or control over relevant confounders and covariates" + } + , { definiendum = "x" + , definiens = "a food" + } + , { definiendum = "f" + , definiens = "most sources of saturated fat" + } + ] + , argumentFormalization = + [ { premises = + [ { premise = "For all things, food (x) is overwhelmingly unhealthy if, and only if, food (x) consistently associates with an increased risk of morbidity and mortality after adjustment or control over relevant confounders and covariates." + , notation = "(∀x(Px↔Qx))" + } + , { premise = "Most sources of saturated fat consistently associates with an increased risk of morbidity and mortality after adjustment or control over relevant confounders and covariates." + , notation = "(Qf)" + } + ] + , conclusion = "Therefore, most sources of saturated fat are overwhelmingly unhealthy." + , conclusionNotation = "(∴Pf)" + } + ] + } diff --git a/frontend/src/Debate/Arguments/Science/ApoBCVD.elm b/frontend/src/Debate/Arguments/Science/ApoBCVD.elm new file mode 100644 index 0000000..0e2d16d --- /dev/null +++ b/frontend/src/Debate/Arguments/Science/ApoBCVD.elm @@ -0,0 +1,39 @@ +module Debate.Arguments.Science.ApoBCVD exposing (..) + +import Debate.Types exposing (..) + + +argumentApoBCVD : Argument +argumentApoBCVD = + { argumentTitle = "Argument for Atherogenic ApoB" + , propositionTitle = "ApoB-containing lipoproteins dose-dependently cause atherosclerosis." + , propositionSummary = "Summary" + , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qw)|=(Pw)" + , definitionTable = + [ { definiendum = "P(x)" + , definiens = "(x) dose-dependently causes atherosclerosis" + } + , { definiendum = "Q(x)" + , definiens = "(x) consistently, linearly, and proportionately associates with increased plaque volume after adjustment or control over relevant confounders and covariates" + } + , { definiendum = "x" + , definiens = "a substance" + } + , { definiendum = "w" + , definiens = "ApoB-containing lipoproteins" + } + ] + , argumentFormalization = + [ { premises = + [ { premise = "For all things, substance (x) dose-dependently causes atherosclerosis if, and only if, substance (x) consistently, linearly, and proportionately associates with increased plaque volume after adjustment or control over relevant confounders and covariates." + , notation = "(∀x(Px↔Qx))" + } + , { premise = "ApoB-containing lipoproteins consistently, linearly, and proportionately associates with increased plaque volume after adjustment or control over relevant confounders and covariates." + , notation = "(Qw)" + } + ] + , conclusion = "" + , conclusionNotation = "(∴Pw)" + } + ] + } \ No newline at end of file diff --git a/frontend/src/Debate/Arguments/Veganism/AntiRewilding.elm b/frontend/src/Debate/Arguments/Veganism/AntiRewilding.elm old mode 100755 new mode 100644 index 1dfbe51..57074eb --- a/frontend/src/Debate/Arguments/Veganism/AntiRewilding.elm +++ b/frontend/src/Debate/Arguments/Veganism/AntiRewilding.elm @@ -5,47 +5,47 @@ import Debate.Types exposing (..) argumentAntiRewilding : Argument argumentAntiRewilding = - { argumentTitle = "Vegan Society Definition Reductio" - , propositionTitle = "It is vegan to eat Groot." + { argumentTitle = "Argument Against Rewilding" + , propositionTitle = "Rewilding sentient animals is immoral." , propositionSummary = "Summary" - , proofLink = "https://www.umsu.de/trees/#(~6x(Vx~4~3Ex)),(~6x~6y(~3Ax~5~3E(e(y)))),(~3Ag)%7C=(V(e(g)))" + , proofLink = "https://www.umsu.de/trees/#(~6x(Wx~5~3Nx)),(Wa),(~3Na~5~3F),(~3F~5Ra)|=(Ra)" , definitionTable = - [ { definiendum = "V(x)" - , definiens = "it is vegan to do (x)" + [ { definiendum = "W(x)" + , definiens = "(x) has negative rights" } - , { definiendum = "E(x,y)" - , definiens = "(x) exploits (y)" + , { definiendum = "N(x)" + , definiens = "we should defend (x) from rights violations to any lesser degree than we would tolerate for humans" } - , { definiendum = "A(x)" - , definiens = "(x) is an animal" + , { definiendum = "F" + , definiens = "it is permissible to subject animals to conditions that are likely to involve predation, starvation, or death due to environmental exposure to any greater degree than we would tolerate for humans" } - , { definiendum = "x" + , { definiendum = "R(a)" + , definiens = "rewilding sentient animals is immoral" + } + , { definiendum = "x" , definiens = "a being" } - , { definiendum = "y" - , definiens = "an animal" - } - , { definiendum = "e" - , definiens = "eat" - } - , { definiendum = "g" - , definiens = "Groot" + , { definiendum = "sentient animals" + , definiens = "a" } ] , argumentFormalization = [ { premises = - [ { premise = "For all things, it is vegan to do something if and only if that thing does not exploit animals." - , notation = "(∀x(Vx↔¬Ex))" + [ { premise = "For all things, if a being (x) has negative rights, then we should not defend a being (x) from rights violations to any lesser degree than we would tolerate for humans." + , notation = "(∀x(Wx→¬Nx))" } - , { premise = "If some beings are not animals, then eating those beings does not exploit animals." - , notation = "(∀x∀y(¬Ax→¬E(e(y))))" + , { premise = "Sentient animals have negative rights." + , notation = "(Wa)" } - , { premise = "Groot is not an animal." - , notation = "(¬Ag)" + , { premise = "If we should not defend sentient animals from rights violations to any lesser degree than we would tolerate for humans, then it is not permissible to subject sentient animals to conditions that are likely to involve predation, starvation, or death due to environmental exposure to any greater degree than we would tolerate for humans." + , notation = "(¬Na→¬F)" + } + , { premise = "If it is not permissible to subject sentient animals to conditions that are likely to involve predation, starvation, or death due to environmental exposure to any greater degree than we would tolerate for humans, then rewilding sentient animals is immoral." + , notation = "(¬F→Ra)" } ] - , conclusion = "Therefore, it is vegan to eat Groot." - , conclusionNotation = "(∴V(e(g)))" + , conclusion = "Therefore, rewilding sentient animals is immoral." + , conclusionNotation = "(∴Ra)" } ] } \ No newline at end of file diff --git a/frontend/src/Debate/Arguments/Veganism/VeganSocietyReductio.elm b/frontend/src/Debate/Arguments/Veganism/VeganSocietyReductio.elm new file mode 100755 index 0000000..7850e2d --- /dev/null +++ b/frontend/src/Debate/Arguments/Veganism/VeganSocietyReductio.elm @@ -0,0 +1,51 @@ +module Debate.Arguments.Veganism.VeganSocietyReductio exposing (..) + +import Debate.Types exposing (..) + + +argumentVeganSocietyReductio : Argument +argumentVeganSocietyReductio = + { argumentTitle = "Vegan Society Definition Reductio" + , propositionTitle = "It is vegan to eat Groot." + , propositionSummary = "Summary" + , proofLink = "https://www.umsu.de/trees/#(~6x(Vx~4~3Ex)),(~6x~6y(~3Ax~5~3E(e(y)))),(~3Ag)%7C=(V(e(g)))" + , definitionTable = + [ { definiendum = "V(x)" + , definiens = "it is vegan to do (x)" + } + , { definiendum = "E(x,y)" + , definiens = "(x) exploits (y)" + } + , { definiendum = "A(x)" + , definiens = "(x) is an animal" + } + , { definiendum = "x" + , definiens = "a being" + } + , { definiendum = "y" + , definiens = "an animal" + } + , { definiendum = "e" + , definiens = "eat" + } + , { definiendum = "g" + , definiens = "Groot" + } + ] + , argumentFormalization = + [ { premises = + [ { premise = "For all things, it is vegan to do something if and only if that thing does not exploit animals." + , notation = "(∀x(Vx↔¬Ex))" + } + , { premise = "If some beings are not animals, then eating those beings does not exploit animals." + , notation = "(∀x∀y(¬Ax→¬E(e(y))))" + } + , { premise = "Groot is not an animal." + , notation = "(¬Ag)" + } + ] + , conclusion = "Therefore, it is vegan to eat Groot." + , conclusionNotation = "(∴V(e(g)))" + } + ] + } \ No newline at end of file diff --git a/frontend/src/Pages/Arguments.elm b/frontend/src/Pages/Arguments.elm index bb2c0d3..245d2c2 100755 --- a/frontend/src/Pages/Arguments.elm +++ b/frontend/src/Pages/Arguments.elm @@ -6,7 +6,7 @@ import Config.Identity as I exposing (..) import Debate.Arguments.Ancestry.AntagonisticPleiotropy exposing (..) import Debate.Arguments.Ancestry.HealthSeeker exposing (..) import Debate.Arguments.Ancestry.ImmortalityReductio exposing (..) -import Debate.Arguments.Ancestry.PolyphenolReductio exposing (..) +import Debate.Arguments.Nutrition.PolyphenolReductio exposing (..) import Debate.Arguments.Ethics.Abortion exposing (..) import Debate.Arguments.Ethics.EfilismPatrolSquad exposing (..) import Debate.Arguments.Ethics.EthicalSlurs exposing (..)