IGNORE PATH AND GET QUERY PARAMETER

getqueryparameter.elm

 getExam : String -> Maybe String
 getExam str = case Url.fromString str of
   Nothing -> Nothing
   Just u ->
       Maybe.withDefault Nothing (Url.Parser.parse (Url.Parser.query (Url.Parser.Query.string "exam")) { u | path = "" })

extractSearchArgument : String -> Url -> Maybe String
extractSearchArgument key location =
  { location | path = "" }
    |> Url.Parser.parse (Url.Parser.query (Url.Parser.Query.string key))
    |> Maybe.withDefault Nothing