Rename source.r to clean.r
New eval_clean and evalq_clean functions