RosettaCodeData/Task/Reverse-a-string/Bracmat/reverse-a-string.bracmat

  ( reverse
  = L x
    .     :?L
        & @( !arg
           :   ?
               ( %?x
               & utf$!x
               & !x !L:?L
               & ~`
               )
               ?
           )
      | str$!L
  )
& out$reverse$Ελληνικά