Mikael Konutgan kmikael

## preview.rb
#!/usr/bin/env ruby

README = "README.md"

unless File.exist? README
  puts 'No README file found'
  exit 1
end

`open -a Marked #{README}`

## quicksort.hs
quicksort :: (Ord a) => [a] -> [a]
quicksort [] = []
quicksort (x:xs) = quicksort (filter (< x) xs) ++ [x] ++ quicksort (filter (>= x) xs)
	#!/usr/bin/env ruby

	README = "README.md"

	unless File.exist? README
	puts 'No README file found'
	exit 1
	end

	`open -a Marked #{README}`
	quicksort :: (Ord a) => [a] -> [a]
	quicksort [] = []
	quicksort (x:xs) = quicksort (filter (< x) xs) ++ [x] ++ quicksort (filter (>= x) xs)