feat: added arguments

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)))"
+          }
+        ]
+    }