palindrome?: function [s][
    s = reverse s
]

tests: [
    [true? palindrome? "aba"]
    [false? palindrome? "ab" ]
]

loop tests => ensure