Guest User

Untitled

a guest
May 23rd, 2018
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.24 KB | None | 0 0
  1. definition module PairingHeap
  2.  
  3. :: Heap a = Empty | Node a [Heap a]
  4.  
  5. peek :: (Heap a) -> a
  6. push :: a -> (Heap a) -> (Heap a) | Ord a
  7. pop :: (Heap a) -> (Heap a) | Ord a
  8. listToHeap :: ([a] -> (Heap a)) | Ord a
  9. heapToList :: (Heap a) -> [a] | Ord a
Add Comment
Please, Sign In to add comment