SimpleSearch : Typesearch : Monad m => (Context me (URL auth pth SimpleSearch) v h1 st h2 a b -> m (Context me' (URL auth pth SimpleSearch) v' h1' st' h2' a' b')) -> Context me (URL auth pth String) v h1 st h2 a b -> m (Context me' (URL auth pth String) v' h1' st' h2' a' b')