Differences From
Artifact [153c05522d]:
257 257 Plain "flailed"; Plain "whaled";
258 258 Plain "sloshed"; Plain "sprayed";
259 259 Plain "spayed"; Plain "prayed to";
260 260 Plain "prayed out"; Plain "prayed off";
261 261 Plain "prayed for"; Plain "prayed away";
262 262 Plain "snacked"; Plain "snacked up";
263 263 Plain "snacked out"; Plain "snacked away";
264 + Plain "snacked off";
264 265 |]
265 266 let roas = [| "on"; "shooting up"; "using"; "mainlining"; "snorting"; "vaping"; "smoking"; "cybering";
266 267 "sucking down"; "gargling"; "doing"; "trying"; "slurping"; "guzzling"; "popping"; "downing"; "chewing"; "pooping"; "shitting"; "pissing";
267 268 "crunching"; "sniffing"; "zapping"; "downloading"; "dropping"; "cooking up"; "freebasing"; "hooting"; "tooting"; "blasting"; "blazing";
268 - "tweeting"; "honking"; "plugging"; "plugging in"; "hooking up"; "turning on"; "boofing"; "whacking"; "choking"; "ravishing"; "looting"; "slaughtering"; "drinking"; "eating"; "slugging"; "ghouling"; "scrobbling"; |]
269 + "tweeting"; "honking"; "plugging"; "plugging in"; "hooking up"; "turning on"; "boofing"; "whacking"; "choking"; "ravishing"; "looting"; "slaughtering"; "drinking"; "eating"; "slugging"; "ghouling"; "scrobbling"; "torrenting"; "oiling up"; "jacking off";|]
269 270 let vroas = [| "shoot up"; "mainline"; "snort"; "vape"; "smoke"; "slurp";
270 271 "suck down"; "gargle"; "do"; "try"; "guzzle"; "pop"; "down"; "chew"; "crunch"; "poop"; "shit"; "piss"; "blast"; "blaze";
271 272 "sniff"; "zap"; "download"; "drop"; "cyber"; "cook up"; "toot"; "hoot"; "plug"; "plug in";
272 - "hook up"; "turn on"; "boof"; "whack"; "choke"; "drink"; "eat"; "slug"; "ghoul"; "freebase"; "ravish"; "loot"; "slaughter"; "scrobble";|]
273 + "hook up"; "turn on"; "boof"; "whack"; "choke"; "drink"; "eat"; "slug"; "ghoul"; "freebase"; "ravish"; "loot"; "slaughter"; "scrobble"; "torrent"; "oil up"; "jack off";|]
273 274 module Pronoun = struct
274 275 type t = {
275 276 nom : string; obl : string; gen : string;
276 277 refl : string; cop : string; brevcop : string;
277 278 pl : bool;
278 279 }
279 280 let you = {nom = "you"; obl = "you"; gen = "your"; refl = "yourself";