procgen  Check-in [92ed9358a3]

Overview
Comment:modernize botsoc
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 92ed9358a3f50dc420ba5f69eca9cdd218f1cf8e6425bd71eac9ee6c9a5ec8ae
User & Date: lexi on 2022-09-21 01:40:00
Other Links: manifest | tags
Context
2022-09-21
01:43
excise dumb old ##hashtag inside joke check-in: b3aefdaa1e user: lexi tags: trunk
01:40
modernize botsoc check-in: 92ed9358a3 user: lexi tags: trunk
2021-08-29
17:08
$100 will make me extremely more racist check-in: ca1d956dff user: lexi tags: trunk
Changes

Modified botsoc.scm from [06502ccea6] to [f9854d5e34].

14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
..
49
50
51
52
53
54
55
56


57
58
59
60
61
62
63
..
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92






93
94
95
96
97
98
99
...
101
102
103
104
105
106
107

















108
109
110
111
112
113
114
...
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139

140
141
142
143
144
145
146
147
148
...
156
157
158
159
160
161
162
163




164
165











166
167
168
169
170
171
172
173
...
231
232
233
234
235
236
237
238







239
240
241
242
243
244
245
246
247
...
265
266
267
268
269
270
271



272
273
274
275
276
277
278
	("onanism")		("anthropology") ("authoritarianism")
	("totalitarianism")	("social justice")	("identity politics")
	("idpol")				("terrorism")		("islamism")
	("hedonism")		("libertinism")		("computer science")
	("transhumanism")	("posthumanism")	("humanism")
	("humanitarianism") ("racism")
	("libertarianism");	("static typing")	("dynamic typing")
	("neoliberalism"))
(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 "))
(rule (ideology)
	((base-ideology))
	((adjective) " " (ideology))
	((ideology-prefix) (base-ideology)))
(rule (problem)
	("poverty")		("hunger")			("hatred")
	("racism")		("mortality")		("misogyny")
................................................................................
	("genocide")	("bitcoin")			("ethnic cleansing")
	("vaccination")	("autism")			("the alt-right")
	("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"))


(rule (adjective)
	("racist")		("homophobic")		("misogynist")
	("bigoted")		("anti-" (thing))	("evil")
	("insane")		("impossible")		("contradictory")
	("illogical")	("revolutionary")	("self-contradictory")
	("white")		("communist")		("socialist")
	("marxist")		("stalinist")		("lesbian")
................................................................................
	("emergent")	("libertarian")		("unreconstructed")
	("teenage")		("Lacanian")		("intersectional")
	("horny")		("thirsty")			("necessary")
	("forbidden")	("electronic"))

(rule (action)
	("live") ("die") ("breathe") ("hope") ("speak freely")
	("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)))







(rule (trait)
	("power") ("influence") ("wealth") ("solidarity")
	("hope") ("conviction") ("autonomy") ("freedom")
	("liberty") ("faith") ("humanity") ("sapience")
	("purity") ("flesh purity") ("racial purity"))

................................................................................
	("sex") ("water") ("food") ("money") 
	("wealth") ("income") ("welfare") ("tea")
	("therapy") ("pain relief") ("medical care")
	("medicine") ("reproduction") ("hope") ("faith")
	("love") ("pain") ("love") ("oxygen") ("nutrition")
	("racial hygiene"))


















(rule (thing)
	((problem)) ((necessity))	("Russia")	("Mars")
	("activism")
	((thing) " activism") ("anti-" (thing) " activism")
	((adjective) " activism") ("bitcoin") ("humanity")
	("vaccination") ("autism") ("medical care")
	((adjective) " power") ((adjective) " policy")
................................................................................
	((adjective) " politics")
	("transit") ("public transit") ("public transportation")
	("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") 
	("opium") ("law") ("dating") ("online dating") ("friendship")
	("the Resistance") ("the Manosphere") ("race") ("Qanon"))

(rule (things)
	("pandas")	("lasers")	("toasters")
	("kulaks")	("opiates") ("painkillers")
	("teacups")	("umbrellas") ((thing) " rights")
	((adjective) " rights") (group)
	("humans") ("vaccines")
	("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")
	("natives")		("otherkin")			("psychics")
	("furries")		("immigrants")			("trans people")
	("men")			("women")				("the bourgeoisie")
	("boys")		("girls")				("the proletariat")
	("activists")	("stirnerites")			("proletarians")
	("extremists")	((thing) " extremists") ((thing) " activists")
	("addicts")		("junkies")				("tweakers")
................................................................................
	("lizards")		("bureaucrats")			("politicians")
	("catholics")	("methodists")			("mormons")
	("kulaks")		("slaves")				("human trafficking victims")
	("victims")		("crime victims")		("victims of " (problem))
	("losers")		("thieves")				("queer people")
	("queers")		("senators")			("presidents")
	("queens")		("kings")				("emperors")
	("aliens")		("racists")




	((thing) " activists") ("anti-" (adjective) " activists")
	((ideology) " activists") ((adjective) " activists"))











	
; utility fns
(rule (adjfor adj con g)
	(adj)
	(adj con g))
(rule (modal)
	("will") ("could") ("might") ("will likely") ("can") ("must")
	("surely will")	("undoubtedly will") ("may") ("should"))
................................................................................
					   "perpetuates the alienation of"
					   "perpetuates the marginalization of"
					   "perpetuates the dehumanizationn of") " " (group))

		(i " pathologizes " (problem))
		(i " pathologizes " (thingss))
		(i " " (modal) " deny " (group) " access to " (thingss))
	







		((group) " are " (? "not ") (? "actually ") (@ (adjective)
													   (group)))
		
		((thing) " " (causes-provokes) " " (thingss))
		((things) " " (cause-provoke) " " (thingss))
		((thingss) " " (modal) " cause " (problem))
		(i " " (causes-provokes) " " (problem))
		(i " " (modal) " cause " (problem))
		
................................................................................
							"deal with "
							"cope with "
							"handle "
							"offer a solution for ")
					(one-of "" "the issues posed by " "the problem of ")
					(problem))
		("basically, " (predicate-or-claim i))



			
	)
(rule (predicate i)
	(i " was "  (one-of "created"
						"developed"
						"designed") " "
	   				(@ ((one-of "after"







|









|







 







|
>
>







 







|









|
>
>
>
>
>
>







 







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







 







|






|

|








>
|
|







 







|
>
>
>
>

|
>
>
>
>
>
>
>
>
>
>
>
|







 







|
>
>
>
>
>
>
>
|
|







 







>
>
>







14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
..
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
..
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
...
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
...
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
...
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
...
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
...
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
	("onanism")		("anthropology") ("authoritarianism")
	("totalitarianism")	("social justice")	("identity politics")
	("idpol")				("terrorism")		("islamism")
	("hedonism")		("libertinism")		("computer science")
	("transhumanism")	("posthumanism")	("humanism")
	("humanitarianism") ("racism")
	("libertarianism");	("static typing")	("dynamic typing")
	("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 ") ("corona"))
(rule (ideology)
	((base-ideology))
	((adjective) " " (ideology))
	((ideology-prefix) (base-ideology)))
(rule (problem)
	("poverty")		("hunger")			("hatred")
	("racism")		("mortality")		("misogyny")
................................................................................
	("genocide")	("bitcoin")			("ethnic cleansing")
	("vaccination")	("autism")			("the alt-right")
	("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")
	("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")
	("white")		("communist")		("socialist")
	("marxist")		("stalinist")		("lesbian")
................................................................................
	("emergent")	("libertarian")		("unreconstructed")
	("teenage")		("Lacanian")		("intersectional")
	("horny")		("thirsty")			("necessary")
	("forbidden")	("electronic"))

(rule (action)
	("live") ("die") ("breathe") ("hope") ("speak freely")
	("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))
	((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")
	("purity") ("flesh purity") ("racial purity"))

................................................................................
	("sex") ("water") ("food") ("money") 
	("wealth") ("income") ("welfare") ("tea")
	("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")
	("vaccination") ("autism") ("medical care")
	((adjective) " power") ((adjective) " policy")
................................................................................
	((adjective) " politics")
	("transit") ("public transit") ("public transportation")
	("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")
	("opium") ("law") ("dating") ("online dating") ("friendship")
	("the Resistance") ("the Manosphere") ("race") ("Qanon"))

(rule (things)
	("pandas")	("lasers")	("toasters")
	("kulaks")	("opiates") ("painkillers")
	("teacups")	("umbrellas") ((thing) (one-of "'s" "") " rights")
	((adjective) " rights") (group)
	("humans") ("vaccines") ("slugs")
	("doctors") ("drugs") ("hospitals") ("UFOs") ("aliens")
	("flowers") ("pumpkins") ("guns") ("babies")
	("friends") ("bitcoins"))

(rule (thingss)
	((thing)) ((things)))
	
(rule (group)
	((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")
	("extremists")	((thing) " extremists") ((thing) " activists")
	("addicts")		("junkies")				("tweakers")
................................................................................
	("lizards")		("bureaucrats")			("politicians")
	("catholics")	("methodists")			("mormons")
	("kulaks")		("slaves")				("human trafficking victims")
	("victims")		("crime victims")		("victims of " (problem))
	("losers")		("thieves")				("queer people")
	("queers")		("senators")			("presidents")
	("queens")		("kings")				("emperors")
	("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")
	("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)
	("will") ("could") ("might") ("will likely") ("can") ("must")
	("surely will")	("undoubtedly will") ("may") ("should"))
................................................................................
					   "perpetuates the alienation of"
					   "perpetuates the marginalization of"
					   "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 ") (one-of (adjective)
													        (group)))
		
		((thing) " " (causes-provokes) " " (thingss))
		((things) " " (cause-provoke) " " (thingss))
		((thingss) " " (modal) " cause " (problem))
		(i " " (causes-provokes) " " (problem))
		(i " " (modal) " cause " (problem))
		
................................................................................
							"deal with "
							"cope with "
							"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"
						"designed") " "
	   				(@ ((one-of "after"