Data commit

Task/Palindrome-detection/Seed7/palindrome-detection-1.seed7

@@ -0,0 +1,14 @@
+const func boolean: palindrome (in string: stri) is func
+  result
+    var boolean: isPalindrome is TRUE;
+  local
+    var integer: index is 0;
+    var integer: length is 0;
+  begin
+    length := length(stri);
+    for index range 1 to length div 2 do
+      if stri[index] <> stri[length - index + 1] then
+        isPalindrome := FALSE;
+      end if;
+    end for;
+  end func;

Task/Palindrome-detection/Seed7/palindrome-detection-2.seed7

@@ -0,0 +1 @@
+palindrome(replace("in girum imus nocte et consumimur igni", " ", ""))