website/frontend/src/Cuckery/CuckList/PaulMason/PaulMason.elm

39 lines
1.4 KiB
Elm
Executable file

module Cuckery.CuckList.PaulMason.PaulMason exposing (..)
import Cuckery.Types exposing (..)
cuckPaulMason : Cuck
cuckPaulMason =
let
name : String
name =
"Paul Mason"
in
{ cuckImage = formatCuckName name
, cuckName = name
, cuckSocial = "https://x.com/DrPaulMason"
, cuckDodges =
[ { dodgeLink = "https://x.com/Tom_Babington1/status/1361644276866830337?s=20"
, dodgeDescription = NoReply
, dodgeProposition = noProposition
, dodgeFallacy = Just (SpecificFallacy "")
, dodgeNicksDoxasticState = Nothing
, dodgeNicksDoxasticReason = NoProp
}
, { dodgeLink = "https://x.com/IdanOnTweeter/status/1373233980594618371?s=20"
, dodgeDescription = NoReply
, dodgeProposition = "Ancel Keys' Seven Countries Study was flawed."
, dodgeFallacy = Just (SpecificFallacy "")
, dodgeNicksDoxasticState = Just Agnostic
, dodgeNicksDoxasticReason = VagueProp
}
, { dodgeLink = "https://x.com/The_Nutrivore/status/1461361726943760391?s=20"
, dodgeDescription = NoReply
, dodgeProposition = commonProps.propLinoleicAcid
, dodgeFallacy = Just (SpecificFallacy "")
, dodgeNicksDoxasticState = Just Agnostic
, dodgeNicksDoxasticReason = SpecificProp commonPropReasons.propSeedOilsReason
}
]
}