import System. Environment
overlaps a b = [ slideWords n a b | n <- [ 0 .. minLength] ]
longestOverlap a b
= fst $ last $ ( filter ( \
( a
, b
) -> a
== b
) $ overlaps a b
)
condenseWords a b = if overlap == ""
then a ++ " " ++ b
where overlap = longestOverlap a b
main = do
aW1wb3J0IFN5c3RlbS5FbnZpcm9ubWVudAoKc2xpZGVXb3JkcyA6OiBJbnQgLT4gU3RyaW5nIC0+IFN0cmluZyAtPiAoU3RyaW5nLCBTdHJpbmcpCnNsaWRlV29yZHMgbiBhIGIgPSAoZHJvcCAoKGxlbmd0aCBhKSAtIG4pIGEsIHRha2UgbiBiKQoKb3ZlcmxhcHMgOjogU3RyaW5nIC0+IFN0cmluZyAtPiBbKFN0cmluZywgU3RyaW5nKV0Kb3ZlcmxhcHMgYSBiID0gW3NsaWRlV29yZHMgbiBhIGIgfCBuIDwtIFswLi5taW5MZW5ndGhdXQogIHdoZXJlIG1pbkxlbmd0aCA9IG1pbiAobGVuZ3RoIGEpIChsZW5ndGggYikKCmxvbmdlc3RPdmVybGFwIDo6IFN0cmluZyAtPiBTdHJpbmcgLT4gU3RyaW5nCmxvbmdlc3RPdmVybGFwIGEgYiA9IGZzdCAkIGxhc3QgJCAoZmlsdGVyIChcKGEsYikgLT4gYT09YikgJCBvdmVybGFwcyBhIGIpCgpjb25kZW5zZVdvcmRzIDo6IFN0cmluZyAtPiBTdHJpbmcgLT4gU3RyaW5nCmNvbmRlbnNlV29yZHMgYSBiID0gaWYgb3ZlcmxhcCA9PSAiIgogICAgICAgICAgICAgICAgICAgIHRoZW4gYSArKyAiICIgKysgYgogICAgICAgICAgICAgICAgICAgIGVsc2UgYSArKyAoZHJvcCAobGVuZ3RoIG92ZXJsYXApIGIpCiAgd2hlcmUgb3ZlcmxhcCA9IGxvbmdlc3RPdmVybGFwIGEgYgoKY29uZGVuc2UgOjogU3RyaW5nIC0+IFN0cmluZwpjb25kZW5zZSB3cyA9IGZvbGRyIGNvbmRlbnNlV29yZHMgIiIgJCB3b3JkcyB3cwoKbWFpbiA9IGRvCiAgaW5wdXQgPC0gZm1hcCB1bndvcmRzIGdldEFyZ3MKICBwdXRTdHJMbiAkIGNvbmRlbnNlIGlucHV0Cg==
stdin
SSBoZWFyZCB0aGUgcGFzdG9yIHNpbmcgbGl2ZXJzZXMgZWFzaWx5LgpEZWVwIGVwaXNvZGVzIG9mIERlZXAgU3BhY2UgTmluZSBjYW1lIG9uIHRoZSB0ZWxldmlzaW9uIG9ubHkgYWZ0ZXIgdGhlIG5ld3MuCkRpZ2l0YWwgYWxhcm0gY2xvY2tzIHNjYXJlIGFyZWEgY2hpbGRyZW4u
I heard the pastor sing liverses easily.
Deep episodes of Deep Space Nine came on the television only after the news.
Digital alarm clocks scare area children.