import           Safe               (headMay, lastMay)

import           Network.Wreq       (redirects)

import           Control.Lens

import           Natas.Natas
import           Natas.Parse

solution :: Solution
solution = do
  let req = getLevel' 22 (parentUri 22 ++ "/?revelio") (redirects .~ 0)