feat: uncucked my arguments

frontend/src/Debate/Arguments/VeganSocietyReductio.elm

@@ -0,0 +1,53 @@
+module Debate.Arguments.VeganSocietyReductio exposing (..)
+
+import Debate.Types exposing (..)
+
+
+argumentVeganSocietyReductio : Argument
+argumentVeganSocietyReductio =
+    { argumentTitle = "Vegan Society Definition Reductio"
+    , propositionTitle = "It is vegan to eat Groot."
+    , propositionReductio = ""
+    , propositionSummary = "Summary"
+    , proofLink  = "https://www.umsu.de/trees/#(~6x(Px~4~3Qx)),(~6x~6y(~3Rx~5~3Q(e(y)))),(~3Rg)%7C=(P(e(g)))"
+    
+    , definitionTable =
+        [ { definiendum = "P(x)"
+          , definiens = "it is vegan to do (x)"
+          }
+        , { definiendum = "Q(x,y)"
+          , definiens = "(x) exploits (y)"
+          }
+        , { definiendum = "R(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(Px↔¬Qx)"
+                  }
+                , { premise = "If some beings are not animals, then eating those beings does not exploit animals."
+                  , notation = "∀x∀y(¬Rx→¬Q(e(y)))"
+                  }
+                , { premise = "Groot is not an animal."
+                  , notation = "¬Rg"
+                  }
+                ]
+          , conclusion = "Therefore, it is vegan to eat Groot."
+          , conclusionNotation = "P(e(g))"
+          }
+        ]
+    }