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

26 lines
817 B
Elm
Executable file

module Cuckery.CuckList.BartKay.BartKay exposing (..)
import Cuckery.Types exposing (..)
cuckBartKay : Cuck
cuckBartKay =
let
name : String
name =
"Bart Kay"
in
{ cuckImage = formatCuckName name
, cuckName = name
, cuckSocial = "https://x.com/Bart_WT_Kay"
, cuckDodges =
[ { dodgeLink = "https://www.youtube.com/watch?v=M7vTJ02xxrw"
, dodgeDescription = RanAway
, dodgeProposition = "A 100% Carnivore diet is the appropriate and best health choice for all people."
, dodgeReceipts = []
, dodgeFallacy = Just (SpecificFallacy "")
, dodgeNicksDoxasticState = Just Disbelief
, dodgeNicksDoxasticReason = SpecificPropReason commonPropReasons.propEmpiricalClaimDisbelief
}
]
}