  -- ^ The 'Text' to look for in the row.
                    -> Course         -- ^ The row to look in.
                    -> Maybe Text     -- ^ The 'Text' of the cell if it was found otherwise 'Nothing'.
getCellContentMaybe k (_, c) = Map.lookup k c




getCellContentMaybe :: Text           -- ^ The 'Text' to look for in the row.
                    -> Course         -- ^ The row to look in.
                    -> Maybe Text
getCellContentMaybe k (_, c) = Map.lookup k c
getCellContentMaybe k (_, c) = Map.lookup k c