title: Parsing JSON haskell
body: <p>I am trying to access the inner <code>Object</code> in my request. This is my code:</p>
  
  <pre><code>{-# LANGUAGE OverloadedStrings #-}
  
  
  import Network.Wreq
  import Control.Lens
  import Data.Aeson
  
  import Data.Map as Map
  
  type Resp = Response (Map String Value)
  
  
  main = do
      r &lt;- asJSON =&lt;&lt; get "https://bittrex.com/api/v1.1/public/getticker?market=BTC-LTC" :: IO Resp
      let result = (r ^. responseBody)    
      print result
  </code></pre>
  
  <p>This is my result:</p>
  
  <pre><code>fromList [("message",String ""),("result",Object (fromList [("Bid",Number 1.441e-2),("Ask",Number 1.44101e-2),("Last",Number 1.441e-2)])),("success",Bool True)]
  </code></pre>
  
  <p>I am trying to access the "result" key's Object and then access the values inside of there. I'm not sure how to do it, I've messed around with AESON and <code>^?</code> operator that <code>wreq</code> provides but it's not working for me.</p>