diff --git a/Print2DListLex.hs b/Print2DListLex.hs index aa895ae1a61e0480d364f17eb3221cd2c8347f89..0d853565c691e55f286a611c6fbfee63d609ba2e 100644 --- a/Print2DListLex.hs +++ b/Print2DListLex.hs @@ -1,13 +1,7 @@ import Data.List -import Data.Char -import Data.Sequence --- | Function print2aaaDListLex --- 1. takes in a list of records --- 2. prints them in lexicographical order -print2DListLex :: [[String]] -> IO() -print2DListLex (record:records) = sortBy () records +type Row = [String] --- | rearran -rearrange :: [[String]] -> [[String]] -rearrange record \ No newline at end of file +-- | Takes in a list of rows and prints them in lexicographical order +print2DListLex :: [Row] -> IO() +print2DListLex rows = returnIO $ sort rows