feat: cucks have been formatted

frontend/src/Cuckery/CuckList/AdamSinger.elm

@@ -1,6 +1,7 @@
 module Cuckery.CuckList.AdamSinger exposing (..)
 
 import Cuckery.Types exposing (..)
+import Cuckery.Helpers exposing(..)
 
 
 cuckAdamSinger : Cuck

frontend/src/Cuckery/CuckList/AnnChilders.elm

@@ -17,7 +17,7 @@ cuckAnnChilders =
         [ { dodgeLink = "https://x.com/The_Nutrivore/status/1447245484356108292?s=20"
           , dodgeDescription = RanAway
           , dodgeProposition = "diets humans thrived on in the wild, sans dentists and doctors, are correct."
-          , dodgeNicksDoxasticState = Just Belief
+          , dodgeNicksDoxasticState = Just Agnostic
           , dodgeNicksDoxasticReason = Vague
           }
         ]

frontend/src/Cuckery/CuckList/AnthonyGustin.elm

@@ -18,7 +18,7 @@ cuckAnthonyGustin =
           , dodgeDescription = GhostedMe
           , dodgeProposition = "seed oils are not a significant, independent risk factor for public health."
           , dodgeNicksDoxasticState = Just Belief
-          , dodgeNicksDoxasticReason = NoProp
+          , dodgeNicksDoxasticReason = Specific "the aggregate of the data suggests seed oils are beneficial for humans"
           }
         ]
     }

frontend/src/Cuckery/Helpers.elm

@@ -18,7 +18,7 @@ import View exposing (View)
 makeDodge : Dodge -> Int -> Element msg
 makeDodge dodgeEntry index =
     column paragraphAlignLeft
-        [ row (paragraphFormat ++ [ width fill ])
+        [ row paragraphFormat
             [ text "    "
             , text (String.fromInt index ++ ". ")
             , paragraphLinkFormat
@@ -51,14 +51,17 @@ makeDodge dodgeEntry index =
                 }
             ]
         , row paragraphBoldFormat
-            [ column [ alignTop ]
+            [ column [ alignTop, width <| px 184 ]
                 [ text "                Proposition:"
                 ]
             , column [ width <| px 350, alignLeft ] [ paragraph [ F.regular ] [ text dodgeEntry.dodgeProposition ] ]
             ]
         , row (paragraphBoldFormat ++ [ width fill ])
+            [ column [ alignTop, width <| px 184 ]
                 [ text "                Doxastic State:"
-            , case dodgeEntry.dodgeNicksDoxasticState of
+                ]
+            , column [ width <| px 350, alignLeft ]
+                [ case dodgeEntry.dodgeNicksDoxasticState of
                     Nothing ->
                         paragraph [ F.regular ] [ text "Nick doesn't form a doxastic state." ]
 
@@ -79,17 +82,25 @@ makeDodge dodgeEntry index =
                     Just Agnostic ->
                         el [ F.regular ] (text "Nick doesn't form beliefs about this proposition.")
                 ]
+            ]
         , row (paragraphBoldFormat ++ [ width fill ])
+            [ column [ alignTop, width <| px 184 ]
                 [ text "                Reason:"
-            , el [ F.regular ]
+                ]
-                (text <|
+            , column [ width <| px 350, alignLeft ]
+                [ paragraph [ F.regular ]
+                    [ text <|
                         case dodgeEntry.dodgeNicksDoxasticReason of
                             NoProp ->
                                 "there is no proposition to evaluate."
 
                             Vague ->
                                 "the proposition is too vague to evaluate."
-                )
+
+                            Specific str ->
+                                str
+                    ]
+                ]
             ]
         ]
 

frontend/src/Cuckery/Types.elm

@@ -36,12 +36,17 @@ type DoxasticState
 type Evaluation
     = NoProp
     | Vague
+    | Specific String
 
 
 type alias FormattedCuckName =
     String
 
 
+type alias FormattedCuckSocial =
+    String
+
+
 formatCuckName : String -> FormattedCuckName
 formatCuckName name =
     name
@@ -49,10 +54,6 @@ formatCuckName name =
         |> String.replace " " ""
 
 
-type alias FormattedCuckSocial =
-    String
-
-
 formatCuckSocial : String -> FormattedCuckSocial
 formatCuckSocial name =
     name