Example usage: > import Test.QuickCheck > import Test.QuickCheck.Monadic (run, pick, assert) > import Test.WebDriver prop_Example = monadicWD context $ do url :: String <- pick $ elements ["http://www.yesodweb.com", "http://snapframework.com/"] run $ openPage url assert True runIO $ putStrLn $ "We've just evaluated a `Gen a` using pick and a `WD ()` using run, then asserted a that a property holds using assert." where context = SessionParams allCaps (return ())