Add "Crack the Coding Interview" examples
I believe I have multiple other snippets and attempts scattered across /tmp, ~/programming, and other directories. Again, I created these files and others before the mono-repo.
This commit is contained in:
		
							parent
							
								
									456d358cd7
								
							
						
					
					
						commit
						b4ee283b23
					
				
					 2 changed files with 51 additions and 0 deletions
				
			
		
							
								
								
									
										11
									
								
								crack_the_coding_interview/to_tree.hs
									
										
									
									
									
										Normal file
									
								
							
							
						
						
									
										11
									
								
								crack_the_coding_interview/to_tree.hs
									
										
									
									
									
										Normal file
									
								
							| 
						 | 
				
			
			@ -0,0 +1,11 @@
 | 
			
		|||
data Tree a = Node a [Tree a] deriving (Show)
 | 
			
		||||
 | 
			
		||||
withRoot :: [a] -> [Tree a]
 | 
			
		||||
withRoot xs = xs |> toThing |> fmap buildTree
 | 
			
		||||
 | 
			
		||||
buildTree :: (a, [a])
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
toTree :: [a] -> Tree a
 | 
			
		||||
toTree [x]      = Node x []
 | 
			
		||||
toTree [x | xs] = Node x (toTree xs)
 | 
			
		||||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue