Tetris onBoard

data Block     = Block (Int,Int)                                                                       
                 deriving (Eq,Show)    

width :: Float                                                                                         
width     = 10                                                                                         
height :: Float                                                                                        
height    = 20   

-- Does the block fits on the board                                                                    
-- Make use of the constants width and height                                                          
-- (* Difficulty 1 *)                                                                                  
onBoard :: Block -> Bool                                                                               
onBoard (Block (x,y)) = undefined

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