(use srfi-42)(do-ec(:\(read-line))(print(string-ec(: d #\A\)d)))