Palindrome checker

# Self-authored for the EML case corpus (no external origin). Checks whether
# each of several sample words/phrases is a palindrome. The native EML `[a:b]`
# range/slice grammar has no Python-style step form, so `s[::-1]` is not
# available (verified empirically); the reverse is instead built manually by
# walking the string back-to-front with a counted loop and concatenation.

candidates^+["level", "radar", "python", "deified", "civic", "transpiler"]

length^+0
reversed_word^+""

for word in candidates:
    len(word) => length
    "" => reversed_word
    for i in [0:length-1]:
        word[length - 1 - i] => ch
        reversed_word + ch => reversed_word
    if word == reversed_word:
        word^0(" -> palindrome\n")
    else:
        word^0(" -> not a palindrome\n")

candidates = ["level", "radar", "python", "deified", "civic", "transpiler"]
length = 0
reversed_word = ""
for word in candidates:
    length = len(word)
    reversed_word = ""
    for i in range(0, length):
        ch = word[length - 1 - i]
        reversed_word = reversed_word + ch
    if word == reversed_word:
        print(word, end=" -> palindrome\n")
    else:
        print(word, end=" -> not a palindrome\n")

level -> palindrome
radar -> palindrome
python -> not a palindrome
deified -> palindrome
civic -> palindrome
transpiler -> not a palindrome

Trace event types