feat: added gibberish page and argument summaries

frontend/src/Config/Identity.elm

@@ -7,6 +7,7 @@ type alias PageInput =
     , pageContact : String
     , pageDebate : String
     , pageDodgers : String
+    , pageGibberish : String
     , pageHyperBlog : String
     , pageInterviews : String
     , pageNutriDex : String
@@ -22,6 +23,7 @@ pageNames =
     , pageServices = "services"
     , pageDodgers = "cuckList"
     , pageDebate = "arguments"
+    , pageGibberish = "gibberish"
     , pageHyperBlog = "hyperBlog"
     , pageNutriDex = "nutriDex"
     , pageInterviews = "interviews"
@@ -60,6 +62,11 @@ dodgersName =
     createPageName pageNames.pageDodgers
 
 
+gibberishName : String
+gibberishName =
+    createPageName pageNames.pageGibberish
+
+
 hyperBlogName : String
 hyperBlogName =
     createPageName pageNames.pageHyperBlog

frontend/src/Contact/Helpers.elm

@@ -299,6 +299,11 @@ orangeFormat =
     ]
 
 
+rounding : Attribute msg
+rounding =
+    D.rounded 10
+
+
 termsAndConditions : List (List (Element msg))
 termsAndConditions =
     [ [ row [ alignLeft ]
@@ -313,35 +318,53 @@ termsAndConditions =
     , [ row [ alignLeft ]
             [ text "You will join the "
             , newTabLink []
-                { url = ""
+                { url = "https://discord.com/invite/VzU8yCvYX8"
-                , label = el orangeFormat <| text "upRootNutrition Discord Server"
+                , label = el orangeFormat <| text "upRootNutrition"
                 }
-            , text " (if you haven't already)."
+            , text " Discord Server (if you haven't already)."
             ]
       ]
     , [ el [ alignLeft ] <| text "You will click the \"😃\" emoji to enter the server (if you haven't already)." ]
     , [ row [ alignLeft ]
             [ text "You will locate the "
             , newTabLink []
-                { url = ""
+                { url = "https://discord.com/channels/692563032546476062/826225570219687956"
                 , label = el orangeFormat <| text "💻┃general"
                 }
             , text " channel in General category."
             ]
       ]
-    , [ column [ alignLeft, width fill, spacing 10 ]
+    , [ row [ F.alignLeft, alignLeft ]
-            [ row [ alignLeft ] [ paragraph [] [ text "You will post exactly this in the 💻┃general channel:" ] ]
+            [ paragraph [ alignLeft ]
-            , row [ alignLeft ]
+                [ text "You will post exactly this in the "
-                [ paragraph
+                , newTabLink []
+                    { url = "https://discord.com/channels/692563032546476062/826225570219687956"
+                    , label = el orangeFormat <| text "💻┃general"
+                    }
+                , text " channel:"
+                ]
+            , column
                 [ paddingEach
-                        { top = 0
+                    { top = 10
-                        , bottom = 0
+                    , bottom = 10
-                        , left = 20
+                    , left = 0
                     , right = 0
                     }
+                , alignLeft
                 ]
-                    [ text "• "
+                [ column
-                    , text "\"@Moderators I have a criticism for Nick.\""
+                    [ paddingEach
+                        { top = 15
+                        , bottom = 15
+                        , left = 20
+                        , right = 20
+                        }
+                    , B.color colourTheme.backgroundLightGrey
+                    , rounding
+                    , width fill
+                    , spacing 8
+                    ]
+                    [ text "\"@Moderators I have a criticism for Nick.\""
                     ]
                 ]
             ]
@@ -350,38 +373,48 @@ termsAndConditions =
     , [ row [ alignLeft ]
             [ text "You will locate the "
             , newTabLink []
-                { url = ""
+                { url = "https://discord.com/channels/692563032546476062/1301247050796634182"
                 , label = el orangeFormat <| text "🔎┃criticism"
                 }
             , text " channel in the General category."
             ]
       ]
     , [ row [ alignLeft ]
+            [ paragraph [ F.alignLeft ]
                 [ text "You will post your criticism in the "
                 , newTabLink []
-                { url = ""
+                    { url = "https://discord.com/channels/692563032546476062/1301247050796634182"
                     , label = el orangeFormat <| text "🔎┃criticism"
                     }
                 , text " channel with this exact format:"
                 ]
             ]
-    , [ column
+      , column
+            [ paddingEach
+                { top = 10
+                , bottom = 10
+                , left = 0
+                , right = 0
+                }
+            , alignLeft
+            ]
+            [ column
                 [ paddingEach
                     { top = 15
                     , bottom = 15
                     , left = 20
-                , right = 15
+                    , right = 20
                     }
                 , B.color colourTheme.backgroundLightGrey
-            , D.rounded 30
+                , rounding
                 , width fill
                 , spacing 8
                 ]
-            [ text "Hello, <@191027366640877568>, I have a criticism for you."
+                [ text "\"Hello, <@191027366640877568>, I have a criticism for you."
                 , row [ alignLeft ]
                     [ paragraph []
                         [ text "Proposition: "
-                    , el [ darkFormat ] <| text "specify the exact proposition you are addressing."
+                        , el [ darkFormat ] <| text "specify the ecxact proposition you are addressing."
                         ]
                     ]
                 , row [ alignLeft ]
@@ -406,6 +439,8 @@ termsAndConditions =
                     [ paragraph []
                         [ text "Additional Comments: "
                         , el [ darkFormat ] <| text "any other relevant thoughts or context."
+                        , text "\""
+                        ]
                     ]
                 ]
             ]
@@ -414,7 +449,7 @@ termsAndConditions =
     , [ row [ alignLeft ]
             [ text "You will not post anything other than criticisms in the "
             , newTabLink [ alignLeft ]
-                { url = ""
+                { url = "https://discord.com/channels/692563032546476062/1301247050796634182"
                 , label = el orangeFormat <| text "🔎┃criticism"
                 }
             , text " channel."

frontend/src/Debate/Arguments/Abortion.elm

@@ -8,7 +8,7 @@ argumentAbortion =
     { argumentTitle = "Argument Against Sentient Abortions"
     , propositionTitle = "One's whims are not a sufficient justification for the termination of sentient human life."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Consenting to becoming pregnant, or at least implicitly accepting the risks of pregnancy by engaging in reckless sex, should disqualify one from having the opportunity to a abort a sentient fetus if the pregnancy doesn't pose a significant health risk to the mother."
     , proofLink = "https://www.umsu.de/trees/#(P~2Q~5R),(P),(Q),((R~1F~1~3H)~5M),(F),(~3H),(M~5~3W)%7C=(~3W)"
     , argumentCertainty = 6
     , argumentImage = "abortion"

frontend/src/Debate/Arguments/Agnosticism.elm

@@ -8,7 +8,7 @@ argumentAgnosticism =
     { argumentTitle = "Agnosticism Consistency Checker"
     , propositionTitle = "An interlocutor (who cannot unpack what evidence would lead them to change their doxastic attitude on a proposition) should temporarily withhold the belief that the proposition at hand is true."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Listen, if one doesn't know what would change their mind on a topic, about which they form strong opinions, then it's not clear why they'd even hold said opinions strongly in the first place. Given this, it would make more sense just to suspend your judgement in the meantime and form no opinions on the subject."
     , proofLink = "https://www.umsu.de/trees/#(~6x~6y(~3Pxy~5~3Qxy)),(~6x~6y(~3Qxy~5Rxy)),(~3Por)|=(Ror)"
     , argumentCertainty = 9
     , argumentImage = "agnostic"

frontend/src/Debate/Arguments/AgriculturalPredation.elm

@@ -8,9 +8,8 @@ argumentAgriculturalPredation =
     { argumentTitle = "Argument for Animal Agirculture as Predation"
     , propositionTitle = "Animal agriculture counts as predation."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Some vegans suggest that killing odd order predators is wrong because predation is permissible. However, if animal agriculture also counts as predation, it's analytically entailed that animal agriculture is permissible as well."
     , proofLink = "https://www.umsu.de/trees/#(~6x~6y~6z(Px~4Qxyz~1(Rxyz~2Sxyz)~1Wxyz)),(Qahl),(Rahl~2Sahl),(Wahl)%7C=(Pa)"
-    
     , argumentCertainty = 10
     , argumentImage = "predatoragriculture"
     , definitionTable =

frontend/src/Debate/Arguments/AnimalRights.elm

@@ -8,7 +8,7 @@ argumentAnimalRights =
     { argumentTitle = "Argument for Animal Rights"
     , propositionTitle = "We should not exploit animals to any greater degree than we would tolerate for humans."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , 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

frontend/src/Debate/Arguments/AntiRewilding.elm

@@ -8,7 +8,7 @@ argumentAntiRewilding =
     { argumentTitle = "Argument Against Rewilding"
     , propositionTitle = "Rewilding sentient animals is immoral."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "I view animal rights as the logical extension of trait-adjusted human rights to non-human animals. I think humans have the right not to be bred into wild circumstances where they're faced with the full brutality of the natural world, and by extension I think non-human animals have this right too."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~5~3Qx)),(Pa),(~3Qa~5~3R),(~3R~5Sa)|=(Sa)"
     , argumentCertainty = 10
     , argumentImage = "rewilding"

frontend/src/Debate/Arguments/AntiVandalism.elm

@@ -8,10 +8,9 @@ argumentAntiVandalism =
     { argumentTitle = "Argument Against Zoo Vandalism"
     , propositionTitle = "Vandalizing zoos increases the probability of harming the animals they keep."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "The more we pressure institutions that hold innocent animals captive to direct their funds to endeavours or projects unrelated to animal care, the less money those institutions are going to have to devote to animal care."
     , proofLink = "https://www.umsu.de/trees/#(P~5Q),(P),(Q~5R)%7C=(R)"
-    
+    , argumentCertainty = 8
-    , argumentCertainty = 7
     , argumentImage = "antivandalism"
     , definitionTable =
         [ { definiendum = "P"

frontend/src/Debate/Arguments/BoobyTrapPagers.elm

@@ -8,9 +8,8 @@ argumentBoobyTrapPagers =
     { argumentTitle = "Argument Against Israeli Pagers as Booby-Traps"
     , propositionTitle = "The Israeli pagers were not booby-traps."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Based on the definitions found in the IHL Databases, it's unlikely that the Israeli pager bombs qualify as booby-traps. However, there is sufficient ambiguity in the language that I'm not convinced it's necessarily an analytical truth."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4(Qx~1Rx~1Sx))),(Qp),(Rp),(~3Sp)|=(~3Pp)"
-    
     , argumentCertainty = 4
     , argumentImage = "pagers"
     , definitionTable =

frontend/src/Debate/Arguments/DairyCowRape.elm

@@ -8,7 +8,7 @@ argumentDairyCowRape =
     { argumentTitle = "Argument for Dairy Cattle Being Raped"
     , propositionTitle = "A bull mating with a cow qualifies as rape."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "It's not clear that non-human animal procreation isn't an example of rape if we take sexual interaction in the absence of informed concent to be rape. So, it seems to follow the a bull making with a cow is rape."
     , proofLink  = "https://www.umsu.de/trees/#(~6x~6y(Px~4(Qxy~1~3Ryx))),(Qae),(~3Rea)|=(Pa)"
     
     , argumentCertainty = 10

frontend/src/Debate/Arguments/EpidemiologyCausality.elm

@@ -8,7 +8,7 @@ argumentEpidemiologyCausality =
     { argumentTitle = "Argument for Nutritional Epidemiology"
     , propositionTitle = "Nutritional epidemiology generally provides good causal estimates."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "It's just straightforwardly the case that nutritional epidemiology has outstanding translation rates with randomized controlled trials, or at least these is overwhelmingly consistent compatibility in the results. If randomized controlled trials are the standard against which other research methods are to be evaluated, it's not clear why nutritional epidemiology wouldn't be trustworthy in the aggregate."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~5Qx)),(Pe)|=(Qe)"
     
     , argumentCertainty = 8

frontend/src/Debate/Arguments/EthicalSlurs.elm

@@ -8,7 +8,7 @@ argumentEthicalSlurs =
     { argumentTitle = "Argument for Using the Term Retard"
     , propositionTitle = "It is generally permissible to use the term retard with an altered non-bigoted meaning."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "The only historical examples of bigoted terms, such as slurs, becoming non-harmful to the demographics toward which they were historically targeted involve literally changing the usage of the term to something non-bigoted. I don’t see any historical precedent for a methodology that has been as successful in achieving this goal as altering the term's usage. Such as using the term \"nigga\" to mean \"friend\", for example."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(~6x(~3Px~5Rx)),(~3Pr),(~3Qr~1Rr~5Sr),(Sr~5Wr)|=(Wr)"
     , argumentCertainty = 7
     , argumentImage = "ethicalslurs"

frontend/src/Debate/Arguments/FineTuning.elm

@@ -8,7 +8,7 @@ argumentFineTuning =
     { argumentTitle = "Fine Tuning Debunk"
     , propositionTitle = "Fine tuning is an infinitely regressive explanation for God"
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "It's not clear why God's constitution wouldn't count as finely tuned, and to the extent that it does count as finely-tuned, it's by extension unclear why fine-tuning wouldn't be an infinitely regressive argument for God's existence."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~5Qx)),(Pg),(Qg~5R)%7C=(R)"
     , argumentCertainty = 10
     , argumentImage = "finetuning"

frontend/src/Debate/Arguments/ImmortalityReductio.elm

@@ -7,10 +7,9 @@ argumentImmortalityReductio : Argument
 argumentImmortalityReductio =
     { argumentTitle = "Appeal to Nature Immortality Reductio"
     , propositionTitle = "Senescence does not result in death."
-    , propositionReductio = ""
+    , propositionReductio = "People who appeal to nature in this fashion assert that death cannot result from natural biological processes. Usually this is asserted in order to avoid accepting that LDL is causative of atherosclerosis."
-    , propositionSummary = "Summary"
+    , propositionSummary = "If one commits to this variation of the appeal to nature fallacy, it's unclear why they wouldn't be subsequently committed to affirm that humans are immortal, like Connor fucking MacLeod."
     , proofLink = "https://www.umsu.de/trees/#(~6x~6y(Hx~5~3Rxy)),(Hs)%7C=(~3Rsd)"
-    
     , argumentCertainty = 10
     , argumentImage = "immortality"
     , definitionTable =

frontend/src/Debate/Arguments/Malondialdehyde.elm

@@ -7,7 +7,7 @@ argumentMalondialdehyde : Argument
 argumentMalondialdehyde =
     { argumentTitle = "Atherogenic Omega-3 Reductio"
     , propositionTitle = "Omega-3s are atherogenic."
-    , propositionReductio = ""
+    , propositionReductio = "Certain anti-seed oil proponents assert that seed oils cause atherosclerosis via omega-6-derived malondialdehyde, and that this is the only cause of atherosclerosis. However, they often also assert that omega-3 fatty acids are anti-atherogenic, despite the fact that omega-3s actually produce more malondialdehyde than omega-6s."
     , propositionSummary = "If one takes the view that in order for a substance to increase the risk of atherosclerosis, it must facilitate the oxidative modification of LDL particles via malondialdehyde production, and one also affirms that omega-3s are anti-atherogenic, then this would imply that all fatty acids that produce malondialdehyde, including omega-3s, must also be atherogenic, which contradicts the their belief that omega-3s are heart-healthy."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qm),(Pm~5~6x(Rx))%7C=(Ro)"
     , argumentCertainty = 6

frontend/src/Debate/Arguments/OddOrderPredators.elm

@@ -7,7 +7,7 @@ argumentOddOrderPredators : Argument
 argumentOddOrderPredators =
     { argumentTitle = "Argument for Culling Odd Order Predators"
     , propositionTitle = "It is permissible to prevent predation with lethal force to the same degree we would tolerate for humans."
-    , propositionReductio = ""
+    , propositionReductio = "I view animal rights as the logical extension of trait-adjusted human rights to non-human animals. I think humans have the right not to be exposed to circumstances where they're hunted for food, and I think it is permissible to use lethal force to save the lives of the hunted, all else equal. By extension I think non-human animals have this right too."
     , propositionSummary = "Summary"
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~5~3Qx)),(Pa),(~3Qa~5R)%7C=(R)"
     , argumentCertainty = 10

frontend/src/Debate/Arguments/Ostroveganism.elm

@@ -8,9 +8,8 @@ argumentOstroveganism =
     { argumentTitle = "Argument for Vegan Bivalves"
     , propositionTitle = "Bivalves are not likely to be sentient."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "I view animal rights as the logical extension of trait-adjusted human rights to non-human animals. However, I do not believe that non-sentient human bodies, such as brainless or brain-dead human bodies, have such human rights. By extension, I don't believe that non-human animals that lack brains possess these rights either."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx~1Rx~1(Sx~2Wx))),(Qc~1~3Rc~1Sc~1~3Wc),(~3Pc~5~6x(~3Tx))|=(~3Tb)"
-    
     , argumentCertainty = 10
     , argumentImage = "ostroveganism"
     , definitionTable =

frontend/src/Debate/Arguments/PollinationReductio.elm

@@ -7,10 +7,9 @@ argumentPollinationReductio : Argument
 argumentPollinationReductio =
     { argumentTitle = "Vegan Anti-Pollination Reductio"
     , propositionTitle = "Apples are not vegan"
-    , propositionReductio = ""
+    , propositionReductio = "Some vegans hold to a deontic principle that any form of animal exploitation is wrong, and the products of exploitation are to be boycotted and designated non-vegan."
-    , propositionSummary = "Summary"
+    , propositionSummary = "If one accepts that no animal exploitation is permissible, they're committed to some truly hilarious positions, such as apples not being vegan because we exploit the natural behaviour of bees to pollinate our apple trees."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4~3Qx)),(Qb),(~3Pb~5~6y(~3Ry))|=(~3Ra)"
-    
     , argumentCertainty = 10
     , argumentImage = "pollinationreductio"
     , definitionTable =

frontend/src/Debate/Arguments/PolyphenolReductio.elm

@@ -7,10 +7,9 @@ argumentPolyphenolReductio : Argument
 argumentPolyphenolReductio =
     { argumentTitle = "Anti-Polyphenol Reductio"
     , propositionTitle = "Anti-polyphenol, ancestral diet advocates are committed to favouring GMOs."
-    , propositionReductio = "asdasd"
+    , propositionReductio = "Some carnivore diet proponents suggest that phytochemical compounds, such as polyphenols, are actually harmful to human beings."
     , propositionSummary = "If one is committed to the notions that polyphenols in plants are bad for humans, and that grass-fed red meat is the healthiest available type of red meat, then they're pragmatically committed to being pro-GMO to lower the grass-derived polyphenol content of grass-fed beef."
     , proofLink = "https://www.umsu.de/trees/#(~6x~6y(Px~1Qxy~5Rxy)),(Pp),(Qpg),(Rpg~5Spg),(Spg~5Wp)|=(Wp)"
-    
     , argumentCertainty = 7
     , argumentImage = "polyphenolreductio"
     , definitionTable =

frontend/src/Debate/Arguments/ScratcherPioneers.elm

@@ -7,10 +7,9 @@ argumentScratcherPioneers : Argument
 argumentScratcherPioneers =
     { argumentTitle = "Tattoo Pioneers were Scratchers"
     , propositionTitle = "The original trailblazers of modern tattooing were scratchers."
-    , propositionReductio = ""
+    , propositionReductio = "Some tattoo artists condemn scratchers and their associated culture due to poor observation of sanitation standards and lack of mentorship and also simultaneously hold the original trailblazers of the tattoo industry in high esteem."
-    , propositionSummary = "Summary"
+    , propositionSummary = "If what qualifies a given tattoo artist as a scratcher is poor observation of sanitation standards and lack of mentorship, then it's just straightforwardly entailed that the original trailblazers of the tattoo industry were scratchers."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx~2Rx~2Sx)),(Qt),(Rt),(St)%7C=(Pt)"
-    
     , argumentCertainty = 10
     , argumentImage = "tattooscratchers"
     , definitionTable =

frontend/src/Debate/Arguments/TransPeople.elm

@@ -8,9 +8,8 @@ argumentTransPeople =
     { argumentTitle = "Argument For Trans Identity"
     , propositionTitle = "A trans person of the male sex is a woman and a trans person with female sex is a man."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Virtually 100% of the debate surrounding trans identity is merely a trivial semantic disagreement about what constitutes a man or a woman. Below is a formal argument for characterization of a man and a women that maximally satisfies both parties and minimizes absurdities."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Rx~1Wx)),(~6x(Qx~4Sx~1Wx)),(Ra~1Wa),(Sg~1Wg)|=(Pa~1Qg)"
-    
     , argumentCertainty = 10
     , argumentImage = "transpeople"
     , definitionTable =

frontend/src/Debate/Arguments/TruncatedMeta.elm

@@ -8,9 +8,8 @@ argumentTruncatedMeta =
     { argumentTitle = "Argument For Truncated Meta-Analysis"
     , propositionTitle = "Meta-analytic summations that include adequately powered studies to the exclusion of insufficiently powered studies will provide better causal estimates than meta-analytic summations that include both adequately powered studies and insufficiently powered studies."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Some people argue that omission of studies from meta-analysis is bad form because the more point estimates, the better. However, I argue that there are circumstances where including more studies can actually lower the quality of causal estimates."
     , proofLink = "https://www.umsu.de/trees/#(P~5Q),(P)%7C=(Q)"
-    
     , argumentCertainty = 7
     , argumentImage = "truncatedmetas"
     , definitionTable =

frontend/src/Debate/Arguments/UnhealthyCoconutOil.elm

@@ -8,9 +8,8 @@ argumentUnhealthyCoconutOil =
     { argumentTitle = "Argument For Atherogenic Coconut Oil"
     , propositionTitle = "There is not a reason to believe that coconut oil is any better for heart health than other saturated fat sources that increase LDL-C."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "LDL causally associates with heart disease in a linear and proportional manner, and in all cases exposures that durably increase LDL over time produce likewise increases in heart disease risk. Coconut oil is one such exposure."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~1Qx~5~3Rx)),(Pc),(Qc)|=(~3Rc)"
-    
     , argumentCertainty = 9
     , argumentImage = "coconutoil"
     , definitionTable =

frontend/src/Debate/Arguments/UnhealthyProcessedMeat.elm

@@ -8,9 +8,8 @@ argumentUnhealthyProcessedMeat =
     { argumentTitle = "Argument for Unhealthy Processed Meat"
     , propositionTitle = "Processed meat is overwhelmingly unhealthy."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Even when you account for factors that could plausibly influence the results, processed meat has been shown to consistently increase the risk of morbidity and mortality, strongly suggesting that they directly contribute to worse health outcomes, particularly with respect to colorectal cancer and heart disease."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qs)|=(Ps)"
-    
     , argumentCertainty = 8
     , argumentImage = "processedmeat"
     , definitionTable =

frontend/src/Debate/Arguments/UnhealthyRedMeat.elm

@@ -8,9 +8,8 @@ argumentUnhealthyRedMeat =
     { argumentTitle = "Argument for Unhealthy Red Meat"
     , propositionTitle = "Red meat and processed meat are overwhelmingly unhealthy."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Even when you account for factors that could plausibly influence the results, unprocessed red meat has been shown to consistently increase the risk of morbidity and mortality, strongly suggesting that they directly contribute to worse health outcomes, particularly with respect to colorectal cancer and heart disease."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qm)|=(Pm)"
-    
     , argumentCertainty = 7
     , argumentImage = "redmeat"
     , definitionTable =

frontend/src/Debate/Arguments/UnhealthySaturatedFat.elm

@@ -8,9 +8,8 @@ argumentUnhealthySaturatedFat =
     { argumentTitle = "Argument Against Saturated Fat"
     , propositionTitle = "Most sources of saturated fat are overwhelmingly unhealthy."
     , propositionReductio = ""
-    , propositionSummary = "Summary"
+    , propositionSummary = "Even when you account for factors that could plausibly influence the results, most animal-derived saturated fats have been shown to consistently increase the risk of morbidity and mortality, strongly suggesting that they directly contribute to worse health outcomes, particularly with respect to heart disease and non-alcoholic fatty liver disease."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4Qx)),(Qf)|=(Pf)"
-    
     , argumentCertainty = 9
     , argumentImage = "saturatedfat"
     , definitionTable =

frontend/src/Debate/Arguments/VeganSocietyReductio.elm

@@ -7,8 +7,8 @@ argumentVeganSocietyReductio : Argument
 argumentVeganSocietyReductio =
     { argumentTitle = "Vegan Society Definition Reductio"
     , propositionTitle = "It is vegan to eat Groot."
-    , propositionReductio = ""
+    , propositionReductio = "Those who hold to the Vegan Society's definition of veganism index the object of moral value to belonging to the animal kingdom."
-    , propositionSummary = "Summary"
+    , propositionSummary = "If one holds to the position that exploiting a being is wrong so long as that being is an animal, then it is straightforwardly entailed that exploiting creatures like Groot would be an action compatible with veganism."
     , proofLink = "https://www.umsu.de/trees/#(~6x(Px~4~3Qx)),(~6x~6y(~3Rx~5~3Q(e(y)))),(~3Rg)%7C=(P(e(g)))"
     , argumentCertainty = 10
     , argumentImage = "vegansociety"

frontend/src/Debate/Gibberish/Domains/Epistemology.elm

@@ -1,41 +1,47 @@
 module Debate.Gibberish.Domains.Epistemology exposing (..)
 
+import Debate.Gibberish.Helpers exposing (gibberishTitle)
 import Debate.Gibberish.Types exposing (..)
 
 
-epistemologyGibberish : Domain
+epistemologyGibberish : Gibberish
 epistemologyGibberish =
-    { gibberishDomainName = "Epistemology"
+    let
+        name =
+            "Epistemology"
+    in
+    { gibberishTitle = name
+    , gibberishImage = formatName name
     , gibberishTerms =
         [ { term = "abductive arguments"
-          , explanation = ""
+          , explanation = SpecificExplanation "In a formal sense, I take an argument to be logical construct whereby the outputs consistently follow from an input, or set of inputs, according to a formal system of internally consistent rules or laws. Traditionally, abductive arguments are taken to fall outside this scope, so on my interpretation, the term \"abductive argument\" is probably gibberish."
           }
         , { term = "content internalism"
-          , explanation = ""
+          , explanation = NoClue
           }
         , { term = "direct reference"
-          , explanation = ""
+          , explanation = SpecificExplanation "I don't understand the term usage as it's been used and unpacked in conversation. I don't understand what it means for a word to \"point to\" an object, and I also don't understand what semantic advantage or distinction this has to a mundane, ostensibly non-direct reference to an object in speech."
           }
         , { term = "externalist epistemology"
-          , explanation = ""
+          , explanation = SpecificExplanation "I don't take anything other than logic to be justification-giving. As such, any position that claims that justification can arrive through non-inferential means, such as mechanisms operating outside the mind, just sounds like gibberish."
           }
         , { term = "inductive arguments"
-          , explanation = ""
+          , explanation = SpecificExplanation "In a formal sense, I take an argument to be logical construct whereby the outputs consistently follow from an input, or set of inputs, according to a formal system of internally consistent rules or laws. Traditionally, inductive arguments are taken to fall outside this scope, so on my interpretation, the term \"inductive argument\" is probably gibberish."
           }
         , { term = "non-entailing explanations"
-          , explanation = ""
+          , explanation = SpecificExplanation "I take an explanation to be a set of premises that lead to a conclusion, so the term just sounds like some sort of contradiction."
           }
         , { term = "non-inferential justification"
-          , explanation = ""
+          , explanation = SpecificExplanation "I don't take anything other than logic to be justification-giving. As such, any position that claims that justification can arrive through non-inferential means just sounds like gibberish."
           }
         , { term = "phenomenal conservatism"
-          , explanation = ""
+          , explanation = SpecificExplanation "I don't take anything other than logic to be justification-giving. As such, any position that claims that justification can arrive through non-inferential means, such as merely having a seeming, just sounds like gibberish."
           }
         , { term = "synthetic a priori"
-          , explanation = ""
+          , explanation = SpecificExplanation "I take a priori arguments to be arguments based on principles or axioms and not based on experience, which would seem to place a priori outside the purview of syntheticity."
           }
         , { term = "ultimate grounding"
-          , explanation = ""
+          , explanation = SpecificExplanation "It's completely unclear what this theo-babble is meant to communicate. I assume it has something to do with the absence of antecedent conditions and/or irreducibility that provide some sort of \"best epistemology\" or something, but I can't be sure. It just sounds like gobbledy"
           }
         ]
     }

frontend/src/Debate/Gibberish/Domains/Metaphysics.elm

@@ -3,33 +3,29 @@ module Debate.Gibberish.Domains.Metaphysics exposing (..)
 import Debate.Gibberish.Types exposing (..)
 
 
-metaphysicsGibberish : Domain
+metaphysicsGibberish : Gibberish
 metaphysicsGibberish =
-    { gibberishDomainName = "Metaphysics"
+    let
+        name =
+            "Metaphysics"
+    in
+    { gibberishTitle = name
+    , gibberishImage = formatName name
     , gibberishTerms =
         [ { term = "correspondence theory of truth"
-          , explanation = ""
+          , explanation = SpecificExplanation "While I do take there to be a world outside my perception, and I do believe that the correspondence between my perceptions and the world outside of my perceptions would be a good way to infer the relative truth value of a proposition, this doesn't seem a definition of truth that is in any way actionable. This, to me, makes the correspondence theory of truth to be practically useless."
-          }
-        , { term = "libertarian free will"
-          , explanation = ""
           }
         , { term = "metaphysical essence"
-          , explanation = ""
+          , explanation = NoClue
           }
         , { term = "metaphysical modality"
-          , explanation = ""
+          , explanation = SpecificExplanation "Any attempt at unpacking this that I've heard has more or less cashed out into a logical modality, but it seems to be taken as distinct from logical modality. As a non-logical modality, I have no idea what it's supposed to be."
           }
         , { term = "non-physical mental entities"
-          , explanation = ""
+          , explanation = NoClue
-          }
-        , { term = "ontological modality"
-          , explanation = ""
           }
         , { term = "subjective idealism"
-          , explanation = ""
+          , explanation = NoClue
-          }
-        , { term = "warrant"
-          , explanation = ""
           }
         ]
     }

frontend/src/Debate/Gibberish/Domains/Normativity.elm

@@ -3,21 +3,26 @@ module Debate.Gibberish.Domains.Normativity exposing (..)
 import Debate.Gibberish.Types exposing (..)
 
 
-normativityGibberish : Domain
+normativityGibberish : Gibberish
 normativityGibberish =
-    { gibberishDomainName = "Normativity"
+    let
+        name =
+            "Normativity"
+    in
+    { gibberishTitle = name
+    , gibberishImage = formatName name
     , gibberishTerms =
         [ { term = "externalist value"
-          , explanation = ""
+          , explanation = SpecificExplanation "I take value to be a concept that's indexed to the assessment of at least one agent, so a notion such as \"externalist value\" just sounds like a contradiction."
           }
         , { term = "irreducible normativity"
-          , explanation = ""
+          , explanation = SpecificExplanation "I typically don't really understand irreducibility language in philosophy. Most philosophers seem to just use it as a sort of profound-sounding placeholder for when their personal creativity for explanation runs dry. No idea what it's meant to mean here, though."
           }
         , { term = "moral particles"
-          , explanation = ""
+          , explanation = SpecificExplanation "This just sounds like a hallucination, honestly."
           }
         , { term = "stance-independent normativity"
-          , explanation = ""
+          , explanation = SpecificExplanation "I take norms to be semantically interchangeable with preferences, and I take preferences to be stance-dependent. As such, the notion of a stance-independent norm just sounds like gobbledy."
           }
         ]
     }

frontend/src/Debate/Gibberish/Domains/Ontology.elm

@@ -3,21 +3,23 @@ module Debate.Gibberish.Domains.Ontology exposing (..)
 import Debate.Gibberish.Types exposing (..)
 
 
-ontologyGibberish : Domain
+ontologyGibberish : Gibberish
 ontologyGibberish =
-    { gibberishDomainName = "Normativity"
+    let
+        name =
+            "Ontology"
+    in
+    { gibberishTitle = name
+    , gibberishImage = formatName name
     , gibberishTerms =
-        [ { term = "externalist value"
+        [ { term = "libertarian free will"
-          , explanation = ""
+          , explanation = SpecificExplanation "If libertarian free will is meant to refer to the ability to make decisions outside the constraints of determinism, then it would seem like this concept of free will purports to break causality by assuming decisions can be made without antecedent conditions. This just sounds like gibberish to me."
           }
-        , { term = "irreducible normativity"
+        , { term = "ontological modality"
-          , explanation = ""
+          , explanation = SpecificExplanation "Any attempt at unpacking this that I've heard has more or less cashed out into a logical modality, but it seems to be taken as distinct from logical modality. As a non-logical modality, I have no idea what it's supposed to be."
           }
-        , { term = "moral particles"
+        , { term = "warrant"
-          , explanation = ""
+          , explanation = SpecificExplanation "This seems to be taken to be the thing that is justification-providing on phenomenal conservative. I'm not sure what that thing is, but if it's non-inferential, then it's just gibberish."
-          }
-        , { term = "stance-independent normativity"
-          , explanation = ""
           }
         ]
     }

frontend/src/Debate/Gibberish/Domains/PhilOfLanguage.elm

@@ -3,12 +3,17 @@ module Debate.Gibberish.Domains.PhilOfLanguage exposing (..)
 import Debate.Gibberish.Types exposing (..)
 
 
-philOfLanguageGibberish : Domain
+philOfLanguageGibberish : Gibberish
 philOfLanguageGibberish =
-    { gibberishDomainName = "Philosophy of Language"
+    let
+        name =
+            "Philosophy of Language"
+    in
+    { gibberishTitle = name
+    , gibberishImage = formatName name
     , gibberishTerms =
         [ { term = "semantic primitive"
-          , explanation = ""
+          , explanation = SpecificExplanation "I typically don't really understand irreducibility language like \"primitive\" in philosophy. Most philosophers seem to just use it as a sort of profound-sounding placeholder for when their personal creativity for explanation runs dry. No idea what it's meant to mean here, though."
           }
         ]
     }

frontend/src/Debate/Gibberish/Domains/PhilOfMind.elm

@@ -3,24 +3,29 @@ module Debate.Gibberish.Domains.PhilOfMind exposing (..)
 import Debate.Gibberish.Types exposing (..)
 
 
-philOfMindGibberish : Domain
+philOfMindGibberish : Gibberish
 philOfMindGibberish =
-    { gibberishDomainName = "Philosophy of Mind"
+    let
+        name =
+            "Philosophy of Mind"
+    in
+    { gibberishTitle = name
+    , gibberishImage = formatName name
     , gibberishTerms =
         [ { term = "epiphenomenalism"
-          , explanation = ""
+          , explanation = NoClue
           }
         , { term = "mind-heart connection"
-          , explanation = ""
+          , explanation = NoClue
           }
         , { term = "parallelism"
-          , explanation = ""
+          , explanation = SpecificExplanation ""
           }
         , { term = "pre-established harmony"
-          , explanation = ""
+          , explanation = SpecificExplanation ""
           }
         , { term = "private language"
-          , explanation = ""
+          , explanation = SpecificExplanation "This seems to be taken to be describing terms that, ostensibly, refer only to internal mind-states and for which there supposedly \"can't\" be some sort of external reference upon which to base mutual understanding between agents. Supposedly, this renders such terms unintelligible to everyone else. Cool story. What in the world is meant by \"can't\", though?"
           }
         ]
     }

frontend/src/Debate/Gibberish/Domains/Theology.elm

@@ -3,27 +3,29 @@ module Debate.Gibberish.Domains.Theology exposing (..)
 import Debate.Gibberish.Types exposing (..)
 
 
-theologyGibberish : Domain
+theologyGibberish : Gibberish
 theologyGibberish =
-    { gibberishDomainName = "Theology"
+    let
+        name =
+            "Theology"
+    in
+    { gibberishTitle = name
+    , gibberishImage = formatName name
     , gibberishTerms =
         [ { term = "divine simplicity"
-          , explanation = ""
+          , explanation = SpecificExplanation "This seems to be an assertion that God is somehow not made up of multiple parts. Allegedly, God is just a single part. This is sometimes used to avoid hilarious reductios applied to the fine-tuning argument for God, by claiming that God does not have a constitution that can be finely tuned. However, I don't see why constitution must entail multiple parts anyway. Additionally, even if we grant it, it's just an empirical claim that hasn't been substantiated."
           }
         , { term = "equal ultimacy"
-          , explanation = ""
+          , explanation = NoClue
-          }
-        , { term = "fine tuning"
-          , explanation = ""
           }
         , { term = "theism"
-          , explanation = ""
+          , explanation = SpecificExplanation "I understand some God concepts, but most God concepts just sound like gibberish to me. For instance, most God concepts I've come across seem to suggest that God exists, but God exists outside the confines of what is (like physical reality) and simultaneously inhabits all space inside of what is. I have no idea how to interpret mumbo jumbo like that."
           }
         , { term = "transcendental oneness"
-          , explanation = ""
+          , explanation = SpecificExplanation "Just sounds like presuppositionalist theobabble. I don't think it means anything."
           }
         , { term = "transcendental realism"
-          , explanation = ""
+          , explanation = NoClue
           }
         ]
     }

frontend/src/Debate/Gibberish/Helpers.elm

@@ -3,15 +3,9 @@ module Debate.Gibberish.Helpers exposing (..)
 import Config.CardFormat exposing (..)
 import Config.Colour as T exposing (..)
 import Config.Format as O exposing (..)
+import Config.Identity exposing (..)
 import Config.StrengthBar exposing (..)
 import Config.ToolTip exposing (..)
-import Debate.Gibberish.Domains.Epistemology exposing (..)
-import Debate.Gibberish.Domains.Metaphysics exposing (..)
-import Debate.Gibberish.Domains.Normativity exposing (..)
-import Debate.Gibberish.Domains.Ontology exposing (..)
-import Debate.Gibberish.Domains.PhilOfLanguage exposing (..)
-import Debate.Gibberish.Domains.PhilOfMind exposing (..)
-import Debate.Gibberish.Domains.Theology exposing (..)
 import Debate.Gibberish.Types exposing (..)
 import Debate.Types exposing (..)
 import Effect exposing (Effect)
@@ -41,11 +35,18 @@ gibberishMaker gibberish =
                 [ cardContentSpacing
                     [ column
                         fieldSpacer
+                        [ paragraph
+                            (paragraphFormat
+                                ++ [ F.size 18
+                                   , F.center
+                                   ]
+                            )
                             [ domainList gibberish ]
                         ]
                     ]
                 ]
             ]
+        ]
 
 
 gibberishImage : Gibberish -> { src : String, description : String }
@@ -67,42 +68,13 @@ domainList gibberish =
         , E.width fill
         ]
     <|
-        List.map2 (\x y -> makeDomain x)
+        List.map2 (\x y -> makeTerms x y)
-            gibberish.gibberishDomain
+            gibberish.gibberishTerms
-            (List.range 1 (List.length gibberish.gibberishDomain))
+            (List.range 1 (List.length gibberish.gibberishTerms))
 
 
-makeDomain : Domain -> Element msg
+makeTerms : Terms -> Int -> Element msg
-makeDomain domain =
+makeTerms terms index =
-    column
-        (paragraphAlignLeft
-            ++ [ spacing 8
-               , E.width fill
-               ]
-        )
-        [ column
-            (paragraphBoldFormat
-                ++ [ F.size 18
-                   , alignTop
-                   , E.alignLeft
-                   , F.alignLeft
-                   , F.color colourTheme.textLightOrange
-                   ]
-            )
-            [ text domain.gibberishDomainName ]
-        , column
-            [ spacing 8
-            , E.width fill
-            ]
-          <|
-            List.map2 (\x y -> makeTerms x)
-                domain.gibberishTerms
-                (List.range 1 (List.length domain.gibberishTerms))
-        ]
-
-
-makeTerms : Terms -> Element msg
-makeTerms terms =
     column
         (paragraphAlignLeft
             ++ [ spacing 8
@@ -112,38 +84,51 @@ makeTerms terms =
         [ paragraph
             [ F.color colourTheme.textLightGrey
             , F.regular
-            , F.size 16
+            , F.size 18
+            , F.bold
+            , F.alignLeft
+            ]
+            [ column []
+                [ row []
+                    [ column
+                        [ E.alignRight
+                        , alignTop
+                        ]
+                        [ paragraph
+                            []
+                            [ text (String.fromInt index ++ ". ") ]
+                        ]
+                    , column
+                        [ E.width fill
+                        , paddingEach
+                            { top = 0
+                            , bottom = 0
+                            , left = 10
+                            , right = 10
+                            }
+                        ]
+                        [ paragraph
+                            []
+                            [ el [ F.color colourTheme.textLightOrange ] <|
+                                text ("\"" ++ terms.term ++ "\"")
                             ]
-            [ text ("\"" ++ terms.term ++ "\"") ]
                         , paragraph
                             [ F.color colourTheme.textLightGrey
                             , F.regular
                             , F.size 16
+                            , F.alignLeft
                             ]
-            [ paragraph
+                            [ text
-                [ paddingEach
+                                (case terms.explanation of
-                    { top = 0
+                                    NoClue ->
-                    , bottom = 0
+                                        "I have no fucking clue what this means."
-                    , left = 35
-                    , right = 0
-                    }
-                ]
-                [ text terms.explanation ]
-            ]
-        ]
 
-
+                                    SpecificExplanation str ->
-gibberishList : Gibberish
+                                        str
-gibberishList =
+                                )
-    { gibberishTitle = "Philosobabble"
+                            ]
-    , gibberishImage = "gibberish"
+                        ]
-    , gibberishDomain =
+                    ]
-        [ epistemologyGibberish
+                ]
-        , theologyGibberish
+            ]
-        , metaphysicsGibberish
-        , normativityGibberish
-        , ontologyGibberish
-        , philOfMindGibberish
-        , philOfLanguageGibberish
         ]
-    }

frontend/src/Debate/Gibberish/Types.elm

@@ -1,22 +1,32 @@
 module Debate.Gibberish.Types exposing (..)
 
+import Cuckery.Types exposing (DodgeFallacies(..))
+
+
+
 -- GIBBERISH
 
 
 type alias Gibberish =
     { gibberishTitle : String
     , gibberishImage : String
-    , gibberishDomain : List Domain
+    , gibberishTerms : List Terms
-    }
-
-
-type alias Domain =
-    { gibberishTerms : List Terms
-    , gibberishDomainName : String
     }
 
 
 type alias Terms =
     { term : String
-    , explanation : String
+    , explanation : Explanation
     }
+
+
+type Explanation
+    = NoClue
+    | SpecificExplanation String
+
+
+formatName : String -> String
+formatName name =
+    name
+        |> String.toLower
+        |> String.replace " " ""

frontend/src/Headers/Pages/Gibberish.elm

@@ -0,0 +1,10 @@
+module Headers.Pages.Gibberish exposing (..)
+
+import Headers.Types exposing (..)
+
+
+gibberishHeader : Header
+gibberishHeader =
+    { headerTitle = "GIBBERISH"
+    , headerBody = "My site, research, and content all cost time and money to run. If you find my contributions valuable, please consider supporting my work on any of the platforms listed below!"
+    }

frontend/src/Layouts/Navbar.elm

@@ -18,7 +18,7 @@ import View exposing (View)
 
 
 type alias Props =
-    {}
+    { currentRoute : String }
 
 
 layout : Props -> Shared.Model -> Route () -> Layout () Model Msg contentMsg
@@ -26,7 +26,7 @@ layout props shared route =
     Layout.new
         { init = init
         , update = update
-        , view = view
+        , view = \layoutArgs -> view { props = props, content = layoutArgs.content, model = layoutArgs.model, toContentMsg = layoutArgs.toContentMsg }
         , subscriptions = subscriptions
         }
 
@@ -73,8 +73,14 @@ subscriptions model =
 -- VIEW
 
 
-view : { toContentMsg : Msg -> contentMsg, content : View contentMsg, model : Model } -> View contentMsg
+view :
-view { toContentMsg, model, content } =
+    { content : View contentMsg
+    , model : Model
+    , toContentMsg : Msg -> contentMsg
+    , props : Props
+    }
+    -> View contentMsg
+view { content, model, toContentMsg, props } =
     { title = content.title
     , attributes = [ F.family [ spartanFont ] ]
     , element =
@@ -88,7 +94,7 @@ view { toContentMsg, model, content } =
                 , htmlAttribute (H.style "left" "0")
                 , htmlAttribute (H.style "top" "0")
                 , htmlAttribute (H.style "height" "100vh")
-                , htmlAttribute (H.style "z-index" "10") -- Ensure navbar stays on top
+                , htmlAttribute (H.style "z-index" "10")
                 , htmlAttribute (H.style "transform-style" "preserve-3d")
                 , D.widthEach { top = 0, bottom = 0, left = 0, right = 3 }
                 , D.color colourTheme.textDarkOrange
@@ -151,11 +157,12 @@ view { toContentMsg, model, content } =
                             , spacing 8
                             ]
                           <|
-                            List.map buttonMaker
+                            List.map (buttonMaker props.currentRoute)
                                 [ pageNames.pageRoot
                                 , pageNames.pageServices
                                 , pageNames.pageHyperBlog
                                 , pageNames.pageDebate
+                                , pageNames.pageGibberish
                                 , pageNames.pageDodgers
                                 , pageNames.pageNutriDex
                                 , pageNames.pageInterviews
@@ -233,8 +240,8 @@ iconList =
     ]
 
 
-buttonMaker : String -> Element msg
+buttonMaker : String -> String -> Element msg
-buttonMaker name =
+buttonMaker currentRoute name =
     row
         []
         [ column [ E.width <| px 36 ]
@@ -255,6 +262,12 @@ buttonMaker name =
                 , label =
                     el
                         [ mouseOver [ F.color colourTheme.textLightOrange ]
+                        , F.color <|
+                            if String.toLower name == currentRoute then
+                                colourTheme.textLightOrange
+
+                            else
+                                colourTheme.textLightGrey
                         , htmlAttribute <| style "transition" "all 0.1s ease-in-out"
                         ]
                     <|

frontend/src/Pages/Arguments.elm

@@ -87,7 +87,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar { currentRoute = debateName }
 
 
 
@@ -101,9 +101,12 @@ type alias Model =
 init : () -> ( Model, Effect Msg )
 init () =
     ( {}
-    , Effect.map
+    , Effect.batch
+        [ Effect.map
             (\_ -> NoOp)
             (Effect.sendCmd resetViewport)
+        , Effect.none
+        ]
     )
 
 
@@ -210,7 +213,5 @@ debateList =
                     , argumentFlatEarthDebunk
                     , argumentTruncatedMeta
                     ]
-                , List.map gibberishMaker
-                    [ gibberishList ]
                 ]
         ]

frontend/src/Pages/Contact.elm

@@ -34,7 +34,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar {currentRoute = contactName}
 
 
 

frontend/src/Pages/Cucklist.elm

@@ -98,7 +98,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar { currentRoute = dodgersName }
 
 
 

frontend/src/Pages/Donate.elm

@@ -43,7 +43,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar {currentRoute = donateName}
 
 
 

frontend/src/Pages/Gibberish.elm

@@ -0,0 +1,132 @@
+module Pages.Gibberish exposing (Model, Msg, page)
+
+import Config.Colour as T exposing (..)
+import Config.Format as O exposing (..)
+import Config.Identity as I exposing (..)
+import Config.Viewport exposing (..)
+import Debate.Gibberish.Domains.Epistemology exposing (epistemologyGibberish)
+import Debate.Gibberish.Domains.Metaphysics exposing (metaphysicsGibberish)
+import Debate.Gibberish.Domains.Normativity exposing (normativityGibberish)
+import Debate.Gibberish.Domains.Ontology exposing (ontologyGibberish)
+import Debate.Gibberish.Domains.PhilOfLanguage exposing (philOfLanguageGibberish)
+import Debate.Gibberish.Domains.PhilOfMind exposing (philOfMindGibberish)
+import Debate.Gibberish.Domains.Theology exposing (theologyGibberish)
+import Debate.Gibberish.Helpers exposing (..)
+import Debate.Helpers exposing (..)
+import Debate.Types exposing (..)
+import Effect exposing (Effect)
+import Element exposing (..)
+import Element.Border as D exposing (..)
+import Element.Font as F
+import Headers.Helpers exposing (headerMaker)
+import Headers.Pages.Gibberish exposing (gibberishHeader)
+import Html
+import Html.Attributes as H exposing (style, title, wrap)
+import Layouts
+import List.Extra as L exposing (..)
+import Page exposing (Page)
+import Ports exposing (gotArgHeight)
+import Route exposing (Route)
+import Shared
+import View exposing (View)
+
+
+page : Shared.Model -> Route () -> Page Model Msg
+page shared route =
+    Page.new
+        { init = init
+        , update = update
+        , subscriptions = subscriptions
+        , view = view
+        }
+        |> Page.withLayout toLayout
+
+
+toLayout : Model -> Layouts.Layout Msg
+toLayout model =
+    Layouts.Navbar { currentRoute = donateName }
+
+
+
+-- INIT
+
+
+type alias Model =
+    {}
+
+
+init : () -> ( Model, Effect Msg )
+init () =
+    ( {}
+    , Effect.batch
+        [ Effect.map
+            (\_ -> NoOp)
+            (Effect.sendCmd resetViewport)
+        , Effect.none
+        ]
+    )
+
+
+
+-- UPDATE
+
+
+type Msg
+    = NoOp
+
+
+update : Msg -> Model -> ( Model, Effect Msg )
+update msg model =
+    case msg of
+        NoOp ->
+            ( model
+            , Effect.none
+            )
+
+
+
+-- SUBSCRIPTIONS
+
+
+subscriptions : Model -> Sub Msg
+subscriptions model =
+    Sub.none
+
+
+
+-- VIEW
+
+
+view : Model -> View Msg
+view model =
+    { title = gibberishName
+    , attributes = []
+    , element = gibberishContainer
+    }
+
+
+gibberishContainer : Element msg
+gibberishContainer =
+    topLevelContainer gibberishList
+
+
+gibberishList : Element msg
+gibberishList =
+    column [ centerX ]
+        [ column
+            pageList
+          <|
+            List.concat
+                [ List.map headerMaker
+                    [ gibberishHeader ]
+                , List.map gibberishMaker
+                    [ epistemologyGibberish
+                    , theologyGibberish
+                    , metaphysicsGibberish
+                    , normativityGibberish
+                    , ontologyGibberish
+                    , philOfMindGibberish
+                    , philOfLanguageGibberish
+                    ]
+                ]
+        ]

frontend/src/Pages/Home_.elm

@@ -29,7 +29,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar {currentRoute = homeName}
 
 
 

frontend/src/Pages/Hyperblog.elm

@@ -30,7 +30,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar {currentRoute = hyperBlogName}
 
 
 

frontend/src/Pages/Interviews.elm

@@ -43,7 +43,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar {currentRoute = interviewsName}
 
 
 

frontend/src/Pages/Nutridex.elm

@@ -38,7 +38,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar {currentRoute = nutriDexName}
 
 
 

frontend/src/Pages/Services.elm

@@ -36,7 +36,7 @@ page shared route =
 
 toLayout : Model -> Layouts.Layout Msg
 toLayout model =
-    Layouts.Navbar {}
+    Layouts.Navbar { currentRoute = servicesName }
 
 
 

frontend/src/Services/Offerings/DebateAnalysis.elm

@@ -15,6 +15,9 @@ servicesDebateAnalysis =
     , serviceName = name
     , serviceRate = "$80/hr"
     , serviceDescription =
-        [ { point = "Participate in focused one-hour sessions wherein your own recorded debates are analyzed for constructive feedback and advice to help you improve as a debater. You may also participate in mock debates, staged debates, and other exercises to help you get more comfortable with debate and verbal confrontation." }
+        [ { point = "Have your own debates analyzed for constructive feedback." }
+        , { point = "Receive advice to improve as a debater." }
+        , { point = "Participate in mock debates, staged debates, and other exercises." }
+        , { point = "Gain comfort with debate and verbal confrontation." }
         ]
     }

frontend/src/Services/Offerings/DebateTutoring.elm

@@ -15,6 +15,9 @@ servicesDebateTutoring =
     , serviceName = name
     , serviceRate = "$60/hr"
     , serviceDescription =
-        [ { point = "Participate in a structured course consisting of five one-hour modules, covering critical thinking, debate strategy, propositional logic, and more. Throughout the course you will receive both personalized and generalizable advice on how to improve your debate performance and critical thinking skills." }
+        [ { point = "Participate in a structured course with five one-hour modules." }
+        , { point = "Learn critical thinking, debate strategy, formal logic, and more" }
+        , { point = "Receive personalized and generalizable advice." }
+        , { point = "Improve debate understanding and performance." }
         ]
     }

frontend/src/Services/Offerings/ElmBuilds.elm

@@ -16,6 +16,9 @@ servicesElmBuilds =
     , serviceName = name
     , serviceRate = "$20/hr"
     , serviceDescription =
-        [ { point = "The site you're looking at right now was designed and written by me in Elm, using Elm-Land and Elm-UI. Elm is a purely functional programming language that compiles to JavaScript. It can also handle HTML and CSS in a purely functional paradigm, resulting in highly reproducible sites that require minimal maintenance." }
+        [ { point = "Receive a custom website frontend written in Elm." }
+        , { point = "Tailored solutions based on user needs." }
+        , { point = "Help with integration and server integration." }
+        , { point = "Receive unlimited revisions before finalization." }
         ]
     }

frontend/src/Services/Offerings/NixBuilds.elm

@@ -15,6 +15,9 @@ servicesNixBuilds =
     , serviceName = name
     , serviceRate = "$40/hr"
     , serviceDescription =
-        [ { point = "NixOS has gained popularity in my community, with many switching from Windows, macOS, and other Linux distros. As a result, I often get requests for help with NixOS and the Nix programming language. To streamline the process and make things easier for both of us, I'm offering custom NixOS configurations for clients." }
+        [ { point = "Receive a custom NixOS configuration." }
+        , { point = "Help with transitioning from other operating systems to NixOS." }
+        , { point = "Assistance with the Nix programming language." }
+        , { point = "Receive unlimited revisions before finalization." }
         ]
     }

frontend/src/Services/Offerings/NutritionScience.elm

@@ -15,6 +15,9 @@ servicesNutritionScience =
     , serviceName = name
     , serviceRate = "$50/hr"
     , serviceDescription =
-        [ { point = "Participate in a one-hour Q&A session specifically to inquire about nutrition science. Ask questions about research design, methodology, epistemology, and study interpretation. Also, by participating you will also gain access to nutrition science interpretation cheat-sheets that will streamline and simplify the research appraisal process." }
+        [ { point = "Participate in a focused, one-hour Q&A session on nutrition science." }
+        , { point = "Inquire about methodology, epistemology, and study interpretation." }
+        , { point = "Gain access to nutrition science interpretation cheat-sheets." }
+        , { point = "Simplify and streamline the research appraisal process." }
         ]
     }