Snake extend

type Coordinate  = (Int,Int) 
type Direction   = (Int,Int)                                                                                                           
type Snake       = [Coordinate]                                                                                                        

-- Make use of pattern matching 
extend :: Snake -> Direction -> Snake                                                                                                  
extend = undefined  

Je kunt zo vaak indienen als je wenst. Er wordt enkel rekening gehouden met je laatst ingediende oplossing.