11 lines
372 B
Text
11 lines
372 B
Text
// version 1.2.0
|
|
|
|
import java.io.File
|
|
|
|
fun main(args: Array<String>) {
|
|
val words = File("unixdict.txt").readLines().toSet()
|
|
val pairs = words.map { Pair(it, it.reversed()) }
|
|
.filter { it.first < it.second && it.second in words } // avoid dupes+palindromes, find matches
|
|
println("Found ${pairs.size} semordnilap pairs")
|
|
println(pairs.take(5))
|
|
}
|