4e835920317c017543d45754a94929f1fea0289220cceb40ae5b7848237d028e

Download raw

Created: 2023-12-19 03:40:10.302489 UTC

Size: 1976

Preview (limited to 512 bytes)

"{-# LANGUAGE ScopedTypeVariables, TemplateHaskell #-}\nmodule Main where\n\n--------------------------------------------------------------------------\n-- imports\n\nimport Test.QuickCheck\n\nimport Data.List\n ( sort\n )\n\n--------------------------------------------------------------------------\n-- merge sort\n\nmsort :: Ord a => [a] -> [a]\nmsort xs = merging [ [x] | x <- xs ]\n\nmerging :: Ord a => [[a]] -> [a]\nmerging [] = []\nmerging [xs] = xs\nmerging xss = merging (sweep xss)\n\nsweep :: Ord a => [[a]] -> [[a]]\nsw"

Casa is a service provided by the Haskell Foundation │ Originally developed by FP Complete