module Request where -- Request query url method data Request = Request String String String getQuery (Request query _ _) = query getUrl (Request _ url _) = url getMethod (Request _ _ method) = method