Index: botsoc.scm ================================================================== --- botsoc.scm +++ botsoc.scm @@ -16,21 +16,21 @@ ("idpol") ("terrorism") ("islamism") ("hedonism") ("libertinism") ("computer science") ("transhumanism") ("posthumanism") ("humanism") ("humanitarianism") ("racism") ("libertarianism"); ("static typing") ("dynamic typing") - ("neoliberalism")) + ("neoliberalism") ("banderism")) (rule (ideology-prefix) ("neo-") ("social ") ("democratic ") ("paleo-") ("retro-") ("anarcho-") ("femino-") ("neo") ("anti-") ("sado-") ("eroto-") ("strangulo-") ("theo-") ("ultra-") ("arachno-") ("anti") ("post-") ("post") ("ethno-") ("marxism-") ("left-") ("alt-") ("right-") ("space ") ("gay ") - ("quantum ") ("racial ")) + ("quantum ") ("racial ") ("corona")) (rule (ideology) ((base-ideology)) ((adjective) " " (ideology)) ((ideology-prefix) (base-ideology))) (rule (problem) @@ -51,11 +51,13 @@ ("authoritarianism") ("freedom of speech") ("tooth decay") ("neurodivergence") ("abortion") ("healthcare") ("the war") ("islamophobia") ("sexting") ; ("static typing") ("dynamic typing") ("apotheosis") ("theodicy") ("the problem of evil") - ("heterophobia") ("heterosexuality") ("Crooked Hillary")) + ("heterophobia") ("heterosexuality") ("Crooked Hillary") + ("COVID") ("the novel coronavirus") ("the Ukraine") + ("the vax") ("the vaccine")) (rule (adjective) ("racist") ("homophobic") ("misogynist") ("bigoted") ("anti-" (thing)) ("evil") ("insane") ("impossible") ("contradictory") ("illogical") ("revolutionary") ("self-contradictory") @@ -77,21 +79,27 @@ ("horny") ("thirsty") ("necessary") ("forbidden") ("electronic")) (rule (action) ("live") ("die") ("breathe") ("hope") ("speak freely") - ("survive" (problem)) ("kill " (group)) ("destroy " (thingss)) + ("survive " (problem)) ("kill " (group)) ("destroy " (thingss)) ("use " (thingss)) ("steal " (things)) ("murder " (group)) ("create " (thingss)) ("build " (thingss)) ("make " (things)) ("labor") ("work") ("exploit " (group)) ("produce " (things)) ("undermine " (thing)) ("overthrow " (group)) ("be free of "(thingss)) ("have " (one-of "money" "bodies" "homes" "food" (thingss))) ("exploit " (group) " for cheap labor") ("perform sorcery") ("perform augury") ("see the future") ("prophesy") ("enchant " (things)) ("perform wizardry") ("engage in witchcraft") ("have sex") ("fuck" (: ((group)))) ("own " (thingss)) - ("declare war") ("deprive " (group) " of " (necessity))) + ("declare war") ("deprive " (group) " of " (necessity)) + ((one-of "spread" "propagate" "disperse" "circulate" + "produce" "induce" "trigger" "worsen" + "exacerbate" "ameliorate" "fight" "fight for" + "struggle against" "solve" "finally solve") " " (problem)) + ("protect " (group) " from " (one-of (group) (problem))) +) (rule (trait) ("power") ("influence") ("wealth") ("solidarity") ("hope") ("conviction") ("autonomy") ("freedom") ("liberty") ("faith") ("humanity") ("sapience") @@ -103,10 +111,27 @@ ("therapy") ("pain relief") ("medical care") ("medicine") ("reproduction") ("hope") ("faith") ("love") ("pain") ("love") ("oxygen") ("nutrition") ("racial hygiene")) +(rule (country) + ("Germany") ("Austria") ("Denmark") ("America") ("the United States") + ("Finland") ("Serbia") ("Lithuania") ("Norway") ("Donetsk") + ("Lugansk") ("Russia") ("Jamaica") ("Venezuela") ("Cuba") + ("Antarctica") ("Saudi Arabia") + ) +(rule (city) + ("Seattle") ("Berlin") ("Oslo") ("Brussels") ("Paris") ("Moscow") + ("Cleveland") + ) +(rule (state) + ("Alabama") ("Texas") ("Georgia") ("Washington") ("Oregon") + ("Utah") ("Nebraska") ("Oklahoma") ("Arizona") ("Florida") + ("Arkansas") ("Alaska")) +(rule (place) + ((country)) ((city)) ((state)) ("Heaven") ("the North Pole")) + (rule (thing) ((problem)) ((necessity)) ("Russia") ("Mars") ("activism") ((thing) " activism") ("anti-" (thing) " activism") ((adjective) " activism") ("bitcoin") ("humanity") @@ -117,30 +142,31 @@ ("meth") ("heroin") ("dialectics") ("the dialectic") ("the Discourse") ("medical care") ("psychiatry") ("influenza") ("alien life") ("mind control") ("terrorism") ("identity") ("healthcare") ("literature") ("grass") ("catnip") ("virginity") - ("television") ("romance") ("finance") + ("television") ("romance") ("finance") ("opium") ("law") ("dating") ("online dating") ("friendship") ("the Resistance") ("the Manosphere") ("race") ("Qanon")) (rule (things) ("pandas") ("lasers") ("toasters") ("kulaks") ("opiates") ("painkillers") - ("teacups") ("umbrellas") ((thing) " rights") + ("teacups") ("umbrellas") ((thing) (one-of "'s" "") " rights") ((adjective) " rights") (group) - ("humans") ("vaccines") + ("humans") ("vaccines") ("slugs") ("doctors") ("drugs") ("hospitals") ("UFOs") ("aliens") ("flowers") ("pumpkins") ("guns") ("babies") ("friends") ("bitcoins")) (rule (thingss) ((thing)) ((things))) (rule (group) - ("gays") ("whites") ("African-Americans") - ("the poor") ("the rich") ("Jewish people") + ((group) " from " (place)) + ("gays") ("whites") ("African-Americans") ("blacks") + ("the poor") ("the rich") ("Jewish people") ("Jews") ("the Jews") ("natives") ("otherkin") ("psychics") ("furries") ("immigrants") ("trans people") ("men") ("women") ("the bourgeoisie") ("boys") ("girls") ("the proletariat") ("activists") ("stirnerites") ("proletarians") @@ -158,14 +184,29 @@ ("kulaks") ("slaves") ("human trafficking victims") ("victims") ("crime victims") ("victims of " (problem)) ("losers") ("thieves") ("queer people") ("queers") ("senators") ("presidents") ("queens") ("kings") ("emperors") - ("aliens") ("racists") + ("aliens") ("racists") ("Chinese human rights defenders") + ("Uyghurs") ("angloids") ("barbaric asiatics") + ("patriots") ("astronauts") ("cosmonauts") + ("taikonauts") ("drug dealers") ("experts") + ("analysts") ((thing) " activists") ("anti-" (adjective) " activists") - ((ideology) " activists") ((adjective) " activists")) - + ((ideology) " activists") ((adjective) " activists") + ("those who desire to " (action)) + ("those who believe in " (ideology)) + ("those who " + (one-of "believe" "think") " " (one-of "" "that ") + (predicate-or-claim (thing))) + ("defenders of " (thing)) + ("advocates for " (thing)) + ("people from " (place)) + ((thing) " experts") + ((problem) " experts") + ((problem) " analysts") +) ; utility fns (rule (adjfor adj con g) (adj) (adj con g)) (rule (modal) @@ -233,13 +274,20 @@ "perpetuates the dehumanizationn of") " " (group)) (i " pathologizes " (problem)) (i " pathologizes " (thingss)) (i " " (modal) " deny " (group) " access to " (thingss)) + + (i " has " (one-of + "destroyed" + "worsened" + "exacerbated" + "greatly exacerbated") " " (thingss)) + (i " has caused immense suffering to " (group)) - ((group) " are " (? "not ") (? "actually ") (@ (adjective) - (group))) + ((group) " are " (? "not ") (? "actually ") (one-of (adjective) + (group))) ((thing) " " (causes-provokes) " " (thingss)) ((things) " " (cause-provoke) " " (thingss)) ((thingss) " " (modal) " cause " (problem)) (i " " (causes-provokes) " " (problem)) @@ -267,10 +315,13 @@ "handle " "offer a solution for ") (one-of "" "the issues posed by " "the problem of ") (problem)) ("basically, " (predicate-or-claim i)) + + ("there is no place for " i " in " (thing)) + ((group) " " (modal) " be deported to " (place)) ) (rule (predicate i) (i " was " (one-of "created" "developed"