feat: added tooltips and changed some formatting

This commit is contained in:
Nick 2024-11-21 01:26:54 -06:00
parent d437fa785e
commit 9a8594d560
4 changed files with 13 additions and 12 deletions

View file

@ -192,6 +192,8 @@ myTooltip str =
{ offset = ( 0, 3 ), blur = 6, size = 0, color = rgba 0 0 0 0.32 } { offset = ( 0, 3 ), blur = 6, size = 0, color = rgba 0 0 0 0.32 }
] ]
(text str) (text str)
|> el [ F.color colourTheme.nonHighlightedText, F.regular, F.size 14 ]
tooltip : (Element msg -> Attribute msg) -> Element Never -> Attribute msg tooltip : (Element msg -> Attribute msg) -> Element Never -> Attribute msg
tooltip usher tooltip_ = tooltip usher tooltip_ =

View file

@ -5,7 +5,7 @@ import Debate.Types exposing (..)
argumentColonizingNature : Argument argumentColonizingNature : Argument
argumentColonizingNature = argumentColonizingNature =
{ argumentTitle = "Argument for the Non-Violence Displacement of Nature" { argumentTitle = "Argument for the Non-Violent Displacement of Nature"
, propositionTitle = "We are justified in displacing nature into non-existence" , propositionTitle = "We are justified in displacing nature into non-existence"
, propositionReductio = "" , propositionReductio = ""
, propositionSummary = "Summary" , propositionSummary = "Summary"

View file

@ -7,8 +7,8 @@ argumentEfilismPatrolSquad : Argument
argumentEfilismPatrolSquad = argumentEfilismPatrolSquad =
{ argumentTitle = "The Eternal Intergalactic Sentience Patrol Squad" { argumentTitle = "The Eternal Intergalactic Sentience Patrol Squad"
, propositionTitle = "Efilists are committed to pragmatic natalism." , propositionTitle = "Efilists are committed to pragmatic natalism."
, propositionReductio = "" , propositionReductio = "Efilists fundamentally believe that sentient life is inherently characterized by suffering and that the most ethical action is to prevent the creation of any new sentient beings, ultimately aiming to completely eliminate all conscious life in the universe to end suffering permanently."
, propositionSummary = "Summary" , propositionSummary = "If efilists follow their own logic to its ultimate conclusion, they would paradoxically be committed to a form of pragmatic natalism - the very opposite of their core philosophical stance."
, proofLink = "https://www.umsu.de/trees/#(P~5Q),(~3Q),(~3P~1R~5~3S),(R),(~3S~5W)|=(W)" , proofLink = "https://www.umsu.de/trees/#(P~5Q),(~3Q),(~3P~1R~5~3S),(R),(~3S~5W)|=(W)"
, definitionTable = , definitionTable =
[ { definiendum = "P" [ { definiendum = "P"

View file

@ -35,9 +35,9 @@ argumentMaker argument =
(\premiseIndex premiseWithNotation -> (\premiseIndex premiseWithNotation ->
column argumentFormatting column argumentFormatting
[ paragraph paragraphHightlightedBoldText [ paragraph paragraphHightlightedBoldText
[ text ("P" ++ String.fromInt (premiseIndex + 1) ++ ") ") [ text ("P" ++ String.fromInt (premiseIndex + 1) ++ ")")
, text premiseWithNotation.premise , text premiseWithNotation.premise
|> el [ F.color colourTheme.nonHighlightedText, F.regular ] |> el [ F.color colourTheme.nonHighlightedText, F.regular, paddingEach { top = 0, right = 0, bottom = 0, left = 5 } ]
] ]
, paragraph argumentFormatting , paragraph argumentFormatting
[ text premiseWithNotation.notation [ text premiseWithNotation.notation
@ -48,9 +48,9 @@ argumentMaker argument =
argumentEntry.premises argumentEntry.premises
++ [ column argumentFormatting ++ [ column argumentFormatting
[ paragraph paragraphHightlightedBoldText [ paragraph paragraphHightlightedBoldText
[ text ("C" ++ String.fromInt (index + 1) ++ ") ") [ text "C)"
, text argumentEntry.conclusion , text argumentEntry.conclusion
|> el [ F.color colourTheme.nonHighlightedText, F.regular ] |> el [ F.color colourTheme.nonHighlightedText, F.regular, paddingEach { top = 0, right = 0, bottom = 0, left = 5 } ]
] ]
, paragraph argumentFormatting , paragraph argumentFormatting
[ text argumentEntry.conclusionNotation [ text argumentEntry.conclusionNotation
@ -73,13 +73,12 @@ argumentMaker argument =
[ column [ column
[ E.alignTop, E.alignLeft ] [ E.alignTop, E.alignLeft ]
[ paragraph (paragraphBoldFormat ++ [ F.size 18, E.width <| px 100 ]) [ paragraph (paragraphBoldFormat ++ [ F.size 18, E.width <| px 100 ])
[ text "Reductio:" |> el [ F.color colourTheme.highlightText ] [ el [ tooltip below (myTooltip "This is the position from which the reductio ad absurdum is derived.") ] (text "Reductio:") |> el [ F.color colourTheme.highlightText ]
] ]
] ]
, column [ E.width fill, E.alignLeft ] , column [ E.width fill, E.alignLeft ]
[ paragraph [] [ paragraph []
[ text reductio |> el [ F.color colourTheme.nonHighlightedText, F.regular, F.size 16 ] [ text reductio |> el [ F.color colourTheme.nonHighlightedText, F.regular, F.size 16 ]
, el [ tooltip below (myTooltip "These are the propositions from which the reductio ad absurdum is derived") ] (text " ") |> el [ F.color colourTheme.nonHighlightedText, F.regular, F.size 16 ]
] ]
] ]
] ]
@ -98,7 +97,7 @@ argumentMaker argument =
[ column [ column
[ E.alignTop, E.alignLeft ] [ E.alignTop, E.alignLeft ]
[ paragraph (paragraphBoldFormat ++ [ F.size 18, E.width <| px 100 ]) [ paragraph (paragraphBoldFormat ++ [ F.size 18, E.width <| px 100 ])
[ text "Proposition:" |> el [ F.color colourTheme.highlightText ] ] [ el [ tooltip below (myTooltip "A proposition is a declarative statement that can be evaluated as either true or false, and which serves as the basis for debate.") ] (text "Proposition:") |> el [ F.color colourTheme.highlightText ] ]
] ]
, column , column
[ E.width fill, E.alignLeft ] [ E.width fill, E.alignLeft ]
@ -109,14 +108,14 @@ argumentMaker argument =
[ column [ column
[ E.alignTop, E.alignLeft ] [ E.alignTop, E.alignLeft ]
[ paragraph (paragraphBoldFormat ++ [ F.size 18, E.width <| px 100 ]) [ paragraph (paragraphBoldFormat ++ [ F.size 18, E.width <| px 100 ])
[ text "Summary:" |> el [ F.color colourTheme.highlightText ] [ el [ tooltip below (myTooltip "The following information provides additional context and insight into the reasoning behind the argument") ] (text "Summary:") |> el [ F.color colourTheme.highlightText ]
] ]
] ]
, column , column
[ E.width fill, E.alignLeft ] [ E.width fill, E.alignLeft ]
[ paragraph (paragraphBoldFormat ++ [ F.size 18 ]) [ text argument.propositionSummary |> el [ F.color colourTheme.nonHighlightedText, F.regular, F.size 16 ] ] ] [ paragraph (paragraphBoldFormat ++ [ F.size 18 ]) [ text argument.propositionSummary |> el [ F.color colourTheme.nonHighlightedText, F.regular, F.size 16 ] ] ]
] ]
, wrappedRow (paragraphBoldFormat ++ [ E.alignLeft ]) , wrappedRow (paragraphBoldFormat ++ [ E.alignLeft, E.width fill ])
[ E.table [ E.table
[ spacing 0 [ spacing 0
, D.rounded 10 , D.rounded 10