diff --git a/TwentyOne.R b/TwentyOne.R
index b5001b2..fc43d11 100644
--- a/TwentyOne.R
+++ b/TwentyOne.R
@@ -15,7 +15,8 @@ InIt <- function(){
 	return(deck)
    }
 
-# Shuffling the deck of cards randomly
+# Shuffling the deck of cards randomly to get a random card each ime
+
 
 Shuffle <- function(deck){
 
@@ -181,4 +182,4 @@ TwentyOne <- function(){
 	  } 
 }
 
-TwentyOne()
\ No newline at end of file
+TwentyOne()