data Method
  = DELETE
  | GET
  | POST
  | PUT
  deriving (Eq, Ord, Read, Show)

-- | Braintree Request Parameters
data BraintreeParameter
  = BTDict [(ByteString, BraintreeParameter)]
  | BTList [BraintreeParameter]
  | BTBool Bool
  | BTInt Int