2018-01-23 07:48 EST
Great unity in the Republican Party. Want to, once and for all, put an end to stoppable crime and drugs! Border Security and Wall. No doubt!
— Donald J. Trump (@realDonaldTrump) January 23, 2019
2018-01-23 07:57 EST
BUILD A WALL & CRIME WILL FALL! This is the new theme, for two years until the Wall is finished (under construction now), of the Republican Party. Use it and pray!
— Donald J. Trump (@realDonaldTrump) January 23, 2019
2018-01-23 07:59 EST
BUILD A WALL & CRIME WILL FALL!
— Donald J. Trump (@realDonaldTrump) January 23, 2019
2018-01-23 08:13 EST
BUILD A WALL
& CRIME WILL FALL!
BUILD A WALL
& CRIME WILL FALL!
BUILD A WALL
& CRIME WILL FALL!
BUILD A WALL
& CRIME WILL FALL!
BUILD A WALL
& CRIME WILL FALL!
BUILD A WALL
& CRIME WILL FALL!
BUILD A WALL
& CRIME WILL FALL!
— CC (@ChatByCC) January 23, 2019
2018-01-24 08:43 EST
TWEETS FROM PARROTS FED WITH CARROTShttps://t.co/41m74hVQUK
— Goetz Kluge (@Bonnetmaker) January 24, 2019
Application:
The Bellman’s Rule
#! /usr/bin/haskell
import Data.List
statementList :: [String]
statementList =
["BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"I am a stable genius!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"1+1=2"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"I am a stable genius!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"I am a stable genius!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
,"BUILD A WALL & CRIME WILL FALL!"
]
atLeastThrice :: [String] -> [String]
atLeastThrice sL =
[head grp | grp <-
group $ sort sL, length grp >= 3]
Result (if loaded and executed in GHCi):
*Main> atLeastThrice statementList
["BUILD A WALL & CRIME WILL FALL!","I am a stable genius!"]
Interpretation: “BUILD A WALL & CRIME WILL FALL!” and “I am a stable genius!” are true, because both assertions appeared at least three times. Actually, “BUILD A WALL & CRIME WILL FALL!” is double-plus-true, because all letters have been capitalized and because the assertion ends with an exclamation mark.
Search "BUILD THE WALL" and "CRIME WILL FALL" in @realDonaldTrump:https://t.co/r4vMrX6yrf
Search "BUILD THE WALL" and "CRIME WILL FALL" in @GOP:https://t.co/upeVJ9zgeO
Why doesn't the GOP use Trumps theme?https://t.co/HULCiKMnxT
— Goetz Kluge (@Bonnetmaker) January 25, 2019