diff --git a/prelude.ld b/prelude.ld
index a6bd347..c5d39f8 100644
--- a/prelude.ld
+++ b/prelude.ld
@@ -374,11 +374,8 @@ fn strip {
 fn words {
 	"Takes a string and returns a list of the words in the string. Strips all whitespace."
 	(str as :string) -> {
-		print! (str)
 		let no_punct = strip (str)
-		print! (no_punct)
 		let strs = split (no_punct, " ")
-		print! (strs)
 		fn worder (list, str) -> if empty? (str) 
 			then do list > report! 
 			else do append (list, str) > report!