Initial data commit

Task/Semordnilap/D/semordnilap-1.d

@@ -0,0 +1,19 @@
+void main() {
+    import std.stdio, std.file, std.string, std.algorithm;
+
+    bool[string] seenWords;
+    size_t pairCount = 0;
+
+    foreach (const word; "unixdict.txt".readText.toLower.splitter) {
+        //const drow = word.dup.reverse();
+        auto drow = word.dup;
+        drow.reverse();
+        if (drow in seenWords) {
+            if (pairCount++ < 5)
+                writeln(word, " ", drow);
+        } else
+            seenWords[word] = true;
+    }
+
+    writeln("\nSemordnilap pairs: ", pairCount);
+}

Task/Semordnilap/D/semordnilap-2.d

@@ -0,0 +1,9 @@
+void main() {
+    import std.stdio, std.file, std.algorithm, std.string, std.range;
+
+    auto words = "unixdict.txt".readText.split.zip(0.repeat).assocArray;
+    auto pairs = zip(words.byKey, words.byKey.map!(w => w.dup.reverse))
+                 .filter!(wr => wr[0] < wr[1] && wr[1] in words)
+                 .zip(0.repeat).assocArray;
+    writeln(pairs.length, "\n", pairs.byKey.take(5));
+}