(use srfi-13)
(display 
    (regexp-replace-all 
        #/treeone/ 
        (read-line 
            (standard-input-port))
        "forest"))
(newline)