module IHP.SEO.Sitemap.Types ( SitemapController(..) , Sitemap(..) , SitemapLink(..) , SitemapChangeFrequency(..) ) where import IHP.Prelude import Prelude (Show(..)) data SitemapController = SitemapAction deriving (SitemapController -> SitemapController -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: SitemapController -> SitemapController -> Bool $c/= :: SitemapController -> SitemapController -> Bool == :: SitemapController -> SitemapController -> Bool $c== :: SitemapController -> SitemapController -> Bool Eq, Int -> SitemapController -> ShowS [SitemapController] -> ShowS SitemapController -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [SitemapController] -> ShowS $cshowList :: [SitemapController] -> ShowS show :: SitemapController -> String $cshow :: SitemapController -> String showsPrec :: Int -> SitemapController -> ShowS $cshowsPrec :: Int -> SitemapController -> ShowS Show, Typeable SitemapController SitemapController -> Constr SitemapController -> DataType (forall b. Data b => b -> b) -> SitemapController -> SitemapController forall a. Typeable a -> (forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> a -> c a) -> (forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a) -> (a -> Constr) -> (a -> DataType) -> (forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c a)) -> (forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a)) -> ((forall b. Data b => b -> b) -> a -> a) -> (forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall u. (forall d. Data d => d -> u) -> a -> [u]) -> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u) -> (forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> Data a forall u. Int -> (forall d. Data d => d -> u) -> SitemapController -> u forall u. (forall d. Data d => d -> u) -> SitemapController -> [u] forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapController -> r forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapController -> r forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapController forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapController -> c SitemapController forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapController) forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapController) gmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController $cgmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController gmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController $cgmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController gmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController $cgmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapController -> m SitemapController gmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> SitemapController -> u $cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> SitemapController -> u gmapQ :: forall u. (forall d. Data d => d -> u) -> SitemapController -> [u] $cgmapQ :: forall u. (forall d. Data d => d -> u) -> SitemapController -> [u] gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapController -> r $cgmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapController -> r gmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapController -> r $cgmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapController -> r gmapT :: (forall b. Data b => b -> b) -> SitemapController -> SitemapController $cgmapT :: (forall b. Data b => b -> b) -> SitemapController -> SitemapController dataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapController) $cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapController) dataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapController) $cdataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapController) dataTypeOf :: SitemapController -> DataType $cdataTypeOf :: SitemapController -> DataType toConstr :: SitemapController -> Constr $ctoConstr :: SitemapController -> Constr gunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapController $cgunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapController gfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapController -> c SitemapController $cgfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapController -> c SitemapController Data) data Sitemap = Sitemap { Sitemap -> [SitemapLink] links :: [SitemapLink] } deriving (Sitemap -> Sitemap -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: Sitemap -> Sitemap -> Bool $c/= :: Sitemap -> Sitemap -> Bool == :: Sitemap -> Sitemap -> Bool $c== :: Sitemap -> Sitemap -> Bool Eq, Int -> Sitemap -> ShowS [Sitemap] -> ShowS Sitemap -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [Sitemap] -> ShowS $cshowList :: [Sitemap] -> ShowS show :: Sitemap -> String $cshow :: Sitemap -> String showsPrec :: Int -> Sitemap -> ShowS $cshowsPrec :: Int -> Sitemap -> ShowS Show, Typeable Sitemap Sitemap -> Constr Sitemap -> DataType (forall b. Data b => b -> b) -> Sitemap -> Sitemap forall a. Typeable a -> (forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> a -> c a) -> (forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a) -> (a -> Constr) -> (a -> DataType) -> (forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c a)) -> (forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a)) -> ((forall b. Data b => b -> b) -> a -> a) -> (forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall u. (forall d. Data d => d -> u) -> a -> [u]) -> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u) -> (forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> Data a forall u. Int -> (forall d. Data d => d -> u) -> Sitemap -> u forall u. (forall d. Data d => d -> u) -> Sitemap -> [u] forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Sitemap -> r forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Sitemap -> r forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Sitemap forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Sitemap -> c Sitemap forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Sitemap) forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Sitemap) gmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap $cgmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap gmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap $cgmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap gmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap $cgmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> Sitemap -> m Sitemap gmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> Sitemap -> u $cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> Sitemap -> u gmapQ :: forall u. (forall d. Data d => d -> u) -> Sitemap -> [u] $cgmapQ :: forall u. (forall d. Data d => d -> u) -> Sitemap -> [u] gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Sitemap -> r $cgmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Sitemap -> r gmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Sitemap -> r $cgmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Sitemap -> r gmapT :: (forall b. Data b => b -> b) -> Sitemap -> Sitemap $cgmapT :: (forall b. Data b => b -> b) -> Sitemap -> Sitemap dataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Sitemap) $cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Sitemap) dataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Sitemap) $cdataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Sitemap) dataTypeOf :: Sitemap -> DataType $cdataTypeOf :: Sitemap -> DataType toConstr :: Sitemap -> Constr $ctoConstr :: Sitemap -> Constr gunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Sitemap $cgunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Sitemap gfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Sitemap -> c Sitemap $cgfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Sitemap -> c Sitemap Data) data SitemapLink = SitemapLink { SitemapLink -> Text url :: Text, SitemapLink -> Maybe UTCTime lastModified :: Maybe UTCTime, SitemapLink -> Maybe SitemapChangeFrequency changeFrequency :: Maybe SitemapChangeFrequency } deriving (SitemapLink -> SitemapLink -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: SitemapLink -> SitemapLink -> Bool $c/= :: SitemapLink -> SitemapLink -> Bool == :: SitemapLink -> SitemapLink -> Bool $c== :: SitemapLink -> SitemapLink -> Bool Eq, Int -> SitemapLink -> ShowS [SitemapLink] -> ShowS SitemapLink -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [SitemapLink] -> ShowS $cshowList :: [SitemapLink] -> ShowS show :: SitemapLink -> String $cshow :: SitemapLink -> String showsPrec :: Int -> SitemapLink -> ShowS $cshowsPrec :: Int -> SitemapLink -> ShowS Show, Typeable SitemapLink SitemapLink -> Constr SitemapLink -> DataType (forall b. Data b => b -> b) -> SitemapLink -> SitemapLink forall a. Typeable a -> (forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> a -> c a) -> (forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a) -> (a -> Constr) -> (a -> DataType) -> (forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c a)) -> (forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a)) -> ((forall b. Data b => b -> b) -> a -> a) -> (forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall u. (forall d. Data d => d -> u) -> a -> [u]) -> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u) -> (forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> Data a forall u. Int -> (forall d. Data d => d -> u) -> SitemapLink -> u forall u. (forall d. Data d => d -> u) -> SitemapLink -> [u] forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapLink -> r forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapLink -> r forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapLink forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapLink -> c SitemapLink forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapLink) forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapLink) gmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink $cgmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink gmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink $cgmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink gmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink $cgmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapLink -> m SitemapLink gmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> SitemapLink -> u $cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> SitemapLink -> u gmapQ :: forall u. (forall d. Data d => d -> u) -> SitemapLink -> [u] $cgmapQ :: forall u. (forall d. Data d => d -> u) -> SitemapLink -> [u] gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapLink -> r $cgmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapLink -> r gmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapLink -> r $cgmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapLink -> r gmapT :: (forall b. Data b => b -> b) -> SitemapLink -> SitemapLink $cgmapT :: (forall b. Data b => b -> b) -> SitemapLink -> SitemapLink dataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapLink) $cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapLink) dataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapLink) $cdataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapLink) dataTypeOf :: SitemapLink -> DataType $cdataTypeOf :: SitemapLink -> DataType toConstr :: SitemapLink -> Constr $ctoConstr :: SitemapLink -> Constr gunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapLink $cgunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapLink gfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapLink -> c SitemapLink $cgfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapLink -> c SitemapLink Data) data SitemapChangeFrequency = Always | Hourly | Daily | Weekly | Monthly | Yearly | Never deriving (SitemapChangeFrequency -> SitemapChangeFrequency -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: SitemapChangeFrequency -> SitemapChangeFrequency -> Bool $c/= :: SitemapChangeFrequency -> SitemapChangeFrequency -> Bool == :: SitemapChangeFrequency -> SitemapChangeFrequency -> Bool $c== :: SitemapChangeFrequency -> SitemapChangeFrequency -> Bool Eq, Typeable SitemapChangeFrequency SitemapChangeFrequency -> Constr SitemapChangeFrequency -> DataType (forall b. Data b => b -> b) -> SitemapChangeFrequency -> SitemapChangeFrequency forall a. Typeable a -> (forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> a -> c a) -> (forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c a) -> (a -> Constr) -> (a -> DataType) -> (forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c a)) -> (forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a)) -> ((forall b. Data b => b -> b) -> a -> a) -> (forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r) -> (forall u. (forall d. Data d => d -> u) -> a -> [u]) -> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u) -> (forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> (forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> a -> m a) -> Data a forall u. Int -> (forall d. Data d => d -> u) -> SitemapChangeFrequency -> u forall u. (forall d. Data d => d -> u) -> SitemapChangeFrequency -> [u] forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapChangeFrequency -> r forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapChangeFrequency -> r forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapChangeFrequency forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapChangeFrequency -> c SitemapChangeFrequency forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapChangeFrequency) forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapChangeFrequency) gmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency $cgmapMo :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency gmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency $cgmapMp :: forall (m :: * -> *). MonadPlus m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency gmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency $cgmapM :: forall (m :: * -> *). Monad m => (forall d. Data d => d -> m d) -> SitemapChangeFrequency -> m SitemapChangeFrequency gmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> SitemapChangeFrequency -> u $cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> SitemapChangeFrequency -> u gmapQ :: forall u. (forall d. Data d => d -> u) -> SitemapChangeFrequency -> [u] $cgmapQ :: forall u. (forall d. Data d => d -> u) -> SitemapChangeFrequency -> [u] gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapChangeFrequency -> r $cgmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> SitemapChangeFrequency -> r gmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapChangeFrequency -> r $cgmapQl :: forall r r'. (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> SitemapChangeFrequency -> r gmapT :: (forall b. Data b => b -> b) -> SitemapChangeFrequency -> SitemapChangeFrequency $cgmapT :: (forall b. Data b => b -> b) -> SitemapChangeFrequency -> SitemapChangeFrequency dataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapChangeFrequency) $cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *). Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c SitemapChangeFrequency) dataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapChangeFrequency) $cdataCast1 :: forall (t :: * -> *) (c :: * -> *). Typeable t => (forall d. Data d => c (t d)) -> Maybe (c SitemapChangeFrequency) dataTypeOf :: SitemapChangeFrequency -> DataType $cdataTypeOf :: SitemapChangeFrequency -> DataType toConstr :: SitemapChangeFrequency -> Constr $ctoConstr :: SitemapChangeFrequency -> Constr gunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapChangeFrequency $cgunfold :: forall (c :: * -> *). (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c SitemapChangeFrequency gfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapChangeFrequency -> c SitemapChangeFrequency $cgfoldl :: forall (c :: * -> *). (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> SitemapChangeFrequency -> c SitemapChangeFrequency Data) instance Show SitemapChangeFrequency where show :: SitemapChangeFrequency -> String show SitemapChangeFrequency Always = String "always" show SitemapChangeFrequency Hourly = String "hourly" show SitemapChangeFrequency Daily = String "daily" show SitemapChangeFrequency Weekly = String "weekly" show SitemapChangeFrequency Monthly = String "monthly" show SitemapChangeFrequency Yearly = String "yearly" show SitemapChangeFrequency Never = String "never"