supernullset

curry = (fn)->
  slice = Array.prototype.slice
  args = slice.apply arguments, [1]
  return ->
   fn.apply null, args.concat(slice.apply arguments)

levenshteinD = (s,t) ->

  if !s.length then return t.length    
  if !t.length then return s.length

supernullset

require 'net/ftp'

ftp_root = "tgftp.nws.noaa.gov"

# Im running conn_test with arbitrary values for n
def conn_test(root, n)
  (1..n).to_a.each do |i|
    ftp = Net::FTP.new root
    begin
      ftp.passive

supernullset

{-# LANGUAGE DeriveGeneric, OverloadedStrings #-}

import Network.Riak
import Network.Riak.Connection as C
import Network.Socket as S
import System.IO.Unsafe (unsafePerformIO)
import Data.ByteString.Lazy.Char8 as BSL
import Network.Riak.JSON.Resolvable as RR
import Network.Riak.Types
import Data.Aeson