Andy Weiss rokob

## MergeSort.hs
module MergeSort (mergeSort) where
-- | Bottom-up merge sort.
mergeSort :: Ord a => [a] -> [a]
mergeSort = mergeAll . map (:[])
  where
    mergeAll []   = []
    mergeAll [xs] = xs
    mergeAll xss  = mergeAll (mergePairs xss)

    mergePairs (a:b:xs) =

## imgur-oauth-test.html
<!DOCTYPE html>

<html lang="en">
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
    <title>imgur oauth</title>
    <script src="http://code.jquery.com/jquery.min.js"></script>
    <script>
      $(function () {
        var extractToken = function(hash) {
	module MergeSort (mergeSort) where
	-- \| Bottom-up merge sort.
	mergeSort :: Ord a => [a] -> [a]
	mergeSort = mergeAll . map (:[])
	where
	mergeAll [] = []
	mergeAll [xs] = xs
	mergeAll xss = mergeAll (mergePairs xss)

	mergePairs (a:b:xs) =
	<!DOCTYPE html>

	<html lang="en">
	<head>
	<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
	<title>imgur oauth</title>
	<script src="http://code.jquery.com/jquery.min.js"></script>
	<script>
	$(function () {
	var extractToken = function(hash) {