diff --git a/mattsjunk.hs b/mattsjunk.hs
index 7a11b90..0c4ff0b 100644
--- a/mattsjunk.hs
+++ b/mattsjunk.hs
@@ -32,6 +32,11 @@ addstudent s curstu = head [ (y, s: x) | let x = snd curstu , let y = fst curstu
 outputlist :: Int -> [[Int]]
 outputlist numgroup =  map (drop 1) (map (:[]) [1..(numgroup)])
 
+--checkoutputlist (ss) curstu ol= 
+--	if (not . (elem curstu ol))
+--	then if
+--			map curstu currentstudent `checkindividual`
+--			then 
 
 						
 {-