module Config.Pages.Debate.Cuckery.Records.AustinHiggs exposing (..)

import Config.Data.Hashtags.Types exposing (Hashtags(..))
import Config.Helpers.Converters exposing (formatName)
import Config.Pages.Debate.Cuckery.Types
    exposing
        ( Cuck
        , DodgeDescription(..)
        , DodgeFallacies(..)
        , DoxasticState(..)
        , Evaluation(..)
        , commonPropReasons
        , multiplePropositions
        )


cuckAustinHiggs : Cuck
cuckAustinHiggs =
    let
        name : String
        name =
            "Austin Higgs"
    in
    { cuckImage = formatName name
    , cuckName = name
    , cuckSocial = "https://x.com/artofoptimal"
    , isNewTabLink = True
    , cuckDodges =
        [ { dodgeLink = "https://x.com/upRootNutrition/status/1869452605954707861"
          , dodgeDescription = NoReply
          , dodgeProposition = "We have been mislead into believing natural animals fats will kill us while highly processed seed oils are heart healthy."
          , dodgeReceipts = [ { receipt = "receipt1" } ]
          , dodgeFallacy = Just RedHerring
          , dodgeNicksDoxasticState = Just Disbelief
          , dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propSeedOilsReason
          }
        , { dodgeLink = "https://x.com/upRootNutrition/status/1900265937959330199"
          , dodgeDescription = NoReply
          , dodgeProposition = "Mainstream medicine lied about the sun causing melanoma skin cancer, sunglasses being good for eye health, saturated fat and cholesterol clogging your arteries, seed oils being heart healthy, meat causing cancer, bad cholesterol existing, fluoride being safe and necessary for teeth, fiber being healthy and necessary, salt raising blood pressure, fruits and vegetables being super healthy, high carb/low fat diets being optimal, grains being healthy, and diabetes being all genetics."
          , dodgeReceipts = [ { receipt = "receipt1" } ]
          , dodgeFallacy = Nothing
          , dodgeNicksDoxasticState = Just Disbelief
          , dodgeNicksDoxasticReason = SpecificPropReason "There are many individual propositions here, but I don't think any of them are true on a charitable interpretation."
          }
        ]
    }
