| 
 Module         : Faker . Avatar 
 Description    : Module for generating fake avatar url 
 Copyright      : ( c )   , 2014 - 2018 
 License        : MIT 
 Maintainer     :  
 Stability      : experimental 
 Portability    : POSIX 

 Fake data 

Module        : Faker.Avatar
Description   : Module for generating fake avatar url
Copyright     : (c) Alexey Gaziev, 2014-2018
License       : MIT
Maintainer    : 
Stability     : experimental
Portability   : POSIX

Fake data
-}
module Faker.Avatar
  (
  -- * Function for generate fake avatar url
    image
  ) where

import qualified Faker.Lorem as L
import           Faker.Utils

  | Returns random avatar url from robohash.org with 300x300 size ,
  i.e. "  "
image :: Faker String
image = do
  ws <- randomInt(2,5) >>= L.words
  let slug = foldl1 (++) ws
  return $ "/" ++ slug ++ ".png?size=300x300"

 * Function for generate fake avatar url
| 
 Module         : Faker . Avatar 
 Description    : Module for generating fake avatar url 
 Copyright      : ( c )   , 2014 - 2018 
 License        : MIT 
 Maintainer     :  
 Stability      : experimental 
 Portability    : POSIX 

 Fake data 

Module        : Faker.Avatar
Description   : Module for generating fake avatar url
Copyright     : (c) Alexey Gaziev, 2014-2018
License       : MIT
Maintainer    : 
Stability     : experimental
Portability   : POSIX

Fake data
-}
module Faker.Avatar
  (
    image
  ) where

import qualified Faker.Lorem as L
import           Faker.Utils

  | Returns random avatar url from robohash.org with 300x300 size ,
  i.e. "  "
image :: Faker String
image = do
  ws <- randomInt(2,5) >>= L.words
  let slug = foldl1 (++) ws
  return $ "/" ++ slug ++ ".png?size=300x300"
