feat: refactored cucks

This commit is contained in:
Nick 2024-11-16 16:35:08 -06:00
parent bdd63d8494
commit 667440f60f
74 changed files with 157 additions and 133 deletions

View file

@ -8,6 +8,7 @@ argumentAncestralDiets =
{ argumentTitle = "Argument for Using the Term Retard"
, propositionTitle = ""
, propositionSummary = ""
, proofLink = ""
, definitionTable =
[ { definiendum = "C(x)"
, definiens = "(x) slur's negative connotations have been neutralised"

View file

@ -8,6 +8,7 @@ argumentHealthSeeker =
{ argumentTitle = "Title"
, propositionTitle = "Proposition"
, propositionSummary = "Summary"
, proofLink = ""
, definitionTable =
[ { definiendum = ""
, definiens = "prop 1"

View file

@ -8,6 +8,7 @@ argumentEthicalSlurs =
{ argumentTitle = "Argument for Using the Term Retard"
, propositionTitle = ""
, propositionSummary = ""
, proofLink = "https://www.umsu.de/trees/#(~6x(Cx~4Bx)),(~6x(~3Cx~5Dx)),(~3Cr),(~3Br~1Dr~5Sr),(Sr~5Ar)%7C=(Ar)"
, definitionTable =
[ { definiendum = "C(x)"
, definiens = "(x) slur's negative connotations have been neutralised"

View file

@ -8,6 +8,7 @@ argumentAnabolicKeto =
{ argumentTitle = "Title"
, propositionTitle = "Proposition"
, propositionSummary = "Summary"
, proofLink = ""
, definitionTable =
[ { definiendum = ""
, definiens = "prop 1"

View file

@ -8,6 +8,7 @@ argumentMalondialdehyde =
{ argumentTitle = "Title"
, propositionTitle = "Proposition"
, propositionSummary = "Summary"
, proofLink = ""
, definitionTable =
[ { definiendum = ""
, definiens = "prop 1"

View file

@ -62,7 +62,10 @@ argumentMaker argument =
column
[ paragraphWidth, alignLeft, spacing 8, paddingEach { top = 0, right = 0, bottom = 60, left = 0 } ]
[ paragraph (paragraphBoldFormat ++ [ F.size 20 ])
[ text argument.argumentTitle |> el [ F.color colourTheme.nonHighlightedText, F.bold ]
[ newTabLink []
{ url = argument.proofLink
, label = transitionNonHighlightedLinkHover <| text (argument.argumentTitle)
}
]
, paragraph (paragraphBoldFormat ++ [ F.size 18 ])
[ text "Proposition: " |> el [ F.color colourTheme.highlightText ]

View file

@ -11,6 +11,7 @@ type alias Argument =
{ argumentTitle : String
, propositionTitle : String
, propositionSummary : String
, proofLink : String
, definitionTable : List Definition
, argumentFormalization : List ArgumentEntry
}