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

26 lines
838 B
Elm
Executable file

module Cuckery.CuckList.TroKalayjian.TroKalayjian exposing (..)
import Cuckery.Types exposing (..)
cuckTroKalayjian : Cuck
cuckTroKalayjian =
let
name : String
name =
"Tro Kalayjian"
in
{ cuckImage = formatCuckName name
, cuckName = name
, cuckSocial = "https://x.com/DoctorTro"
, cuckDodges =
[ { dodgeLink = "https://x.com/The_Nutrivore/status/1261351818430255104?s=20"
, dodgeDescription = RanAway
, dodgeProposition = "Dr. Tro engages in shitty behaviour that causes people to dislike him."
, dodgeReceipts = []
, dodgeFallacy = Just (SpecificFallacy "")
, dodgeNicksDoxasticState = Just Belief
, dodgeNicksDoxasticReason = SpecificPropReason "The proposition seems trivially true."
}
]
}