kljsadg

Umbc331Assignment3 · Oct 7, 2014 · c5070e4 · c5070e4
1 parent c248661
commit c5070e4
Showing 1 changed file with 5 additions and 0 deletions.
diff --git 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 
 
 
 {-