scaffolding
This commit is contained in:
		
							
								
								
									
										4
									
								
								.dir-locals.el
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										4
									
								
								.dir-locals.el
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,4 @@
 | 
			
		||||
((haskell-mode . ((haskell-indent-spaces . 4)
 | 
			
		||||
                  (haskell-process-use-ghci . t)))
 | 
			
		||||
 (hamlet-mode . ((hamlet/basic-offset . 4)
 | 
			
		||||
                 (haskell-process-use-ghci . t))))
 | 
			
		||||
							
								
								
									
										3
									
								
								.ghci
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										3
									
								
								.ghci
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,3 @@
 | 
			
		||||
:set -i.:config:dist/build/autogen
 | 
			
		||||
:set -DDEVELOPMENT
 | 
			
		||||
:set -XCPP -XTemplateHaskell -XQuasiQuotes -XTypeFamilies -XFlexibleContexts -XGADTs -XOverloadedStrings -XMultiParamTypeClasses -XGeneralizedNewtypeDeriving -XEmptyDataDecls -XDeriveDataTypeable
 | 
			
		||||
							
								
								
									
										14
									
								
								.gitignore
									
									
									
									
										vendored
									
									
										Normal file
									
								
							
							
						
						
									
										14
									
								
								.gitignore
									
									
									
									
										vendored
									
									
										Normal file
									
								
							@@ -0,0 +1,14 @@
 | 
			
		||||
dist*
 | 
			
		||||
static/tmp/
 | 
			
		||||
static/combined/
 | 
			
		||||
config/client_session_key.aes
 | 
			
		||||
*.hi
 | 
			
		||||
*.o
 | 
			
		||||
*.sqlite3
 | 
			
		||||
.hsenv*
 | 
			
		||||
cabal-dev/
 | 
			
		||||
yesod-devel/
 | 
			
		||||
.cabal-sandbox
 | 
			
		||||
cabal.sandbox.config
 | 
			
		||||
.DS_Store
 | 
			
		||||
*.swp
 | 
			
		||||
							
								
								
									
										171
									
								
								Application.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										171
									
								
								Application.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,171 @@
 | 
			
		||||
{-# OPTIONS_GHC -fno-warn-orphans #-}
 | 
			
		||||
module Application
 | 
			
		||||
    ( getApplicationDev
 | 
			
		||||
    , appMain
 | 
			
		||||
    , develMain
 | 
			
		||||
    , makeFoundation
 | 
			
		||||
    -- * for DevelMain
 | 
			
		||||
    , getApplicationRepl
 | 
			
		||||
    , shutdownApp
 | 
			
		||||
    -- * for GHCI
 | 
			
		||||
    , handler
 | 
			
		||||
    , db
 | 
			
		||||
    ) where
 | 
			
		||||
 | 
			
		||||
import Control.Monad.Logger                 (liftLoc, runLoggingT)
 | 
			
		||||
import Database.Persist.Postgresql          (createPostgresqlPool, pgConnStr,
 | 
			
		||||
                                             pgPoolSize, runSqlPool)
 | 
			
		||||
import Import
 | 
			
		||||
import Language.Haskell.TH.Syntax           (qLocation)
 | 
			
		||||
import Network.Wai.Handler.Warp             (Settings, defaultSettings,
 | 
			
		||||
                                             defaultShouldDisplayException,
 | 
			
		||||
                                             runSettings, setHost,
 | 
			
		||||
                                             setOnException, setPort, getPort)
 | 
			
		||||
import Network.Wai.Middleware.RequestLogger (Destination (Logger),
 | 
			
		||||
                                             IPAddrSource (..),
 | 
			
		||||
                                             OutputFormat (..), destination,
 | 
			
		||||
                                             mkRequestLogger, outputFormat)
 | 
			
		||||
import System.Log.FastLogger                (defaultBufSize, newStdoutLoggerSet,
 | 
			
		||||
                                             toLogStr)
 | 
			
		||||
 | 
			
		||||
-- Import all relevant handler modules here.
 | 
			
		||||
-- Don't forget to add new modules to your cabal file!
 | 
			
		||||
import Handler.Common
 | 
			
		||||
import Handler.Home
 | 
			
		||||
 | 
			
		||||
-- This line actually creates our YesodDispatch instance. It is the second half
 | 
			
		||||
-- of the call to mkYesodData which occurs in Foundation.hs. Please see the
 | 
			
		||||
-- comments there for more details.
 | 
			
		||||
mkYesodDispatch "App" resourcesApp
 | 
			
		||||
 | 
			
		||||
-- | This function allocates resources (such as a database connection pool),
 | 
			
		||||
-- performs initialization and return a foundation datatype value. This is also
 | 
			
		||||
-- the place to put your migrate statements to have automatic database
 | 
			
		||||
-- migrations handled by Yesod.
 | 
			
		||||
makeFoundation :: AppSettings -> IO App
 | 
			
		||||
makeFoundation appSettings = do
 | 
			
		||||
    -- Some basic initializations: HTTP connection manager, logger, and static
 | 
			
		||||
    -- subsite.
 | 
			
		||||
    appHttpManager <- newManager
 | 
			
		||||
    appLogger <- newStdoutLoggerSet defaultBufSize >>= makeYesodLogger
 | 
			
		||||
    appStatic <-
 | 
			
		||||
        (if appMutableStatic appSettings then staticDevel else static)
 | 
			
		||||
        (appStaticDir appSettings)
 | 
			
		||||
 | 
			
		||||
    -- We need a log function to create a connection pool. We need a connection
 | 
			
		||||
    -- pool to create our foundation. And we need our foundation to get a
 | 
			
		||||
    -- logging function. To get out of this loop, we initially create a
 | 
			
		||||
    -- temporary foundation without a real connection pool, get a log function
 | 
			
		||||
    -- from there, and then create the real foundation.
 | 
			
		||||
    let mkFoundation appConnPool = App {..}
 | 
			
		||||
        tempFoundation = mkFoundation $ error "connPool forced in tempFoundation"
 | 
			
		||||
        logFunc = messageLoggerSource tempFoundation appLogger
 | 
			
		||||
 | 
			
		||||
    -- Create the database connection pool
 | 
			
		||||
    pool <- flip runLoggingT logFunc $ createPostgresqlPool
 | 
			
		||||
        (pgConnStr  $ appDatabaseConf appSettings)
 | 
			
		||||
        (pgPoolSize $ appDatabaseConf appSettings)
 | 
			
		||||
 | 
			
		||||
    -- Perform database migration using our application's logging settings.
 | 
			
		||||
    runLoggingT (runSqlPool (runMigration migrateAll) pool) logFunc
 | 
			
		||||
 | 
			
		||||
    -- Return the foundation
 | 
			
		||||
    return $ mkFoundation pool
 | 
			
		||||
 | 
			
		||||
-- | Convert our foundation to a WAI Application by calling @toWaiAppPlain@ and
 | 
			
		||||
-- applyng some additional middlewares.
 | 
			
		||||
makeApplication :: App -> IO Application
 | 
			
		||||
makeApplication foundation = do
 | 
			
		||||
    logWare <- mkRequestLogger def
 | 
			
		||||
        { outputFormat =
 | 
			
		||||
            if appDetailedRequestLogging $ appSettings foundation
 | 
			
		||||
                then Detailed True
 | 
			
		||||
                else Apache
 | 
			
		||||
                        (if appIpFromHeader $ appSettings foundation
 | 
			
		||||
                            then FromFallback
 | 
			
		||||
                            else FromSocket)
 | 
			
		||||
        , destination = Logger $ loggerSet $ appLogger foundation
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
    -- Create the WAI application and apply middlewares
 | 
			
		||||
    appPlain <- toWaiAppPlain foundation
 | 
			
		||||
    return $ logWare $ defaultMiddlewaresNoLogging appPlain
 | 
			
		||||
 | 
			
		||||
-- | Warp settings for the given foundation value.
 | 
			
		||||
warpSettings :: App -> Settings
 | 
			
		||||
warpSettings foundation =
 | 
			
		||||
      setPort (appPort $ appSettings foundation)
 | 
			
		||||
    $ setHost (appHost $ appSettings foundation)
 | 
			
		||||
    $ setOnException (\_req e ->
 | 
			
		||||
        when (defaultShouldDisplayException e) $ messageLoggerSource
 | 
			
		||||
            foundation
 | 
			
		||||
            (appLogger foundation)
 | 
			
		||||
            $(qLocation >>= liftLoc)
 | 
			
		||||
            "yesod"
 | 
			
		||||
            LevelError
 | 
			
		||||
            (toLogStr $ "Exception from Warp: " ++ show e))
 | 
			
		||||
      defaultSettings
 | 
			
		||||
 | 
			
		||||
-- | For yesod devel, return the Warp settings and WAI Application.
 | 
			
		||||
getApplicationDev :: IO (Settings, Application)
 | 
			
		||||
getApplicationDev = do
 | 
			
		||||
    settings <- getAppSettings
 | 
			
		||||
    foundation <- makeFoundation settings
 | 
			
		||||
    wsettings <- getDevSettings $ warpSettings foundation
 | 
			
		||||
    app <- makeApplication foundation
 | 
			
		||||
    return (wsettings, app)
 | 
			
		||||
 | 
			
		||||
getAppSettings :: IO AppSettings
 | 
			
		||||
getAppSettings = loadAppSettings [configSettingsYml] [] useEnv
 | 
			
		||||
 | 
			
		||||
-- | main function for use by yesod devel
 | 
			
		||||
develMain :: IO ()
 | 
			
		||||
develMain = develMainHelper getApplicationDev
 | 
			
		||||
 | 
			
		||||
-- | The @main@ function for an executable running this site.
 | 
			
		||||
appMain :: IO ()
 | 
			
		||||
appMain = do
 | 
			
		||||
    -- Get the settings from all relevant sources
 | 
			
		||||
    settings <- loadAppSettingsArgs
 | 
			
		||||
        -- fall back to compile-time values, set to [] to require values at runtime
 | 
			
		||||
        [configSettingsYmlValue]
 | 
			
		||||
 | 
			
		||||
        -- allow environment variables to override
 | 
			
		||||
        useEnv
 | 
			
		||||
 | 
			
		||||
    -- Generate the foundation from the settings
 | 
			
		||||
    foundation <- makeFoundation settings
 | 
			
		||||
 | 
			
		||||
    -- Generate a WAI Application from the foundation
 | 
			
		||||
    app <- makeApplication foundation
 | 
			
		||||
 | 
			
		||||
    -- Run the application with Warp
 | 
			
		||||
    runSettings (warpSettings foundation) app
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
--------------------------------------------------------------
 | 
			
		||||
-- Functions for DevelMain.hs (a way to run the app from GHCi)
 | 
			
		||||
--------------------------------------------------------------
 | 
			
		||||
getApplicationRepl :: IO (Int, App, Application)
 | 
			
		||||
getApplicationRepl = do
 | 
			
		||||
    settings <- getAppSettings
 | 
			
		||||
    foundation <- makeFoundation settings
 | 
			
		||||
    wsettings <- getDevSettings $ warpSettings foundation
 | 
			
		||||
    app1 <- makeApplication foundation
 | 
			
		||||
    return (getPort wsettings, foundation, app1)
 | 
			
		||||
 | 
			
		||||
shutdownApp :: App -> IO ()
 | 
			
		||||
shutdownApp _ = return ()
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
---------------------------------------------
 | 
			
		||||
-- Functions for use in development with GHCi
 | 
			
		||||
---------------------------------------------
 | 
			
		||||
 | 
			
		||||
-- | Run a handler
 | 
			
		||||
handler :: Handler a -> IO a
 | 
			
		||||
handler h = getAppSettings >>= makeFoundation >>= flip unsafeHandler h
 | 
			
		||||
 | 
			
		||||
-- | Run DB queries
 | 
			
		||||
db :: ReaderT SqlBackend (HandlerT App IO) a -> IO a
 | 
			
		||||
db = handler . runDB
 | 
			
		||||
							
								
								
									
										155
									
								
								Foundation.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										155
									
								
								Foundation.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,155 @@
 | 
			
		||||
module Foundation where
 | 
			
		||||
 | 
			
		||||
import Import.NoFoundation
 | 
			
		||||
import Database.Persist.Sql (ConnectionPool, runSqlPool)
 | 
			
		||||
import Text.Hamlet          (hamletFile)
 | 
			
		||||
import Text.Jasmine         (minifym)
 | 
			
		||||
import Yesod.Auth.BrowserId (authBrowserId)
 | 
			
		||||
import Yesod.Default.Util   (addStaticContentExternal)
 | 
			
		||||
import Yesod.Core.Types     (Logger)
 | 
			
		||||
import qualified Yesod.Core.Unsafe as Unsafe
 | 
			
		||||
 | 
			
		||||
-- | The foundation datatype for your application. This can be a good place to
 | 
			
		||||
-- keep settings and values requiring initialization before your application
 | 
			
		||||
-- starts running, such as database connections. Every handler will have
 | 
			
		||||
-- access to the data present here.
 | 
			
		||||
data App = App
 | 
			
		||||
    { appSettings    :: AppSettings
 | 
			
		||||
    , appStatic      :: Static -- ^ Settings for static file serving.
 | 
			
		||||
    , appConnPool    :: ConnectionPool -- ^ Database connection pool.
 | 
			
		||||
    , appHttpManager :: Manager
 | 
			
		||||
    , appLogger      :: Logger
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
instance HasHttpManager App where
 | 
			
		||||
    getHttpManager = appHttpManager
 | 
			
		||||
 | 
			
		||||
-- This is where we define all of the routes in our application. For a full
 | 
			
		||||
-- explanation of the syntax, please see:
 | 
			
		||||
-- http://www.yesodweb.com/book/routing-and-handlers
 | 
			
		||||
--
 | 
			
		||||
-- Note that this is really half the story; in Application.hs, mkYesodDispatch
 | 
			
		||||
-- generates the rest of the code. Please see the linked documentation for an
 | 
			
		||||
-- explanation for this split.
 | 
			
		||||
mkYesodData "App" $(parseRoutesFile "config/routes")
 | 
			
		||||
 | 
			
		||||
-- | A convenient synonym for creating forms.
 | 
			
		||||
type Form x = Html -> MForm (HandlerT App IO) (FormResult x, Widget)
 | 
			
		||||
 | 
			
		||||
-- Please see the documentation for the Yesod typeclass. There are a number
 | 
			
		||||
-- of settings which can be configured by overriding methods here.
 | 
			
		||||
instance Yesod App where
 | 
			
		||||
    -- Controls the base of generated URLs. For more information on modifying,
 | 
			
		||||
    -- see: https://github.com/yesodweb/yesod/wiki/Overriding-approot
 | 
			
		||||
    approot = ApprootMaster $ appRoot . appSettings
 | 
			
		||||
 | 
			
		||||
    -- Store session data on the client in encrypted cookies,
 | 
			
		||||
    -- default session idle timeout is 120 minutes
 | 
			
		||||
    makeSessionBackend _ = fmap Just $ defaultClientSessionBackend
 | 
			
		||||
        120    -- timeout in minutes
 | 
			
		||||
        "config/client_session_key.aes"
 | 
			
		||||
 | 
			
		||||
    defaultLayout widget = do
 | 
			
		||||
        master <- getYesod
 | 
			
		||||
        mmsg <- getMessage
 | 
			
		||||
 | 
			
		||||
        -- We break up the default layout into two components:
 | 
			
		||||
        -- default-layout is the contents of the body tag, and
 | 
			
		||||
        -- default-layout-wrapper is the entire page. Since the final
 | 
			
		||||
        -- value passed to hamletToRepHtml cannot be a widget, this allows
 | 
			
		||||
        -- you to use normal widget features in default-layout.
 | 
			
		||||
 | 
			
		||||
        pc <- widgetToPageContent $ do
 | 
			
		||||
            addStylesheet $ StaticR css_bootstrap_css
 | 
			
		||||
            $(widgetFile "default-layout")
 | 
			
		||||
        withUrlRenderer $(hamletFile "templates/default-layout-wrapper.hamlet")
 | 
			
		||||
 | 
			
		||||
    -- The page to be redirected to when authentication is required.
 | 
			
		||||
    authRoute _ = Just $ AuthR LoginR
 | 
			
		||||
 | 
			
		||||
    -- Routes not requiring authentication.
 | 
			
		||||
    isAuthorized (AuthR _) _ = return Authorized
 | 
			
		||||
    isAuthorized FaviconR _ = return Authorized
 | 
			
		||||
    isAuthorized RobotsR _ = return Authorized
 | 
			
		||||
    -- Default to Authorized for now.
 | 
			
		||||
    isAuthorized _ _ = return Authorized
 | 
			
		||||
 | 
			
		||||
    -- This function creates static content files in the static folder
 | 
			
		||||
    -- and names them based on a hash of their content. This allows
 | 
			
		||||
    -- expiration dates to be set far in the future without worry of
 | 
			
		||||
    -- users receiving stale content.
 | 
			
		||||
    addStaticContent ext mime content = do
 | 
			
		||||
        master <- getYesod
 | 
			
		||||
        let staticDir = appStaticDir $ appSettings master
 | 
			
		||||
        addStaticContentExternal
 | 
			
		||||
            minifym
 | 
			
		||||
            genFileName
 | 
			
		||||
            staticDir
 | 
			
		||||
            (StaticR . flip StaticRoute [])
 | 
			
		||||
            ext
 | 
			
		||||
            mime
 | 
			
		||||
            content
 | 
			
		||||
      where
 | 
			
		||||
        -- Generate a unique filename based on the content itself
 | 
			
		||||
        genFileName lbs = "autogen-" ++ base64md5 lbs
 | 
			
		||||
 | 
			
		||||
    -- What messages should be logged. The following includes all messages when
 | 
			
		||||
    -- in development, and warnings and errors in production.
 | 
			
		||||
    shouldLog app _source level =
 | 
			
		||||
        appShouldLogAll (appSettings app)
 | 
			
		||||
            || level == LevelWarn
 | 
			
		||||
            || level == LevelError
 | 
			
		||||
 | 
			
		||||
    makeLogger = return . appLogger
 | 
			
		||||
 | 
			
		||||
-- How to run database actions.
 | 
			
		||||
instance YesodPersist App where
 | 
			
		||||
    type YesodPersistBackend App = SqlBackend
 | 
			
		||||
    runDB action = do
 | 
			
		||||
        master <- getYesod
 | 
			
		||||
        runSqlPool action $ appConnPool master
 | 
			
		||||
instance YesodPersistRunner App where
 | 
			
		||||
    getDBRunner = defaultGetDBRunner appConnPool
 | 
			
		||||
 | 
			
		||||
instance YesodAuth App where
 | 
			
		||||
    type AuthId App = UserId
 | 
			
		||||
 | 
			
		||||
    -- Where to send a user after successful login
 | 
			
		||||
    loginDest _ = HomeR
 | 
			
		||||
    -- Where to send a user after logout
 | 
			
		||||
    logoutDest _ = HomeR
 | 
			
		||||
    -- Override the above two destinations when a Referer: header is present
 | 
			
		||||
    redirectToReferer _ = True
 | 
			
		||||
 | 
			
		||||
    getAuthId creds = runDB $ do
 | 
			
		||||
        x <- getBy $ UniqueUser $ credsIdent creds
 | 
			
		||||
        case x of
 | 
			
		||||
            Just (Entity uid _) -> return $ Just uid
 | 
			
		||||
            Nothing -> do
 | 
			
		||||
                fmap Just $ insert User
 | 
			
		||||
                    { userIdent = credsIdent creds
 | 
			
		||||
                    , userPassword = Nothing
 | 
			
		||||
                    }
 | 
			
		||||
 | 
			
		||||
    -- You can add other plugins like BrowserID, email or OAuth here
 | 
			
		||||
    authPlugins _ = [authBrowserId def]
 | 
			
		||||
 | 
			
		||||
    authHttpManager = getHttpManager
 | 
			
		||||
 | 
			
		||||
instance YesodAuthPersist App
 | 
			
		||||
 | 
			
		||||
-- This instance is required to use forms. You can modify renderMessage to
 | 
			
		||||
-- achieve customized and internationalized form validation messages.
 | 
			
		||||
instance RenderMessage App FormMessage where
 | 
			
		||||
    renderMessage _ _ = defaultFormMessage
 | 
			
		||||
 | 
			
		||||
unsafeHandler :: App -> Handler a -> IO a
 | 
			
		||||
unsafeHandler = Unsafe.fakeHandlerGetLogger appLogger
 | 
			
		||||
 | 
			
		||||
-- Note: Some functionality previously present in the scaffolding has been
 | 
			
		||||
-- moved to documentation in the Wiki. Following are some hopefully helpful
 | 
			
		||||
-- links:
 | 
			
		||||
--
 | 
			
		||||
-- https://github.com/yesodweb/yesod/wiki/Sending-email
 | 
			
		||||
-- https://github.com/yesodweb/yesod/wiki/Serve-static-files-from-a-separate-domain
 | 
			
		||||
-- https://github.com/yesodweb/yesod/wiki/i18n-messages-in-the-scaffolding
 | 
			
		||||
							
								
								
									
										16
									
								
								Handler/Common.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										16
									
								
								Handler/Common.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,16 @@
 | 
			
		||||
-- | Common handler functions.
 | 
			
		||||
module Handler.Common where
 | 
			
		||||
 | 
			
		||||
import Data.FileEmbed (embedFile)
 | 
			
		||||
import Import
 | 
			
		||||
 | 
			
		||||
-- These handlers embed files in the executable at compile time to avoid a
 | 
			
		||||
-- runtime dependency, and for efficiency.
 | 
			
		||||
 | 
			
		||||
getFaviconR :: Handler TypedContent
 | 
			
		||||
getFaviconR = return $ TypedContent "image/x-icon"
 | 
			
		||||
                     $ toContent $(embedFile "config/favicon.ico")
 | 
			
		||||
 | 
			
		||||
getRobotsR :: Handler TypedContent
 | 
			
		||||
getRobotsR = return $ TypedContent typePlain
 | 
			
		||||
                    $ toContent $(embedFile "config/robots.txt")
 | 
			
		||||
							
								
								
									
										40
									
								
								Handler/Home.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										40
									
								
								Handler/Home.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,40 @@
 | 
			
		||||
module Handler.Home where
 | 
			
		||||
 | 
			
		||||
import Import
 | 
			
		||||
import Yesod.Form.Bootstrap3 (BootstrapFormLayout (..), renderBootstrap3,
 | 
			
		||||
                              withSmallInput)
 | 
			
		||||
 | 
			
		||||
-- This is a handler function for the GET request method on the HomeR
 | 
			
		||||
-- resource pattern. All of your resource patterns are defined in
 | 
			
		||||
-- config/routes
 | 
			
		||||
--
 | 
			
		||||
-- The majority of the code you will write in Yesod lives in these handler
 | 
			
		||||
-- functions. You can spread them across multiple files if you are so
 | 
			
		||||
-- inclined, or create a single monolithic file.
 | 
			
		||||
getHomeR :: Handler Html
 | 
			
		||||
getHomeR = do
 | 
			
		||||
    (formWidget, formEnctype) <- generateFormPost sampleForm
 | 
			
		||||
    let submission = Nothing :: Maybe (FileInfo, Text)
 | 
			
		||||
        handlerName = "getHomeR" :: Text
 | 
			
		||||
    defaultLayout $ do
 | 
			
		||||
        aDomId <- newIdent
 | 
			
		||||
        setTitle "Welcome To Yesod!"
 | 
			
		||||
        $(widgetFile "homepage")
 | 
			
		||||
 | 
			
		||||
postHomeR :: Handler Html
 | 
			
		||||
postHomeR = do
 | 
			
		||||
    ((result, formWidget), formEnctype) <- runFormPost sampleForm
 | 
			
		||||
    let handlerName = "postHomeR" :: Text
 | 
			
		||||
        submission = case result of
 | 
			
		||||
            FormSuccess res -> Just res
 | 
			
		||||
            _ -> Nothing
 | 
			
		||||
 | 
			
		||||
    defaultLayout $ do
 | 
			
		||||
        aDomId <- newIdent
 | 
			
		||||
        setTitle "Welcome To Yesod!"
 | 
			
		||||
        $(widgetFile "homepage")
 | 
			
		||||
 | 
			
		||||
sampleForm :: Form (FileInfo, Text)
 | 
			
		||||
sampleForm = renderBootstrap3 BootstrapBasicForm $ (,)
 | 
			
		||||
    <$> fileAFormReq "Choose a file"
 | 
			
		||||
    <*> areq textField (withSmallInput "What's on the file?") Nothing
 | 
			
		||||
							
								
								
									
										6
									
								
								Import.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										6
									
								
								Import.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,6 @@
 | 
			
		||||
module Import
 | 
			
		||||
    ( module Import
 | 
			
		||||
    ) where
 | 
			
		||||
 | 
			
		||||
import Foundation            as Import
 | 
			
		||||
import Import.NoFoundation   as Import
 | 
			
		||||
							
								
								
									
										11
									
								
								Import/NoFoundation.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										11
									
								
								Import/NoFoundation.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,11 @@
 | 
			
		||||
module Import.NoFoundation
 | 
			
		||||
    ( module Import
 | 
			
		||||
    ) where
 | 
			
		||||
 | 
			
		||||
import ClassyPrelude.Yesod   as Import
 | 
			
		||||
import Model                 as Import
 | 
			
		||||
import Settings              as Import
 | 
			
		||||
import Settings.StaticFiles  as Import
 | 
			
		||||
import Yesod.Auth            as Import
 | 
			
		||||
import Yesod.Core.Types      as Import (loggerSet)
 | 
			
		||||
import Yesod.Default.Config2 as Import
 | 
			
		||||
							
								
								
									
										11
									
								
								Model.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										11
									
								
								Model.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,11 @@
 | 
			
		||||
module Model where
 | 
			
		||||
 | 
			
		||||
import ClassyPrelude.Yesod
 | 
			
		||||
import Database.Persist.Quasi
 | 
			
		||||
 | 
			
		||||
-- You can define all of your database entities in the entities file.
 | 
			
		||||
-- You can find more information on persistent and how to declare entities
 | 
			
		||||
-- at:
 | 
			
		||||
-- http://www.yesodweb.com/book/persistent/
 | 
			
		||||
share [mkPersist sqlSettings, mkMigrate "migrateAll"]
 | 
			
		||||
    $(persistFileWith lowerCaseSettings "config/models")
 | 
			
		||||
							
								
								
									
										134
									
								
								Settings.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										134
									
								
								Settings.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,134 @@
 | 
			
		||||
-- | Settings are centralized, as much as possible, into this file. This
 | 
			
		||||
-- includes database connection settings, static file locations, etc.
 | 
			
		||||
-- In addition, you can configure a number of different aspects of Yesod
 | 
			
		||||
-- by overriding methods in the Yesod typeclass. That instance is
 | 
			
		||||
-- declared in the Foundation.hs file.
 | 
			
		||||
module Settings where
 | 
			
		||||
 | 
			
		||||
import ClassyPrelude.Yesod
 | 
			
		||||
import Control.Exception           (throw)
 | 
			
		||||
import Data.Aeson                  (Result (..), fromJSON, withObject, (.!=),
 | 
			
		||||
                                    (.:?))
 | 
			
		||||
import Data.FileEmbed              (embedFile)
 | 
			
		||||
import Data.Yaml                   (decodeEither')
 | 
			
		||||
import Database.Persist.Postgresql (PostgresConf)
 | 
			
		||||
import Language.Haskell.TH.Syntax  (Exp, Name, Q)
 | 
			
		||||
import Network.Wai.Handler.Warp    (HostPreference)
 | 
			
		||||
import Yesod.Default.Config2       (applyEnvValue, configSettingsYml)
 | 
			
		||||
import Yesod.Default.Util          (WidgetFileSettings, widgetFileNoReload,
 | 
			
		||||
                                    widgetFileReload)
 | 
			
		||||
 | 
			
		||||
-- | Runtime settings to configure this application. These settings can be
 | 
			
		||||
-- loaded from various sources: defaults, environment variables, config files,
 | 
			
		||||
-- theoretically even a database.
 | 
			
		||||
data AppSettings = AppSettings
 | 
			
		||||
    { appStaticDir              :: String
 | 
			
		||||
    -- ^ Directory from which to serve static files.
 | 
			
		||||
    , appDatabaseConf           :: PostgresConf
 | 
			
		||||
    -- ^ Configuration settings for accessing the database.
 | 
			
		||||
    , appRoot                   :: Text
 | 
			
		||||
    -- ^ Base for all generated URLs.
 | 
			
		||||
    , appHost                   :: HostPreference
 | 
			
		||||
    -- ^ Host/interface the server should bind to.
 | 
			
		||||
    , appPort                   :: Int
 | 
			
		||||
    -- ^ Port to listen on
 | 
			
		||||
    , appIpFromHeader           :: Bool
 | 
			
		||||
    -- ^ Get the IP address from the header when logging. Useful when sitting
 | 
			
		||||
    -- behind a reverse proxy.
 | 
			
		||||
 | 
			
		||||
    , appDetailedRequestLogging :: Bool
 | 
			
		||||
    -- ^ Use detailed request logging system
 | 
			
		||||
    , appShouldLogAll           :: Bool
 | 
			
		||||
    -- ^ Should all log messages be displayed?
 | 
			
		||||
    , appReloadTemplates        :: Bool
 | 
			
		||||
    -- ^ Use the reload version of templates
 | 
			
		||||
    , appMutableStatic          :: Bool
 | 
			
		||||
    -- ^ Assume that files in the static dir may change after compilation
 | 
			
		||||
    , appSkipCombining          :: Bool
 | 
			
		||||
    -- ^ Perform no stylesheet/script combining
 | 
			
		||||
 | 
			
		||||
    -- Example app-specific configuration values.
 | 
			
		||||
    , appCopyright              :: Text
 | 
			
		||||
    -- ^ Copyright text to appear in the footer of the page
 | 
			
		||||
    , appAnalytics              :: Maybe Text
 | 
			
		||||
    -- ^ Google Analytics code
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
instance FromJSON AppSettings where
 | 
			
		||||
    parseJSON = withObject "AppSettings" $ \o -> do
 | 
			
		||||
        let defaultDev =
 | 
			
		||||
#if DEVELOPMENT
 | 
			
		||||
                True
 | 
			
		||||
#else
 | 
			
		||||
                False
 | 
			
		||||
#endif
 | 
			
		||||
        appStaticDir              <- o .: "static-dir"
 | 
			
		||||
        appDatabaseConf           <- o .: "database"
 | 
			
		||||
        appRoot                   <- o .: "approot"
 | 
			
		||||
        appHost                   <- fromString <$> o .: "host"
 | 
			
		||||
        appPort                   <- o .: "port"
 | 
			
		||||
        appIpFromHeader           <- o .: "ip-from-header"
 | 
			
		||||
 | 
			
		||||
        appDetailedRequestLogging <- o .:? "detailed-logging" .!= defaultDev
 | 
			
		||||
        appShouldLogAll           <- o .:? "should-log-all"   .!= defaultDev
 | 
			
		||||
        appReloadTemplates        <- o .:? "reload-templates" .!= defaultDev
 | 
			
		||||
        appMutableStatic          <- o .:? "mutable-static"   .!= defaultDev
 | 
			
		||||
        appSkipCombining          <- o .:? "skip-combining"   .!= defaultDev
 | 
			
		||||
 | 
			
		||||
        appCopyright              <- o .: "copyright"
 | 
			
		||||
        appAnalytics              <- o .:? "analytics"
 | 
			
		||||
 | 
			
		||||
        return AppSettings {..}
 | 
			
		||||
 | 
			
		||||
-- | Settings for 'widgetFile', such as which template languages to support and
 | 
			
		||||
-- default Hamlet settings.
 | 
			
		||||
--
 | 
			
		||||
-- For more information on modifying behavior, see:
 | 
			
		||||
--
 | 
			
		||||
-- https://github.com/yesodweb/yesod/wiki/Overriding-widgetFile
 | 
			
		||||
widgetFileSettings :: WidgetFileSettings
 | 
			
		||||
widgetFileSettings = def
 | 
			
		||||
 | 
			
		||||
-- | How static files should be combined.
 | 
			
		||||
combineSettings :: CombineSettings
 | 
			
		||||
combineSettings = def
 | 
			
		||||
 | 
			
		||||
-- The rest of this file contains settings which rarely need changing by a
 | 
			
		||||
-- user.
 | 
			
		||||
 | 
			
		||||
widgetFile :: String -> Q Exp
 | 
			
		||||
widgetFile = (if appReloadTemplates compileTimeAppSettings
 | 
			
		||||
                then widgetFileReload
 | 
			
		||||
                else widgetFileNoReload)
 | 
			
		||||
              widgetFileSettings
 | 
			
		||||
 | 
			
		||||
-- | Raw bytes at compile time of @config/settings.yml@
 | 
			
		||||
configSettingsYmlBS :: ByteString
 | 
			
		||||
configSettingsYmlBS = $(embedFile configSettingsYml)
 | 
			
		||||
 | 
			
		||||
-- | @config/settings.yml@, parsed to a @Value@.
 | 
			
		||||
configSettingsYmlValue :: Value
 | 
			
		||||
configSettingsYmlValue = either throw id $ decodeEither' configSettingsYmlBS
 | 
			
		||||
 | 
			
		||||
-- | A version of @AppSettings@ parsed at compile time from @config/settings.yml@.
 | 
			
		||||
compileTimeAppSettings :: AppSettings
 | 
			
		||||
compileTimeAppSettings =
 | 
			
		||||
    case fromJSON $ applyEnvValue False mempty configSettingsYmlValue of
 | 
			
		||||
        Error e -> error e
 | 
			
		||||
        Success settings -> settings
 | 
			
		||||
 | 
			
		||||
-- The following two functions can be used to combine multiple CSS or JS files
 | 
			
		||||
-- at compile time to decrease the number of http requests.
 | 
			
		||||
-- Sample usage (inside a Widget):
 | 
			
		||||
--
 | 
			
		||||
-- > $(combineStylesheets 'StaticR [style1_css, style2_css])
 | 
			
		||||
 | 
			
		||||
combineStylesheets :: Name -> [Route Static] -> Q Exp
 | 
			
		||||
combineStylesheets = combineStylesheets'
 | 
			
		||||
    (appSkipCombining compileTimeAppSettings)
 | 
			
		||||
    combineSettings
 | 
			
		||||
 | 
			
		||||
combineScripts :: Name -> [Route Static] -> Q Exp
 | 
			
		||||
combineScripts = combineScripts'
 | 
			
		||||
    (appSkipCombining compileTimeAppSettings)
 | 
			
		||||
    combineSettings
 | 
			
		||||
							
								
								
									
										18
									
								
								Settings/StaticFiles.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										18
									
								
								Settings/StaticFiles.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,18 @@
 | 
			
		||||
module Settings.StaticFiles where
 | 
			
		||||
 | 
			
		||||
import Settings     (appStaticDir, compileTimeAppSettings)
 | 
			
		||||
import Yesod.Static (staticFiles)
 | 
			
		||||
 | 
			
		||||
-- This generates easy references to files in the static directory at compile time,
 | 
			
		||||
-- giving you compile-time verification that referenced files exist.
 | 
			
		||||
-- Warning: any files added to your static directory during run-time can't be
 | 
			
		||||
-- accessed this way. You'll have to use their FilePath or URL to access them.
 | 
			
		||||
--
 | 
			
		||||
-- For example, to refer to @static/js/script.js@ via an identifier, you'd use:
 | 
			
		||||
--
 | 
			
		||||
--     js_script_js
 | 
			
		||||
--
 | 
			
		||||
-- If the identifier is not available, you may use:
 | 
			
		||||
--
 | 
			
		||||
--     StaticFile ["js", "script.js"] []
 | 
			
		||||
staticFiles (appStaticDir compileTimeAppSettings)
 | 
			
		||||
							
								
								
									
										99
									
								
								app/DevelMain.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										99
									
								
								app/DevelMain.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,99 @@
 | 
			
		||||
-- | Running your app inside GHCi.
 | 
			
		||||
--
 | 
			
		||||
-- To start up GHCi for usage with Yesod, first make sure you are in dev mode:
 | 
			
		||||
--
 | 
			
		||||
-- > cabal configure -fdev
 | 
			
		||||
--
 | 
			
		||||
-- Note that @yesod devel@ automatically sets the dev flag.
 | 
			
		||||
-- Now launch the repl:
 | 
			
		||||
--
 | 
			
		||||
-- > cabal repl --ghc-options="-O0 -fobject-code"
 | 
			
		||||
--
 | 
			
		||||
-- To start your app, run:
 | 
			
		||||
--
 | 
			
		||||
-- > :l DevelMain
 | 
			
		||||
-- > DevelMain.update
 | 
			
		||||
--
 | 
			
		||||
-- You can also call @DevelMain.shutdown@ to stop the app
 | 
			
		||||
--
 | 
			
		||||
-- You will need to add the foreign-store package to your .cabal file.
 | 
			
		||||
-- It is very light-weight.
 | 
			
		||||
--
 | 
			
		||||
-- If you don't use cabal repl, you will need
 | 
			
		||||
-- to run the following in GHCi or to add it to
 | 
			
		||||
-- your .ghci file.
 | 
			
		||||
--
 | 
			
		||||
-- :set -DDEVELOPMENT
 | 
			
		||||
--
 | 
			
		||||
-- There is more information about this approach,
 | 
			
		||||
-- on the wiki: https://github.com/yesodweb/yesod/wiki/ghci
 | 
			
		||||
 | 
			
		||||
module DevelMain where
 | 
			
		||||
 | 
			
		||||
import Prelude
 | 
			
		||||
import Application (getApplicationRepl, shutdownApp)
 | 
			
		||||
 | 
			
		||||
import Control.Exception (finally)
 | 
			
		||||
import Control.Monad ((>=>))
 | 
			
		||||
import Control.Concurrent
 | 
			
		||||
import Data.IORef
 | 
			
		||||
import Foreign.Store
 | 
			
		||||
import Network.Wai.Handler.Warp
 | 
			
		||||
import GHC.Word
 | 
			
		||||
 | 
			
		||||
-- | Start or restart the server.
 | 
			
		||||
-- newStore is from foreign-store.
 | 
			
		||||
-- A Store holds onto some data across ghci reloads
 | 
			
		||||
update :: IO ()
 | 
			
		||||
update = do
 | 
			
		||||
    mtidStore <- lookupStore tidStoreNum
 | 
			
		||||
    case mtidStore of
 | 
			
		||||
      -- no server running
 | 
			
		||||
      Nothing -> do
 | 
			
		||||
          done <- storeAction doneStore newEmptyMVar
 | 
			
		||||
          tid <- start done
 | 
			
		||||
          _ <- storeAction (Store tidStoreNum) (newIORef tid)
 | 
			
		||||
          return ()
 | 
			
		||||
      -- server is already running
 | 
			
		||||
      Just tidStore -> restartAppInNewThread tidStore
 | 
			
		||||
  where
 | 
			
		||||
    doneStore :: Store (MVar ())
 | 
			
		||||
    doneStore = Store 0
 | 
			
		||||
 | 
			
		||||
    -- shut the server down with killThread and wait for the done signal
 | 
			
		||||
    restartAppInNewThread :: Store (IORef ThreadId) -> IO ()
 | 
			
		||||
    restartAppInNewThread tidStore = modifyStoredIORef tidStore $ \tid -> do
 | 
			
		||||
        killThread tid
 | 
			
		||||
        withStore doneStore takeMVar
 | 
			
		||||
        readStore doneStore >>= start
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    -- | Start the server in a separate thread.
 | 
			
		||||
    start :: MVar () -- ^ Written to when the thread is killed.
 | 
			
		||||
          -> IO ThreadId
 | 
			
		||||
    start done = do
 | 
			
		||||
        (port, site, app) <- getApplicationRepl
 | 
			
		||||
        forkIO (finally (runSettings (setPort port defaultSettings) app)
 | 
			
		||||
                        -- Note that this implies concurrency
 | 
			
		||||
                        -- between shutdownApp and the next app that is starting.
 | 
			
		||||
                        -- Normally this should be fine
 | 
			
		||||
                        (putMVar done () >> shutdownApp site))
 | 
			
		||||
 | 
			
		||||
-- | kill the server
 | 
			
		||||
shutdown :: IO ()
 | 
			
		||||
shutdown = do
 | 
			
		||||
    mtidStore <- lookupStore tidStoreNum
 | 
			
		||||
    case mtidStore of
 | 
			
		||||
      -- no server running
 | 
			
		||||
      Nothing -> putStrLn "no Yesod app running"
 | 
			
		||||
      Just tidStore -> do
 | 
			
		||||
          withStore tidStore $ readIORef >=> killThread
 | 
			
		||||
          putStrLn "Yesod app is shutdown"
 | 
			
		||||
 | 
			
		||||
tidStoreNum :: Word32
 | 
			
		||||
tidStoreNum = 1
 | 
			
		||||
 | 
			
		||||
modifyStoredIORef :: Store (IORef a) -> (a -> IO a) -> IO ()
 | 
			
		||||
modifyStoredIORef store f = withStore store $ \ref -> do
 | 
			
		||||
    v <- readIORef ref
 | 
			
		||||
    f v >>= writeIORef ref
 | 
			
		||||
							
								
								
									
										6
									
								
								app/devel.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										6
									
								
								app/devel.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,6 @@
 | 
			
		||||
{-# LANGUAGE PackageImports #-}
 | 
			
		||||
import "neat" Application (develMain)
 | 
			
		||||
import Prelude (IO)
 | 
			
		||||
 | 
			
		||||
main :: IO ()
 | 
			
		||||
main = develMain
 | 
			
		||||
							
								
								
									
										5
									
								
								app/main.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										5
									
								
								app/main.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,5 @@
 | 
			
		||||
import Prelude     (IO)
 | 
			
		||||
import Application (appMain)
 | 
			
		||||
 | 
			
		||||
main :: IO ()
 | 
			
		||||
main = appMain
 | 
			
		||||
							
								
								
									
										
											BIN
										
									
								
								config/favicon.ico
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										
											BIN
										
									
								
								config/favicon.ico
									
									
									
									
									
										Normal file
									
								
							
										
											Binary file not shown.
										
									
								
							| 
		 After Width: | Height: | Size: 1.3 KiB  | 
							
								
								
									
										60
									
								
								config/keter.yml
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										60
									
								
								config/keter.yml
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,60 @@
 | 
			
		||||
# After you've edited this file, remove the following line to allow
 | 
			
		||||
# `yesod keter` to build your bundle.
 | 
			
		||||
user-edited: false
 | 
			
		||||
 | 
			
		||||
# A Keter app is composed of 1 or more stanzas. The main stanza will define our
 | 
			
		||||
# web application. See the Keter documentation for more information on
 | 
			
		||||
# available stanzas.
 | 
			
		||||
stanzas:
 | 
			
		||||
 | 
			
		||||
  # Your Yesod application.
 | 
			
		||||
  - type: webapp
 | 
			
		||||
 | 
			
		||||
    # Name of your executable. You are unlikely to need to change this.
 | 
			
		||||
    # Note that all file paths are relative to the keter.yml file.
 | 
			
		||||
    exec: ../dist/build/neat/neat
 | 
			
		||||
 | 
			
		||||
    # Command line options passed to your application.
 | 
			
		||||
    args: []
 | 
			
		||||
 | 
			
		||||
    hosts:
 | 
			
		||||
      # You can specify one or more hostnames for your application to respond
 | 
			
		||||
      # to. The primary hostname will be used for generating your application
 | 
			
		||||
      # root.
 | 
			
		||||
      - www.neat.com
 | 
			
		||||
 | 
			
		||||
    # Enable to force Keter to redirect to https
 | 
			
		||||
    # Can be added to any stanza
 | 
			
		||||
    requires-secure: false
 | 
			
		||||
 | 
			
		||||
  # Static files.
 | 
			
		||||
  - type: static-files
 | 
			
		||||
    hosts:
 | 
			
		||||
      - static.neat.com
 | 
			
		||||
    root: ../static
 | 
			
		||||
 | 
			
		||||
    # Uncomment to turn on directory listings.
 | 
			
		||||
    # directory-listing: true
 | 
			
		||||
 | 
			
		||||
  # Redirect plain domain name to www.
 | 
			
		||||
  - type: redirect
 | 
			
		||||
 | 
			
		||||
    hosts:
 | 
			
		||||
      - neat.com
 | 
			
		||||
    actions:
 | 
			
		||||
      - host: www.neat.com
 | 
			
		||||
        # secure: false
 | 
			
		||||
        # port: 80
 | 
			
		||||
 | 
			
		||||
    # Uncomment to switch to a non-permanent redirect.
 | 
			
		||||
    # status: 303
 | 
			
		||||
 | 
			
		||||
# Use the following to automatically copy your bundle upon creation via `yesod
 | 
			
		||||
# keter`. Uses `scp` internally, so you can set it to a remote destination
 | 
			
		||||
# copy-to: user@host:/opt/keter/incoming
 | 
			
		||||
 | 
			
		||||
# If you would like to have Keter automatically create a PostgreSQL database
 | 
			
		||||
# and set appropriate environment variables for it to be discovered, uncomment
 | 
			
		||||
# the following line.
 | 
			
		||||
# plugins:
 | 
			
		||||
#   postgres: true
 | 
			
		||||
							
								
								
									
										12
									
								
								config/models
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										12
									
								
								config/models
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,12 @@
 | 
			
		||||
User
 | 
			
		||||
    ident Text
 | 
			
		||||
    password Text Maybe
 | 
			
		||||
    UniqueUser ident
 | 
			
		||||
    deriving Typeable
 | 
			
		||||
Email
 | 
			
		||||
    email Text
 | 
			
		||||
    user UserId Maybe
 | 
			
		||||
    verkey Text Maybe
 | 
			
		||||
    UniqueEmail email
 | 
			
		||||
 | 
			
		||||
 -- By default this file is used in Model.hs (which is imported by Foundation.hs)
 | 
			
		||||
							
								
								
									
										1
									
								
								config/robots.txt
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										1
									
								
								config/robots.txt
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1 @@
 | 
			
		||||
User-agent: *
 | 
			
		||||
							
								
								
									
										7
									
								
								config/routes
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										7
									
								
								config/routes
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,7 @@
 | 
			
		||||
/static StaticR Static appStatic
 | 
			
		||||
/auth   AuthR   Auth   getAuth
 | 
			
		||||
 | 
			
		||||
/favicon.ico FaviconR GET
 | 
			
		||||
/robots.txt RobotsR GET
 | 
			
		||||
 | 
			
		||||
/ HomeR GET POST
 | 
			
		||||
							
								
								
									
										29
									
								
								config/settings.yml
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										29
									
								
								config/settings.yml
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,29 @@
 | 
			
		||||
# Values formatted like "_env:ENV_VAR_NAME:default_value" can be overridden by the specified environment variable.
 | 
			
		||||
# See https://github.com/yesodweb/yesod/wiki/Configuration#overriding-configuration-values-with-environment-variables
 | 
			
		||||
 | 
			
		||||
static-dir:     "_env:STATIC_DIR:static"
 | 
			
		||||
host:           "_env:HOST:*4" # any IPv4 host
 | 
			
		||||
port:           "_env:PORT:3000"
 | 
			
		||||
approot:        "_env:APPROOT:http://localhost:3000"
 | 
			
		||||
ip-from-header: "_env:IP_FROM_HEADER:false"
 | 
			
		||||
 | 
			
		||||
# Optional values with the following production defaults.
 | 
			
		||||
# In development, they default to the inverse.
 | 
			
		||||
#
 | 
			
		||||
# development: false
 | 
			
		||||
# detailed-logging: false
 | 
			
		||||
# should-log-all: false
 | 
			
		||||
# reload-templates: false
 | 
			
		||||
# mutable-static: false
 | 
			
		||||
# skip-combining: false
 | 
			
		||||
 | 
			
		||||
database:
 | 
			
		||||
  user:     "_env:PGUSER:neat"
 | 
			
		||||
  password: "_env:PGPASS:neat"
 | 
			
		||||
  host:     "_env:PGHOST:localhost"
 | 
			
		||||
  port:     "_env:PGPORT:5432"
 | 
			
		||||
  database: "_env:PGDATABASE:neat"
 | 
			
		||||
  poolsize: "_env:PGPOOLSIZE:10"
 | 
			
		||||
 | 
			
		||||
copyright: Insert copyright statement here
 | 
			
		||||
#analytics: UA-YOURCODE
 | 
			
		||||
							
								
								
									
										2
									
								
								config/test-settings.yml
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										2
									
								
								config/test-settings.yml
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,2 @@
 | 
			
		||||
database:
 | 
			
		||||
  database: neat_test
 | 
			
		||||
							
								
								
									
										129
									
								
								neat.cabal
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										129
									
								
								neat.cabal
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,129 @@
 | 
			
		||||
name:              neat
 | 
			
		||||
version:           0.0.0
 | 
			
		||||
cabal-version:     >= 1.8
 | 
			
		||||
build-type:        Simple
 | 
			
		||||
 | 
			
		||||
Flag dev
 | 
			
		||||
    Description:   Turn on development settings, like auto-reload templates.
 | 
			
		||||
    Default:       False
 | 
			
		||||
 | 
			
		||||
Flag library-only
 | 
			
		||||
    Description:   Build for use with "yesod devel"
 | 
			
		||||
    Default:       False
 | 
			
		||||
 | 
			
		||||
library
 | 
			
		||||
    hs-source-dirs: ., app
 | 
			
		||||
    exposed-modules: Application
 | 
			
		||||
                     Foundation
 | 
			
		||||
                     Import
 | 
			
		||||
                     Import.NoFoundation
 | 
			
		||||
                     Model
 | 
			
		||||
                     Settings
 | 
			
		||||
                     Settings.StaticFiles
 | 
			
		||||
                     Handler.Common
 | 
			
		||||
                     Handler.Home
 | 
			
		||||
 | 
			
		||||
    if flag(dev) || flag(library-only)
 | 
			
		||||
        cpp-options:   -DDEVELOPMENT
 | 
			
		||||
        ghc-options:   -Wall -fwarn-tabs -O0
 | 
			
		||||
    else
 | 
			
		||||
        ghc-options:   -Wall -fwarn-tabs -O2
 | 
			
		||||
 | 
			
		||||
    extensions: TemplateHaskell
 | 
			
		||||
                QuasiQuotes
 | 
			
		||||
                OverloadedStrings
 | 
			
		||||
                NoImplicitPrelude
 | 
			
		||||
                CPP
 | 
			
		||||
                MultiParamTypeClasses
 | 
			
		||||
                TypeFamilies
 | 
			
		||||
                GADTs
 | 
			
		||||
                GeneralizedNewtypeDeriving
 | 
			
		||||
                FlexibleContexts
 | 
			
		||||
                EmptyDataDecls
 | 
			
		||||
                NoMonomorphismRestriction
 | 
			
		||||
                DeriveDataTypeable
 | 
			
		||||
                ViewPatterns
 | 
			
		||||
                TupleSections
 | 
			
		||||
                RecordWildCards
 | 
			
		||||
 | 
			
		||||
    build-depends: base                          >= 4          && < 5
 | 
			
		||||
                 , yesod                         >= 1.4.1      && < 1.5
 | 
			
		||||
                 , yesod-core                    >= 1.4.6      && < 1.5
 | 
			
		||||
                 , yesod-auth                    >= 1.4.0      && < 1.5
 | 
			
		||||
                 , yesod-static                  >= 1.4.0.3    && < 1.5
 | 
			
		||||
                 , yesod-form                    >= 1.4.0      && < 1.5
 | 
			
		||||
                 , classy-prelude                >= 0.10.2
 | 
			
		||||
                 , classy-prelude-conduit        >= 0.10.2
 | 
			
		||||
                 , classy-prelude-yesod          >= 0.10.2
 | 
			
		||||
                 , bytestring                    >= 0.9        && < 0.11
 | 
			
		||||
                 , text                          >= 0.11       && < 2.0
 | 
			
		||||
                 , persistent                    >= 2.0        && < 2.2
 | 
			
		||||
                 , persistent-postgresql         >= 2.1.1      && < 2.2
 | 
			
		||||
                 , persistent-template           >= 2.0        && < 2.2
 | 
			
		||||
                 , template-haskell
 | 
			
		||||
                 , shakespeare                   >= 2.0        && < 2.1
 | 
			
		||||
                 , hjsmin                        >= 0.1        && < 0.2
 | 
			
		||||
                 , monad-control                 >= 0.3        && < 0.4
 | 
			
		||||
                 , wai-extra                     >= 3.0        && < 3.1
 | 
			
		||||
                 , yaml                          >= 0.8        && < 0.9
 | 
			
		||||
                 , http-conduit                  >= 2.1        && < 2.2
 | 
			
		||||
                 , directory                     >= 1.1        && < 1.3
 | 
			
		||||
                 , warp                          >= 3.0        && < 3.1
 | 
			
		||||
                 , data-default
 | 
			
		||||
                 , aeson                         >= 0.6        && < 0.9
 | 
			
		||||
                 , conduit                       >= 1.0        && < 2.0
 | 
			
		||||
                 , monad-logger                  >= 0.3        && < 0.4
 | 
			
		||||
                 , fast-logger                   >= 2.2        && < 2.3
 | 
			
		||||
                 , wai-logger                    >= 2.2        && < 2.3
 | 
			
		||||
                 , file-embed
 | 
			
		||||
                 , safe
 | 
			
		||||
                 , unordered-containers
 | 
			
		||||
                 , containers
 | 
			
		||||
                 , vector
 | 
			
		||||
                 , time
 | 
			
		||||
 | 
			
		||||
executable         neat
 | 
			
		||||
    if flag(library-only)
 | 
			
		||||
        Buildable: False
 | 
			
		||||
 | 
			
		||||
    main-is:           main.hs
 | 
			
		||||
    hs-source-dirs:    app
 | 
			
		||||
    build-depends:     base, neat
 | 
			
		||||
 | 
			
		||||
    ghc-options:       -threaded -O2 -rtsopts -with-rtsopts=-N
 | 
			
		||||
 | 
			
		||||
test-suite test
 | 
			
		||||
    type:              exitcode-stdio-1.0
 | 
			
		||||
    main-is:           Spec.hs
 | 
			
		||||
    hs-source-dirs:    test
 | 
			
		||||
    ghc-options:       -Wall
 | 
			
		||||
 | 
			
		||||
    extensions: TemplateHaskell
 | 
			
		||||
                QuasiQuotes
 | 
			
		||||
                OverloadedStrings
 | 
			
		||||
                NoImplicitPrelude
 | 
			
		||||
                CPP
 | 
			
		||||
                MultiParamTypeClasses
 | 
			
		||||
                TypeFamilies
 | 
			
		||||
                GADTs
 | 
			
		||||
                GeneralizedNewtypeDeriving
 | 
			
		||||
                FlexibleContexts
 | 
			
		||||
                EmptyDataDecls
 | 
			
		||||
                NoMonomorphismRestriction
 | 
			
		||||
                DeriveDataTypeable
 | 
			
		||||
                ViewPatterns
 | 
			
		||||
                TupleSections
 | 
			
		||||
 | 
			
		||||
    build-depends: base
 | 
			
		||||
                 , neat
 | 
			
		||||
                 , yesod-test >= 1.4.3 && < 1.5
 | 
			
		||||
                 , yesod-core
 | 
			
		||||
                 , yesod
 | 
			
		||||
                 , persistent
 | 
			
		||||
                 , persistent-postgresql
 | 
			
		||||
                 , resourcet
 | 
			
		||||
                 , monad-logger
 | 
			
		||||
                 , transformers
 | 
			
		||||
                 , hspec >= 2.0.0
 | 
			
		||||
                 , classy-prelude
 | 
			
		||||
                 , classy-prelude-yesod
 | 
			
		||||
							
								
								
									
										6202
									
								
								static/css/bootstrap.css
									
									
									
									
										vendored
									
									
										Normal file
									
								
							
							
						
						
									
										6202
									
								
								static/css/bootstrap.css
									
									
									
									
										vendored
									
									
										Normal file
									
								
							
										
											
												File diff suppressed because it is too large
												Load Diff
											
										
									
								
							
							
								
								
									
										
											BIN
										
									
								
								static/fonts/glyphicons-halflings-regular.eot
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										
											BIN
										
									
								
								static/fonts/glyphicons-halflings-regular.eot
									
									
									
									
									
										Normal file
									
								
							
										
											Binary file not shown.
										
									
								
							
							
								
								
									
										229
									
								
								static/fonts/glyphicons-halflings-regular.svg
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										229
									
								
								static/fonts/glyphicons-halflings-regular.svg
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,229 @@
 | 
			
		||||
<?xml version="1.0" standalone="no"?>
 | 
			
		||||
<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd" >
 | 
			
		||||
<svg xmlns="http://www.w3.org/2000/svg">
 | 
			
		||||
<metadata></metadata>
 | 
			
		||||
<defs>
 | 
			
		||||
<font id="glyphicons_halflingsregular" horiz-adv-x="1200" >
 | 
			
		||||
<font-face units-per-em="1200" ascent="960" descent="-240" />
 | 
			
		||||
<missing-glyph horiz-adv-x="500" />
 | 
			
		||||
<glyph />
 | 
			
		||||
<glyph />
 | 
			
		||||
<glyph unicode="
" />
 | 
			
		||||
<glyph unicode=" " />
 | 
			
		||||
<glyph unicode="*" d="M100 500v200h259l-183 183l141 141l183 -183v259h200v-259l183 183l141 -141l-183 -183h259v-200h-259l183 -183l-141 -141l-183 183v-259h-200v259l-183 -183l-141 141l183 183h-259z" />
 | 
			
		||||
<glyph unicode="+" d="M0 400v300h400v400h300v-400h400v-300h-400v-400h-300v400h-400z" />
 | 
			
		||||
<glyph unicode=" " />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="652" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="1304" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="652" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="1304" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="434" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="326" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="217" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="217" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="163" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="260" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="72" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="260" />
 | 
			
		||||
<glyph unicode=" " horiz-adv-x="326" />
 | 
			
		||||
<glyph unicode="€" d="M100 500l100 100h113q0 47 5 100h-218l100 100h135q37 167 112 257q117 141 297 141q242 0 354 -189q60 -103 66 -209h-181q0 55 -25.5 99t-63.5 68t-75 36.5t-67 12.5q-24 0 -52.5 -10t-62.5 -32t-65.5 -67t-50.5 -107h379l-100 -100h-300q-6 -46 -6 -100h406l-100 -100 h-300q9 -74 33 -132t52.5 -91t62 -54.5t59 -29t46.5 -7.5q29 0 66 13t75 37t63.5 67.5t25.5 96.5h174q-31 -172 -128 -278q-107 -117 -274 -117q-205 0 -324 158q-36 46 -69 131.5t-45 205.5h-217z" />
 | 
			
		||||
<glyph unicode="−" d="M200 400h900v300h-900v-300z" />
 | 
			
		||||
<glyph unicode="◼" horiz-adv-x="500" d="M0 0z" />
 | 
			
		||||
<glyph unicode="☁" d="M-14 494q0 -80 56.5 -137t135.5 -57h750q120 0 205 86.5t85 207.5t-85 207t-205 86q-46 0 -90 -14q-44 97 -134.5 156.5t-200.5 59.5q-152 0 -260 -107.5t-108 -260.5q0 -25 2 -37q-66 -14 -108.5 -67.5t-42.5 -122.5z" />
 | 
			
		||||
<glyph unicode="✉" d="M0 100l400 400l200 -200l200 200l400 -400h-1200zM0 300v600l300 -300zM0 1100l600 -603l600 603h-1200zM900 600l300 300v-600z" />
 | 
			
		||||
<glyph unicode="✏" d="M-13 -13l333 112l-223 223zM187 403l214 -214l614 614l-214 214zM887 1103l214 -214l99 92q13 13 13 32.5t-13 33.5l-153 153q-15 13 -33 13t-33 -13z" />
 | 
			
		||||
<glyph unicode="" d="M0 1200h1200l-500 -550v-550h300v-100h-800v100h300v550z" />
 | 
			
		||||
<glyph unicode="" d="M14 84q18 -55 86 -75.5t147 5.5q65 21 109 69t44 90v606l600 155v-521q-64 16 -138 -7q-79 -26 -122.5 -83t-25.5 -111q18 -55 86 -75.5t147 4.5q70 23 111.5 63.5t41.5 95.5v881q0 10 -7 15.5t-17 2.5l-752 -193q-10 -3 -17 -12.5t-7 -19.5v-689q-64 17 -138 -7 q-79 -25 -122.5 -82t-25.5 -112z" />
 | 
			
		||||
<glyph unicode="" d="M23 693q0 200 142 342t342 142t342 -142t142 -342q0 -142 -78 -261l300 -300q7 -8 7 -18t-7 -18l-109 -109q-8 -7 -18 -7t-18 7l-300 300q-119 -78 -261 -78q-200 0 -342 142t-142 342zM176 693q0 -136 97 -233t234 -97t233.5 96.5t96.5 233.5t-96.5 233.5t-233.5 96.5 t-234 -97t-97 -233z" />
 | 
			
		||||
<glyph unicode="" d="M100 784q0 64 28 123t73 100.5t104.5 64t119 20.5t120 -38.5t104.5 -104.5q48 69 109.5 105t121.5 38t118.5 -20.5t102.5 -64t71 -100.5t27 -123q0 -57 -33.5 -117.5t-94 -124.5t-126.5 -127.5t-150 -152.5t-146 -174q-62 85 -145.5 174t-149.5 152.5t-126.5 127.5 t-94 124.5t-33.5 117.5z" />
 | 
			
		||||
<glyph unicode="" d="M-72 800h479l146 400h2l146 -400h472l-382 -278l145 -449l-384 275l-382 -275l146 447zM168 71l2 1z" />
 | 
			
		||||
<glyph unicode="" d="M-72 800h479l146 400h2l146 -400h472l-382 -278l145 -449l-384 275l-382 -275l146 447zM168 71l2 1zM237 700l196 -142l-73 -226l192 140l195 -141l-74 229l193 140h-235l-77 211l-78 -211h-239z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v143l400 257v100q-37 0 -68.5 74.5t-31.5 125.5v200q0 124 88 212t212 88t212 -88t88 -212v-200q0 -51 -31.5 -125.5t-68.5 -74.5v-100l400 -257v-143h-1200z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v1100h1200v-1100h-1200zM100 100h100v100h-100v-100zM100 300h100v100h-100v-100zM100 500h100v100h-100v-100zM100 700h100v100h-100v-100zM100 900h100v100h-100v-100zM300 100h600v400h-600v-400zM300 600h600v400h-600v-400zM1000 100h100v100h-100v-100z M1000 300h100v100h-100v-100zM1000 500h100v100h-100v-100zM1000 700h100v100h-100v-100zM1000 900h100v100h-100v-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v400q0 21 14.5 35.5t35.5 14.5h400q21 0 35.5 -14.5t14.5 -35.5v-400q0 -21 -14.5 -35.5t-35.5 -14.5h-400q-21 0 -35.5 14.5t-14.5 35.5zM0 650v400q0 21 14.5 35.5t35.5 14.5h400q21 0 35.5 -14.5t14.5 -35.5v-400q0 -21 -14.5 -35.5t-35.5 -14.5h-400 q-21 0 -35.5 14.5t-14.5 35.5zM600 50v400q0 21 14.5 35.5t35.5 14.5h400q21 0 35.5 -14.5t14.5 -35.5v-400q0 -21 -14.5 -35.5t-35.5 -14.5h-400q-21 0 -35.5 14.5t-14.5 35.5zM600 650v400q0 21 14.5 35.5t35.5 14.5h400q21 0 35.5 -14.5t14.5 -35.5v-400 q0 -21 -14.5 -35.5t-35.5 -14.5h-400q-21 0 -35.5 14.5t-14.5 35.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM0 450v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200 q-21 0 -35.5 14.5t-14.5 35.5zM0 850v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM400 50v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5 t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM400 450v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM400 850v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5 v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM800 50v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM800 450v200q0 21 14.5 35.5t35.5 14.5h200 q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM800 850v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM0 450q0 -21 14.5 -35.5t35.5 -14.5h200q21 0 35.5 14.5t14.5 35.5v200q0 21 -14.5 35.5t-35.5 14.5h-200q-21 0 -35.5 -14.5 t-14.5 -35.5v-200zM0 850v200q0 21 14.5 35.5t35.5 14.5h200q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5zM400 50v200q0 21 14.5 35.5t35.5 14.5h700q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5 t-35.5 -14.5h-700q-21 0 -35.5 14.5t-14.5 35.5zM400 450v200q0 21 14.5 35.5t35.5 14.5h700q21 0 35.5 -14.5t14.5 -35.5v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-700q-21 0 -35.5 14.5t-14.5 35.5zM400 850v200q0 21 14.5 35.5t35.5 14.5h700q21 0 35.5 -14.5t14.5 -35.5 v-200q0 -21 -14.5 -35.5t-35.5 -14.5h-700q-21 0 -35.5 14.5t-14.5 35.5z" />
 | 
			
		||||
<glyph unicode="" d="M29 454l419 -420l818 820l-212 212l-607 -607l-206 207z" />
 | 
			
		||||
<glyph unicode="" d="M106 318l282 282l-282 282l212 212l282 -282l282 282l212 -212l-282 -282l282 -282l-212 -212l-282 282l-282 -282z" />
 | 
			
		||||
<glyph unicode="" d="M23 693q0 200 142 342t342 142t342 -142t142 -342q0 -142 -78 -261l300 -300q7 -8 7 -18t-7 -18l-109 -109q-8 -7 -18 -7t-18 7l-300 300q-119 -78 -261 -78q-200 0 -342 142t-142 342zM176 693q0 -136 97 -233t234 -97t233.5 96.5t96.5 233.5t-96.5 233.5t-233.5 96.5 t-234 -97t-97 -233zM300 600v200h100v100h200v-100h100v-200h-100v-100h-200v100h-100z" />
 | 
			
		||||
<glyph unicode="" d="M23 694q0 200 142 342t342 142t342 -142t142 -342q0 -141 -78 -262l300 -299q7 -7 7 -18t-7 -18l-109 -109q-8 -8 -18 -8t-18 8l-300 300q-119 -78 -261 -78q-200 0 -342 142t-142 342zM176 694q0 -136 97 -233t234 -97t233.5 97t96.5 233t-96.5 233t-233.5 97t-234 -97 t-97 -233zM300 601h400v200h-400v-200z" />
 | 
			
		||||
<glyph unicode="" d="M23 600q0 183 105 331t272 210v-166q-103 -55 -165 -155t-62 -220q0 -177 125 -302t302 -125t302 125t125 302q0 120 -62 220t-165 155v166q167 -62 272 -210t105 -331q0 -118 -45.5 -224.5t-123 -184t-184 -123t-224.5 -45.5t-224.5 45.5t-184 123t-123 184t-45.5 224.5 zM500 750q0 -21 14.5 -35.5t35.5 -14.5h100q21 0 35.5 14.5t14.5 35.5v400q0 21 -14.5 35.5t-35.5 14.5h-100q-21 0 -35.5 -14.5t-14.5 -35.5v-400z" />
 | 
			
		||||
<glyph unicode="" d="M100 1h200v300h-200v-300zM400 1v500h200v-500h-200zM700 1v800h200v-800h-200zM1000 1v1200h200v-1200h-200z" />
 | 
			
		||||
<glyph unicode="" d="M26 601q0 -33 6 -74l151 -38l2 -6q14 -49 38 -93l3 -5l-80 -134q45 -59 105 -105l133 81l5 -3q45 -26 94 -39l5 -2l38 -151q40 -5 74 -5q27 0 74 5l38 151l6 2q46 13 93 39l5 3l134 -81q56 44 104 105l-80 134l3 5q24 44 39 93l1 6l152 38q5 40 5 74q0 28 -5 73l-152 38 l-1 6q-16 51 -39 93l-3 5l80 134q-44 58 -104 105l-134 -81l-5 3q-45 25 -93 39l-6 1l-38 152q-40 5 -74 5q-27 0 -74 -5l-38 -152l-5 -1q-50 -14 -94 -39l-5 -3l-133 81q-59 -47 -105 -105l80 -134l-3 -5q-25 -47 -38 -93l-2 -6l-151 -38q-6 -48 -6 -73zM385 601 q0 88 63 151t152 63t152 -63t63 -151q0 -89 -63 -152t-152 -63t-152 63t-63 152z" />
 | 
			
		||||
<glyph unicode="" d="M100 1025v50q0 10 7.5 17.5t17.5 7.5h275v100q0 41 29.5 70.5t70.5 29.5h300q41 0 70.5 -29.5t29.5 -70.5v-100h275q10 0 17.5 -7.5t7.5 -17.5v-50q0 -11 -7 -18t-18 -7h-1050q-11 0 -18 7t-7 18zM200 100v800h900v-800q0 -41 -29.5 -71t-70.5 -30h-700q-41 0 -70.5 30 t-29.5 71zM300 100h100v700h-100v-700zM500 100h100v700h-100v-700zM500 1100h300v100h-300v-100zM700 100h100v700h-100v-700zM900 100h100v700h-100v-700z" />
 | 
			
		||||
<glyph unicode="" d="M1 601l656 644l644 -644h-200v-600h-300v400h-300v-400h-300v600h-200z" />
 | 
			
		||||
<glyph unicode="" d="M100 25v1150q0 11 7 18t18 7h475v-500h400v-675q0 -11 -7 -18t-18 -7h-850q-11 0 -18 7t-7 18zM700 800v300l300 -300h-300z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -171 121.5 -292.5t292.5 -121.5t292.5 121.5t121.5 292.5t-121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM500 500v400h100 v-300h200v-100h-300z" />
 | 
			
		||||
<glyph unicode="" d="M-100 0l431 1200h209l-21 -300h162l-20 300h208l431 -1200h-538l-41 400h-242l-40 -400h-539zM488 500h224l-27 300h-170z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v400h490l-290 300h200v500h300v-500h200l-290 -300h490v-400h-1100zM813 200h175v100h-175v-100z" />
 | 
			
		||||
<glyph unicode="" d="M1 600q0 122 47.5 233t127.5 191t191 127.5t233 47.5t233 -47.5t191 -127.5t127.5 -191t47.5 -233t-47.5 -233t-127.5 -191t-191 -127.5t-233 -47.5t-233 47.5t-191 127.5t-127.5 191t-47.5 233zM188 600q0 -170 121 -291t291 -121t291 121t121 291t-121 291t-291 121 t-291 -121t-121 -291zM350 600h150v300h200v-300h150l-250 -300z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -171 121.5 -292.5t292.5 -121.5t292.5 121.5t121.5 292.5t-121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM350 600l250 300 l250 -300h-150v-300h-200v300h-150z" />
 | 
			
		||||
<glyph unicode="" d="M0 25v475l200 700h800l199 -700l1 -475q0 -11 -7 -18t-18 -7h-1150q-11 0 -18 7t-7 18zM200 500h200l50 -200h300l50 200h200l-97 500h-606z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -172 121.5 -293t292.5 -121t292.5 121t121.5 293q0 171 -121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM500 397v401 l297 -200z" />
 | 
			
		||||
<glyph unicode="" d="M23 600q0 -118 45.5 -224.5t123 -184t184 -123t224.5 -45.5t224.5 45.5t184 123t123 184t45.5 224.5h-150q0 -177 -125 -302t-302 -125t-302 125t-125 302t125 302t302 125q136 0 246 -81l-146 -146h400v400l-145 -145q-157 122 -355 122q-118 0 -224.5 -45.5t-184 -123 t-123 -184t-45.5 -224.5z" />
 | 
			
		||||
<glyph unicode="" d="M23 600q0 118 45.5 224.5t123 184t184 123t224.5 45.5q198 0 355 -122l145 145v-400h-400l147 147q-112 80 -247 80q-177 0 -302 -125t-125 -302h-150zM100 0v400h400l-147 -147q112 -80 247 -80q177 0 302 125t125 302h150q0 -118 -45.5 -224.5t-123 -184t-184 -123 t-224.5 -45.5q-198 0 -355 122z" />
 | 
			
		||||
<glyph unicode="" d="M100 0h1100v1200h-1100v-1200zM200 100v900h900v-900h-900zM300 200v100h100v-100h-100zM300 400v100h100v-100h-100zM300 600v100h100v-100h-100zM300 800v100h100v-100h-100zM500 200h500v100h-500v-100zM500 400v100h500v-100h-500zM500 600v100h500v-100h-500z M500 800v100h500v-100h-500z" />
 | 
			
		||||
<glyph unicode="" d="M0 100v600q0 41 29.5 70.5t70.5 29.5h100v200q0 82 59 141t141 59h300q82 0 141 -59t59 -141v-200h100q41 0 70.5 -29.5t29.5 -70.5v-600q0 -41 -29.5 -70.5t-70.5 -29.5h-900q-41 0 -70.5 29.5t-29.5 70.5zM400 800h300v150q0 21 -14.5 35.5t-35.5 14.5h-200 q-21 0 -35.5 -14.5t-14.5 -35.5v-150z" />
 | 
			
		||||
<glyph unicode="" d="M100 0v1100h100v-1100h-100zM300 400q60 60 127.5 84t127.5 17.5t122 -23t119 -30t110 -11t103 42t91 120.5v500q-40 -81 -101.5 -115.5t-127.5 -29.5t-138 25t-139.5 40t-125.5 25t-103 -29.5t-65 -115.5v-500z" />
 | 
			
		||||
<glyph unicode="" d="M0 275q0 -11 7 -18t18 -7h50q11 0 18 7t7 18v300q0 127 70.5 231.5t184.5 161.5t245 57t245 -57t184.5 -161.5t70.5 -231.5v-300q0 -11 7 -18t18 -7h50q11 0 18 7t7 18v300q0 116 -49.5 227t-131 192.5t-192.5 131t-227 49.5t-227 -49.5t-192.5 -131t-131 -192.5 t-49.5 -227v-300zM200 20v460q0 8 6 14t14 6h160q8 0 14 -6t6 -14v-460q0 -8 -6 -14t-14 -6h-160q-8 0 -14 6t-6 14zM800 20v460q0 8 6 14t14 6h160q8 0 14 -6t6 -14v-460q0 -8 -6 -14t-14 -6h-160q-8 0 -14 6t-6 14z" />
 | 
			
		||||
<glyph unicode="" d="M0 400h300l300 -200v800l-300 -200h-300v-400zM688 459l141 141l-141 141l71 71l141 -141l141 141l71 -71l-141 -141l141 -141l-71 -71l-141 141l-141 -141z" />
 | 
			
		||||
<glyph unicode="" d="M0 400h300l300 -200v800l-300 -200h-300v-400zM700 857l69 53q111 -135 111 -310q0 -169 -106 -302l-67 54q86 110 86 248q0 146 -93 257z" />
 | 
			
		||||
<glyph unicode="" d="M0 401v400h300l300 200v-800l-300 200h-300zM702 858l69 53q111 -135 111 -310q0 -170 -106 -303l-67 55q86 110 86 248q0 145 -93 257zM889 951l7 -8q123 -151 123 -344q0 -189 -119 -339l-7 -8l81 -66l6 8q142 178 142 405q0 230 -144 408l-6 8z" />
 | 
			
		||||
<glyph unicode="" d="M0 0h500v500h-200v100h-100v-100h-200v-500zM0 600h100v100h400v100h100v100h-100v300h-500v-600zM100 100v300h300v-300h-300zM100 800v300h300v-300h-300zM200 200v100h100v-100h-100zM200 900h100v100h-100v-100zM500 500v100h300v-300h200v-100h-100v-100h-200v100 h-100v100h100v200h-200zM600 0v100h100v-100h-100zM600 1000h100v-300h200v-300h300v200h-200v100h200v500h-600v-200zM800 800v300h300v-300h-300zM900 0v100h300v-100h-300zM900 900v100h100v-100h-100zM1100 200v100h100v-100h-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 200h100v1000h-100v-1000zM100 0v100h300v-100h-300zM200 200v1000h100v-1000h-100zM500 0v91h100v-91h-100zM500 200v1000h200v-1000h-200zM700 0v91h100v-91h-100zM800 200v1000h100v-1000h-100zM900 0v91h200v-91h-200zM1000 200v1000h200v-1000h-200z" />
 | 
			
		||||
<glyph unicode="" d="M0 700l1 475q0 10 7.5 17.5t17.5 7.5h474l700 -700l-500 -500zM148 953q0 -42 29 -71q30 -30 71.5 -30t71.5 30q29 29 29 71t-29 71q-30 30 -71.5 30t-71.5 -30q-29 -29 -29 -71z" />
 | 
			
		||||
<glyph unicode="" d="M1 700l1 475q0 11 7 18t18 7h474l700 -700l-500 -500zM148 953q0 -42 30 -71q29 -30 71 -30t71 30q30 29 30 71t-30 71q-29 30 -71 30t-71 -30q-30 -29 -30 -71zM701 1200h100l700 -700l-500 -500l-50 50l450 450z" />
 | 
			
		||||
<glyph unicode="" d="M100 0v1025l175 175h925v-1000l-100 -100v1000h-750l-100 -100h750v-1000h-900z" />
 | 
			
		||||
<glyph unicode="" d="M200 0l450 444l450 -443v1150q0 20 -14.5 35t-35.5 15h-800q-21 0 -35.5 -15t-14.5 -35v-1151z" />
 | 
			
		||||
<glyph unicode="" d="M0 100v700h200l100 -200h600l100 200h200v-700h-200v200h-800v-200h-200zM253 829l40 -124h592l62 124l-94 346q-2 11 -10 18t-18 7h-450q-10 0 -18 -7t-10 -18zM281 24l38 152q2 10 11.5 17t19.5 7h500q10 0 19.5 -7t11.5 -17l38 -152q2 -10 -3.5 -17t-15.5 -7h-600 q-10 0 -15.5 7t-3.5 17z" />
 | 
			
		||||
<glyph unicode="" d="M0 200q0 -41 29.5 -70.5t70.5 -29.5h1000q41 0 70.5 29.5t29.5 70.5v600q0 41 -29.5 70.5t-70.5 29.5h-150q-4 8 -11.5 21.5t-33 48t-53 61t-69 48t-83.5 21.5h-200q-41 0 -82 -20.5t-70 -50t-52 -59t-34 -50.5l-12 -20h-150q-41 0 -70.5 -29.5t-29.5 -70.5v-600z M356 500q0 100 72 172t172 72t172 -72t72 -172t-72 -172t-172 -72t-172 72t-72 172zM494 500q0 -44 31 -75t75 -31t75 31t31 75t-31 75t-75 31t-75 -31t-31 -75zM900 700v100h100v-100h-100z" />
 | 
			
		||||
<glyph unicode="" d="M53 0h365v66q-41 0 -72 11t-49 38t1 71l92 234h391l82 -222q16 -45 -5.5 -88.5t-74.5 -43.5v-66h417v66q-34 1 -74 43q-18 19 -33 42t-21 37l-6 13l-385 998h-93l-399 -1006q-24 -48 -52 -75q-12 -12 -33 -25t-36 -20l-15 -7v-66zM416 521l178 457l46 -140l116 -317h-340 z" />
 | 
			
		||||
<glyph unicode="" d="M100 0v89q41 7 70.5 32.5t29.5 65.5v827q0 28 -1 39.5t-5.5 26t-15.5 21t-29 14t-49 14.5v71l471 -1q120 0 213 -88t93 -228q0 -55 -11.5 -101.5t-28 -74t-33.5 -47.5t-28 -28l-12 -7q8 -3 21.5 -9t48 -31.5t60.5 -58t47.5 -91.5t21.5 -129q0 -84 -59 -156.5t-142 -111 t-162 -38.5h-500zM400 200h161q89 0 153 48.5t64 132.5q0 90 -62.5 154.5t-156.5 64.5h-159v-400zM400 700h139q76 0 130 61.5t54 138.5q0 82 -84 130.5t-239 48.5v-379z" />
 | 
			
		||||
<glyph unicode="" d="M200 0v57q77 7 134.5 40.5t65.5 80.5l173 849q10 56 -10 74t-91 37q-6 1 -10.5 2.5t-9.5 2.5v57h425l2 -57q-33 -8 -62 -25.5t-46 -37t-29.5 -38t-17.5 -30.5l-5 -12l-128 -825q-10 -52 14 -82t95 -36v-57h-500z" />
 | 
			
		||||
<glyph unicode="" d="M-75 200h75v800h-75l125 167l125 -167h-75v-800h75l-125 -167zM300 900v300h150h700h150v-300h-50q0 29 -8 48.5t-18.5 30t-33.5 15t-39.5 5.5t-50.5 1h-200v-850l100 -50v-100h-400v100l100 50v850h-200q-34 0 -50.5 -1t-40 -5.5t-33.5 -15t-18.5 -30t-8.5 -48.5h-49z " />
 | 
			
		||||
<glyph unicode="" d="M33 51l167 125v-75h800v75l167 -125l-167 -125v75h-800v-75zM100 901v300h150h700h150v-300h-50q0 29 -8 48.5t-18 30t-33.5 15t-40 5.5t-50.5 1h-200v-650l100 -50v-100h-400v100l100 50v650h-200q-34 0 -50.5 -1t-39.5 -5.5t-33.5 -15t-18.5 -30t-8 -48.5h-50z" />
 | 
			
		||||
<glyph unicode="" d="M0 50q0 -20 14.5 -35t35.5 -15h1100q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-1100q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM0 350q0 -20 14.5 -35t35.5 -15h800q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-800q-21 0 -35.5 -14.5t-14.5 -35.5 v-100zM0 650q0 -20 14.5 -35t35.5 -15h1000q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-1000q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM0 950q0 -20 14.5 -35t35.5 -15h600q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-600q-21 0 -35.5 -14.5 t-14.5 -35.5v-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 50q0 -20 14.5 -35t35.5 -15h1100q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-1100q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM0 650q0 -20 14.5 -35t35.5 -15h1100q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-1100q-21 0 -35.5 -14.5t-14.5 -35.5 v-100zM200 350q0 -20 14.5 -35t35.5 -15h700q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-700q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM200 950q0 -20 14.5 -35t35.5 -15h700q21 0 35.5 15t14.5 35v100q0 21 -14.5 35.5t-35.5 14.5h-700q-21 0 -35.5 -14.5 t-14.5 -35.5v-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v100q0 21 14.5 35.5t35.5 14.5h1100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-1100q-21 0 -35.5 15t-14.5 35zM100 650v100q0 21 14.5 35.5t35.5 14.5h1000q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-1000q-21 0 -35.5 15 t-14.5 35zM300 350v100q0 21 14.5 35.5t35.5 14.5h800q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-800q-21 0 -35.5 15t-14.5 35zM500 950v100q0 21 14.5 35.5t35.5 14.5h600q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-600 q-21 0 -35.5 15t-14.5 35z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v100q0 21 14.5 35.5t35.5 14.5h1100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-1100q-21 0 -35.5 15t-14.5 35zM0 350v100q0 21 14.5 35.5t35.5 14.5h1100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-1100q-21 0 -35.5 15 t-14.5 35zM0 650v100q0 21 14.5 35.5t35.5 14.5h1100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-1100q-21 0 -35.5 15t-14.5 35zM0 950v100q0 21 14.5 35.5t35.5 14.5h1100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-1100 q-21 0 -35.5 15t-14.5 35z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v100q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-100q-21 0 -35.5 15t-14.5 35zM0 350v100q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-100q-21 0 -35.5 15 t-14.5 35zM0 650v100q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-100q-21 0 -35.5 15t-14.5 35zM0 950v100q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-100q-21 0 -35.5 15 t-14.5 35zM300 50v100q0 21 14.5 35.5t35.5 14.5h800q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-800q-21 0 -35.5 15t-14.5 35zM300 350v100q0 21 14.5 35.5t35.5 14.5h800q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-800 q-21 0 -35.5 15t-14.5 35zM300 650v100q0 21 14.5 35.5t35.5 14.5h800q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15h-800q-21 0 -35.5 15t-14.5 35zM300 950v100q0 21 14.5 35.5t35.5 14.5h800q21 0 35.5 -14.5t14.5 -35.5v-100q0 -20 -14.5 -35t-35.5 -15 h-800q-21 0 -35.5 15t-14.5 35z" />
 | 
			
		||||
<glyph unicode="" d="M-101 500v100h201v75l166 -125l-166 -125v75h-201zM300 0h100v1100h-100v-1100zM500 50q0 -20 14.5 -35t35.5 -15h600q20 0 35 15t15 35v100q0 21 -15 35.5t-35 14.5h-600q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM500 350q0 -20 14.5 -35t35.5 -15h300q20 0 35 15t15 35 v100q0 21 -15 35.5t-35 14.5h-300q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM500 650q0 -20 14.5 -35t35.5 -15h500q20 0 35 15t15 35v100q0 21 -15 35.5t-35 14.5h-500q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM500 950q0 -20 14.5 -35t35.5 -15h100q20 0 35 15t15 35v100 q0 21 -15 35.5t-35 14.5h-100q-21 0 -35.5 -14.5t-14.5 -35.5v-100z" />
 | 
			
		||||
<glyph unicode="" d="M1 50q0 -20 14.5 -35t35.5 -15h600q20 0 35 15t15 35v100q0 21 -15 35.5t-35 14.5h-600q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM1 350q0 -20 14.5 -35t35.5 -15h300q20 0 35 15t15 35v100q0 21 -15 35.5t-35 14.5h-300q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM1 650 q0 -20 14.5 -35t35.5 -15h500q20 0 35 15t15 35v100q0 21 -15 35.5t-35 14.5h-500q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM1 950q0 -20 14.5 -35t35.5 -15h100q20 0 35 15t15 35v100q0 21 -15 35.5t-35 14.5h-100q-21 0 -35.5 -14.5t-14.5 -35.5v-100zM801 0v1100h100v-1100 h-100zM934 550l167 -125v75h200v100h-200v75z" />
 | 
			
		||||
<glyph unicode="" d="M0 275v650q0 31 22 53t53 22h750q31 0 53 -22t22 -53v-650q0 -31 -22 -53t-53 -22h-750q-31 0 -53 22t-22 53zM900 600l300 300v-600z" />
 | 
			
		||||
<glyph unicode="" d="M0 44v1012q0 18 13 31t31 13h1112q19 0 31.5 -13t12.5 -31v-1012q0 -18 -12.5 -31t-31.5 -13h-1112q-18 0 -31 13t-13 31zM100 263l247 182l298 -131l-74 156l293 318l236 -288v500h-1000v-737zM208 750q0 56 39 95t95 39t95 -39t39 -95t-39 -95t-95 -39t-95 39t-39 95z " />
 | 
			
		||||
<glyph unicode="" d="M148 745q0 124 60.5 231.5t165 172t226.5 64.5q123 0 227 -63t164.5 -169.5t60.5 -229.5t-73 -272q-73 -114 -166.5 -237t-150.5 -189l-57 -66q-10 9 -27 26t-66.5 70.5t-96 109t-104 135.5t-100.5 155q-63 139 -63 262zM342 772q0 -107 75.5 -182.5t181.5 -75.5 q107 0 182.5 75.5t75.5 182.5t-75.5 182t-182.5 75t-182 -75.5t-75 -181.5z" />
 | 
			
		||||
<glyph unicode="" d="M1 600q0 122 47.5 233t127.5 191t191 127.5t233 47.5t233 -47.5t191 -127.5t127.5 -191t47.5 -233t-47.5 -233t-127.5 -191t-191 -127.5t-233 -47.5t-233 47.5t-191 127.5t-127.5 191t-47.5 233zM173 600q0 -177 125.5 -302t301.5 -125v854q-176 0 -301.5 -125 t-125.5 -302z" />
 | 
			
		||||
<glyph unicode="" d="M117 406q0 94 34 186t88.5 172.5t112 159t115 177t87.5 194.5q21 -71 57.5 -142.5t76 -130.5t83 -118.5t82 -117t70 -116t50 -125.5t18.5 -136q0 -89 -39 -165.5t-102 -126.5t-140 -79.5t-156 -33.5q-114 6 -211.5 53t-161.5 139t-64 210zM243 414q14 -82 59.5 -136 t136.5 -80l16 98q-7 6 -18 17t-34 48t-33 77q-15 73 -14 143.5t10 122.5l9 51q-92 -110 -119.5 -185t-12.5 -156z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300q0 165 117.5 282.5t282.5 117.5q366 -6 397 -14l-186 -186h-311q-41 0 -70.5 -29.5t-29.5 -70.5v-500q0 -41 29.5 -70.5t70.5 -29.5h500q41 0 70.5 29.5t29.5 70.5v125l200 200v-225q0 -165 -117.5 -282.5t-282.5 -117.5h-300q-165 0 -282.5 117.5 t-117.5 282.5zM436 341l161 50l412 412l-114 113l-405 -405zM995 1015l113 -113l113 113l-21 85l-92 28z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300q0 165 117.5 282.5t282.5 117.5h261l2 -80q-133 -32 -218 -120h-145q-41 0 -70.5 -29.5t-29.5 -70.5v-500q0 -41 29.5 -70.5t70.5 -29.5h500q41 0 70.5 29.5t29.5 70.5l200 153v-53q0 -165 -117.5 -282.5t-282.5 -117.5h-300q-165 0 -282.5 117.5t-117.5 282.5 zM423 524q30 38 81.5 64t103 35.5t99 14t77.5 3.5l29 -1v-209l360 324l-359 318v-216q-7 0 -19 -1t-48 -8t-69.5 -18.5t-76.5 -37t-76.5 -59t-62 -88t-39.5 -121.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300q0 165 117.5 282.5t282.5 117.5h300q61 0 127 -23l-178 -177h-349q-41 0 -70.5 -29.5t-29.5 -70.5v-500q0 -41 29.5 -70.5t70.5 -29.5h500q41 0 70.5 29.5t29.5 70.5v69l200 200v-169q0 -165 -117.5 -282.5t-282.5 -117.5h-300q-165 0 -282.5 117.5 t-117.5 282.5zM342 632l283 -284l567 567l-137 137l-430 -431l-146 147z" />
 | 
			
		||||
<glyph unicode="" d="M0 603l300 296v-198h200v200h-200l300 300l295 -300h-195v-200h200v198l300 -296l-300 -300v198h-200v-200h195l-295 -300l-300 300h200v200h-200v-198z" />
 | 
			
		||||
<glyph unicode="" d="M200 50v1000q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-437l500 487v-1100l-500 488v-438q0 -21 -14.5 -35.5t-35.5 -14.5h-100q-21 0 -35.5 14.5t-14.5 35.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v1000q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-437l500 487v-487l500 487v-1100l-500 488v-488l-500 488v-438q0 -21 -14.5 -35.5t-35.5 -14.5h-100q-21 0 -35.5 14.5t-14.5 35.5z" />
 | 
			
		||||
<glyph unicode="" d="M136 550l564 550v-487l500 487v-1100l-500 488v-488z" />
 | 
			
		||||
<glyph unicode="" d="M200 0l900 550l-900 550v-1100z" />
 | 
			
		||||
<glyph unicode="" d="M200 150q0 -21 14.5 -35.5t35.5 -14.5h200q21 0 35.5 14.5t14.5 35.5v800q0 21 -14.5 35.5t-35.5 14.5h-200q-21 0 -35.5 -14.5t-14.5 -35.5v-800zM600 150q0 -21 14.5 -35.5t35.5 -14.5h200q21 0 35.5 14.5t14.5 35.5v800q0 21 -14.5 35.5t-35.5 14.5h-200 q-21 0 -35.5 -14.5t-14.5 -35.5v-800z" />
 | 
			
		||||
<glyph unicode="" d="M200 150q0 -20 14.5 -35t35.5 -15h800q21 0 35.5 15t14.5 35v800q0 21 -14.5 35.5t-35.5 14.5h-800q-21 0 -35.5 -14.5t-14.5 -35.5v-800z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v1100l500 -487v487l564 -550l-564 -550v488z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v1100l500 -487v487l500 -487v437q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-1000q0 -21 -14.5 -35.5t-35.5 -14.5h-100q-21 0 -35.5 14.5t-14.5 35.5v438l-500 -488v488z" />
 | 
			
		||||
<glyph unicode="" d="M300 0v1100l500 -487v437q0 21 14.5 35.5t35.5 14.5h100q21 0 35.5 -14.5t14.5 -35.5v-1000q0 -21 -14.5 -35.5t-35.5 -14.5h-100q-21 0 -35.5 14.5t-14.5 35.5v438z" />
 | 
			
		||||
<glyph unicode="" d="M100 250v100q0 21 14.5 35.5t35.5 14.5h1000q21 0 35.5 -14.5t14.5 -35.5v-100q0 -21 -14.5 -35.5t-35.5 -14.5h-1000q-21 0 -35.5 14.5t-14.5 35.5zM100 500h1100l-550 564z" />
 | 
			
		||||
<glyph unicode="" d="M185 599l592 -592l240 240l-353 353l353 353l-240 240z" />
 | 
			
		||||
<glyph unicode="" d="M272 194l353 353l-353 353l241 240l572 -571l21 -22l-1 -1v-1l-592 -591z" />
 | 
			
		||||
<glyph unicode="" d="M3 600q0 162 80 299.5t217.5 217.5t299.5 80t299.5 -80t217.5 -217.5t80 -299.5t-80 -299.5t-217.5 -217.5t-299.5 -80t-299.5 80t-217.5 217.5t-80 299.5zM300 500h200v-200h200v200h200v200h-200v200h-200v-200h-200v-200z" />
 | 
			
		||||
<glyph unicode="" d="M3 600q0 162 80 299.5t217.5 217.5t299.5 80t299.5 -80t217.5 -217.5t80 -299.5t-80 -299.5t-217.5 -217.5t-299.5 -80t-299.5 80t-217.5 217.5t-80 299.5zM300 500h600v200h-600v-200z" />
 | 
			
		||||
<glyph unicode="" d="M3 600q0 162 80 299.5t217.5 217.5t299.5 80t299.5 -80t217.5 -217.5t80 -299.5t-80 -299.5t-217.5 -217.5t-299.5 -80t-299.5 80t-217.5 217.5t-80 299.5zM246 459l213 -213l141 142l141 -142l213 213l-142 141l142 141l-213 212l-141 -141l-141 142l-212 -213l141 -141 z" />
 | 
			
		||||
<glyph unicode="" d="M3 600q0 162 80 299.5t217.5 217.5t299.5 80t299.5 -80t217.5 -217.5t80 -299.5t-80 -299.5t-217.5 -217.5t-299.5 -80t-299.5 80t-217.5 217.5t-80 299.5zM270 551l276 -277l411 411l-175 174l-236 -236l-102 102z" />
 | 
			
		||||
<glyph unicode="" d="M3 600q0 162 80 299.5t217.5 217.5t299.5 80t299.5 -80t217.5 -217.5t80 -299.5t-80 -299.5t-217.5 -217.5t-299.5 -80t-299.5 80t-217.5 217.5t-80 299.5zM364 700h143q4 0 11.5 -1t11 -1t6.5 3t3 9t1 11t3.5 8.5t3.5 6t5.5 4t6.5 2.5t9 1.5t9 0.5h11.5h12.5 q19 0 30 -10t11 -26q0 -22 -4 -28t-27 -22q-5 -1 -12.5 -3t-27 -13.5t-34 -27t-26.5 -46t-11 -68.5h200q5 3 14 8t31.5 25.5t39.5 45.5t31 69t14 94q0 51 -17.5 89t-42 58t-58.5 32t-58.5 15t-51.5 3q-50 0 -90.5 -12t-75 -38.5t-53.5 -74.5t-19 -114zM500 300h200v100h-200 v-100z" />
 | 
			
		||||
<glyph unicode="" d="M3 600q0 162 80 299.5t217.5 217.5t299.5 80t299.5 -80t217.5 -217.5t80 -299.5t-80 -299.5t-217.5 -217.5t-299.5 -80t-299.5 80t-217.5 217.5t-80 299.5zM400 300h400v100h-100v300h-300v-100h100v-200h-100v-100zM500 800h200v100h-200v-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 500v200h195q31 125 98.5 199.5t206.5 100.5v200h200v-200q54 -20 113 -60t112.5 -105.5t71.5 -134.5h203v-200h-203q-25 -102 -116.5 -186t-180.5 -117v-197h-200v197q-140 27 -208 102.5t-98 200.5h-194zM290 500q24 -73 79.5 -127.5t130.5 -78.5v206h200v-206 q149 48 201 206h-201v200h200q-25 74 -75.5 127t-124.5 77v-204h-200v203q-75 -23 -130 -77t-79 -126h209v-200h-210z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -171 121.5 -292.5t292.5 -121.5t292.5 121.5t121.5 292.5t-121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM356 465l135 135 l-135 135l109 109l135 -135l135 135l109 -109l-135 -135l135 -135l-109 -109l-135 135l-135 -135z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -171 121.5 -292.5t292.5 -121.5t292.5 121.5t121.5 292.5t-121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM322 537l141 141 l87 -87l204 205l142 -142l-346 -345z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -115 62 -215l568 567q-100 62 -216 62q-171 0 -292.5 -121.5t-121.5 -292.5zM391 245q97 -59 209 -59q171 0 292.5 121.5t121.5 292.5 q0 112 -59 209z" />
 | 
			
		||||
<glyph unicode="" d="M0 547l600 453v-300h600v-300h-600v-301z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300h600v300l600 -453l-600 -448v301h-600z" />
 | 
			
		||||
<glyph unicode="" d="M204 600l450 600l444 -600h-298v-600h-300v600h-296z" />
 | 
			
		||||
<glyph unicode="" d="M104 600h296v600h300v-600h298l-449 -600z" />
 | 
			
		||||
<glyph unicode="" d="M0 200q6 132 41 238.5t103.5 193t184 138t271.5 59.5v271l600 -453l-600 -448v301q-95 -2 -183 -20t-170 -52t-147 -92.5t-100 -135.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v400l129 -129l294 294l142 -142l-294 -294l129 -129h-400zM635 777l142 -142l294 294l129 -129v400h-400l129 -129z" />
 | 
			
		||||
<glyph unicode="" d="M34 176l295 295l-129 129h400v-400l-129 130l-295 -295zM600 600v400l129 -129l295 295l142 -141l-295 -295l129 -130h-400z" />
 | 
			
		||||
<glyph unicode="" d="M23 600q0 118 45.5 224.5t123 184t184 123t224.5 45.5t224.5 -45.5t184 -123t123 -184t45.5 -224.5t-45.5 -224.5t-123 -184t-184 -123t-224.5 -45.5t-224.5 45.5t-184 123t-123 184t-45.5 224.5zM456 851l58 -302q4 -20 21.5 -34.5t37.5 -14.5h54q20 0 37.5 14.5 t21.5 34.5l58 302q4 20 -8 34.5t-32 14.5h-207q-21 0 -33 -14.5t-8 -34.5zM500 300h200v100h-200v-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 800h100v-200h400v300h200v-300h400v200h100v100h-111q1 1 1 6.5t-1.5 15t-3.5 17.5l-34 172q-11 39 -41.5 63t-69.5 24q-32 0 -61 -17l-239 -144q-22 -13 -40 -35q-19 24 -40 36l-238 144q-33 18 -62 18q-39 0 -69.5 -23t-40.5 -61l-35 -177q-2 -8 -3 -18t-1 -15v-6 h-111v-100zM100 0h400v400h-400v-400zM200 900q-3 0 14 48t36 96l18 47l213 -191h-281zM700 0v400h400v-400h-400zM731 900l202 197q5 -12 12 -32.5t23 -64t25 -72t7 -28.5h-269z" />
 | 
			
		||||
<glyph unicode="" d="M0 -22v143l216 193q-9 53 -13 83t-5.5 94t9 113t38.5 114t74 124q47 60 99.5 102.5t103 68t127.5 48t145.5 37.5t184.5 43.5t220 58.5q0 -189 -22 -343t-59 -258t-89 -181.5t-108.5 -120t-122 -68t-125.5 -30t-121.5 -1.5t-107.5 12.5t-87.5 17t-56.5 7.5l-99 -55z M238.5 300.5q19.5 -6.5 86.5 76.5q55 66 367 234q70 38 118.5 69.5t102 79t99 111.5t86.5 148q22 50 24 60t-6 19q-7 5 -17 5t-26.5 -14.5t-33.5 -39.5q-35 -51 -113.5 -108.5t-139.5 -89.5l-61 -32q-369 -197 -458 -401q-48 -111 -28.5 -117.5z" />
 | 
			
		||||
<glyph unicode="" d="M111 408q0 -33 5 -63q9 -56 44 -119.5t105 -108.5q31 -21 64 -16t62 23.5t57 49.5t48 61.5t35 60.5q32 66 39 184.5t-13 157.5q79 -80 122 -164t26 -184q-5 -33 -20.5 -69.5t-37.5 -80.5q-10 -19 -14.5 -29t-12 -26t-9 -23.5t-3 -19t2.5 -15.5t11 -9.5t19.5 -5t30.5 2.5 t42 8q57 20 91 34t87.5 44.5t87 64t65.5 88.5t47 122q38 172 -44.5 341.5t-246.5 278.5q22 -44 43 -129q39 -159 -32 -154q-15 2 -33 9q-79 33 -120.5 100t-44 175.5t48.5 257.5q-13 -8 -34 -23.5t-72.5 -66.5t-88.5 -105.5t-60 -138t-8 -166.5q2 -12 8 -41.5t8 -43t6 -39.5 t3.5 -39.5t-1 -33.5t-6 -31.5t-13.5 -24t-21 -20.5t-31 -12q-38 -10 -67 13t-40.5 61.5t-15 81.5t10.5 75q-52 -46 -83.5 -101t-39 -107t-7.5 -85z" />
 | 
			
		||||
<glyph unicode="" d="M-61 600l26 40q6 10 20 30t49 63.5t74.5 85.5t97 90t116.5 83.5t132.5 59t145.5 23.5t145.5 -23.5t132.5 -59t116.5 -83.5t97 -90t74.5 -85.5t49 -63.5t20 -30l26 -40l-26 -40q-6 -10 -20 -30t-49 -63.5t-74.5 -85.5t-97 -90t-116.5 -83.5t-132.5 -59t-145.5 -23.5 t-145.5 23.5t-132.5 59t-116.5 83.5t-97 90t-74.5 85.5t-49 63.5t-20 30zM120 600q7 -10 40.5 -58t56 -78.5t68 -77.5t87.5 -75t103 -49.5t125 -21.5t123.5 20t100.5 45.5t85.5 71.5t66.5 75.5t58 81.5t47 66q-1 1 -28.5 37.5t-42 55t-43.5 53t-57.5 63.5t-58.5 54 q49 -74 49 -163q0 -124 -88 -212t-212 -88t-212 88t-88 212q0 85 46 158q-102 -87 -226 -258zM377 656q49 -124 154 -191l105 105q-37 24 -75 72t-57 84l-20 36z" />
 | 
			
		||||
<glyph unicode="" d="M-61 600l26 40q6 10 20 30t49 63.5t74.5 85.5t97 90t116.5 83.5t132.5 59t145.5 23.5q61 0 121 -17l37 142h148l-314 -1200h-148l37 143q-82 21 -165 71.5t-140 102t-109.5 112t-72 88.5t-29.5 43zM120 600q210 -282 393 -336l37 141q-107 18 -178.5 101.5t-71.5 193.5 q0 85 46 158q-102 -87 -226 -258zM377 656q49 -124 154 -191l47 47l23 87q-30 28 -59 69t-44 68l-14 26zM780 161l38 145q22 15 44.5 34t46 44t40.5 44t41 50.5t33.5 43.5t33 44t24.5 34q-97 127 -140 175l39 146q67 -54 131.5 -125.5t87.5 -103.5t36 -52l26 -40l-26 -40 q-7 -12 -25.5 -38t-63.5 -79.5t-95.5 -102.5t-124 -100t-146.5 -79z" />
 | 
			
		||||
<glyph unicode="" d="M-97.5 34q13.5 -34 50.5 -34h1294q37 0 50.5 35.5t-7.5 67.5l-642 1056q-20 34 -48 36.5t-48 -29.5l-642 -1066q-21 -32 -7.5 -66zM155 200l445 723l445 -723h-345v100h-200v-100h-345zM500 600l100 -300l100 300v100h-200v-100z" />
 | 
			
		||||
<glyph unicode="" d="M100 262v41q0 20 11 44.5t26 38.5l363 325v339q0 62 44 106t106 44t106 -44t44 -106v-339l363 -325q15 -14 26 -38.5t11 -44.5v-41q0 -20 -12 -26.5t-29 5.5l-359 249v-263q100 -91 100 -113v-64q0 -20 -13 -28.5t-32 0.5l-94 78h-222l-94 -78q-19 -9 -32 -0.5t-13 28.5 v64q0 22 100 113v263l-359 -249q-17 -12 -29 -5.5t-12 26.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 50q0 -20 14.5 -35t35.5 -15h1000q21 0 35.5 15t14.5 35v750h-1100v-750zM0 900h1100v150q0 21 -14.5 35.5t-35.5 14.5h-150v100h-100v-100h-500v100h-100v-100h-150q-21 0 -35.5 -14.5t-14.5 -35.5v-150zM100 100v100h100v-100h-100zM100 300v100h100v-100h-100z M100 500v100h100v-100h-100zM300 100v100h100v-100h-100zM300 300v100h100v-100h-100zM300 500v100h100v-100h-100zM500 100v100h100v-100h-100zM500 300v100h100v-100h-100zM500 500v100h100v-100h-100zM700 100v100h100v-100h-100zM700 300v100h100v-100h-100zM700 500 v100h100v-100h-100zM900 100v100h100v-100h-100zM900 300v100h100v-100h-100zM900 500v100h100v-100h-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 200v200h259l600 600h241v198l300 -295l-300 -300v197h-159l-600 -600h-341zM0 800h259l122 -122l141 142l-181 180h-341v-200zM678 381l141 142l122 -123h159v198l300 -295l-300 -300v197h-241z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v600q0 41 29.5 70.5t70.5 29.5h1000q41 0 70.5 -29.5t29.5 -70.5v-600q0 -41 -29.5 -70.5t-70.5 -29.5h-596l-304 -300v300h-100q-41 0 -70.5 29.5t-29.5 70.5z" />
 | 
			
		||||
<glyph unicode="" d="M100 600v200h300v-250q0 -113 6 -145q17 -92 102 -117q39 -11 92 -11q37 0 66.5 5.5t50 15.5t36 24t24 31.5t14 37.5t7 42t2.5 45t0 47v25v250h300v-200q0 -42 -3 -83t-15 -104t-31.5 -116t-58 -109.5t-89 -96.5t-129 -65.5t-174.5 -25.5t-174.5 25.5t-129 65.5t-89 96.5 t-58 109.5t-31.5 116t-15 104t-3 83zM100 900v300h300v-300h-300zM800 900v300h300v-300h-300z" />
 | 
			
		||||
<glyph unicode="" d="M-30 411l227 -227l352 353l353 -353l226 227l-578 579z" />
 | 
			
		||||
<glyph unicode="" d="M70 797l580 -579l578 579l-226 227l-353 -353l-352 353z" />
 | 
			
		||||
<glyph unicode="" d="M-198 700l299 283l300 -283h-203v-400h385l215 -200h-800v600h-196zM402 1000l215 -200h381v-400h-198l299 -283l299 283h-200v600h-796z" />
 | 
			
		||||
<glyph unicode="" d="M18 939q-5 24 10 42q14 19 39 19h896l38 162q5 17 18.5 27.5t30.5 10.5h94q20 0 35 -14.5t15 -35.5t-15 -35.5t-35 -14.5h-54l-201 -961q-2 -4 -6 -10.5t-19 -17.5t-33 -11h-31v-50q0 -20 -14.5 -35t-35.5 -15t-35.5 15t-14.5 35v50h-300v-50q0 -20 -14.5 -35t-35.5 -15 t-35.5 15t-14.5 35v50h-50q-21 0 -35.5 15t-14.5 35q0 21 14.5 35.5t35.5 14.5h535l48 200h-633q-32 0 -54.5 21t-27.5 43z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v800h1200v-800h-1200zM0 900v100h200q0 41 29.5 70.5t70.5 29.5h300q41 0 70.5 -29.5t29.5 -70.5h500v-100h-1200z" />
 | 
			
		||||
<glyph unicode="" d="M1 0l300 700h1200l-300 -700h-1200zM1 400v600h200q0 41 29.5 70.5t70.5 29.5h300q41 0 70.5 -29.5t29.5 -70.5h500v-200h-1000z" />
 | 
			
		||||
<glyph unicode="" d="M302 300h198v600h-198l298 300l298 -300h-198v-600h198l-298 -300z" />
 | 
			
		||||
<glyph unicode="" d="M0 600l300 298v-198h600v198l300 -298l-300 -297v197h-600v-197z" />
 | 
			
		||||
<glyph unicode="" d="M0 100v100q0 41 29.5 70.5t70.5 29.5h1000q41 0 70.5 -29.5t29.5 -70.5v-100q0 -41 -29.5 -70.5t-70.5 -29.5h-1000q-41 0 -70.5 29.5t-29.5 70.5zM31 400l172 739q5 22 23 41.5t38 19.5h672q19 0 37.5 -22.5t23.5 -45.5l172 -732h-1138zM800 100h100v100h-100v-100z M1000 100h100v100h-100v-100z" />
 | 
			
		||||
<glyph unicode="" d="M-101 600v50q0 24 25 49t50 38l25 13v-250l-11 5.5t-24 14t-30 21.5t-24 27.5t-11 31.5zM100 500v250v8v8v7t0.5 7t1.5 5.5t2 5t3 4t4.5 3.5t6 1.5t7.5 0.5h200l675 250v-850l-675 200h-38l47 -276q2 -12 -3 -17.5t-11 -6t-21 -0.5h-8h-83q-20 0 -34.5 14t-18.5 35 q-55 337 -55 351zM1100 200v850q0 21 14.5 35.5t35.5 14.5q20 0 35 -14.5t15 -35.5v-850q0 -20 -15 -35t-35 -15q-21 0 -35.5 15t-14.5 35z" />
 | 
			
		||||
<glyph unicode="" d="M74 350q0 21 13.5 35.5t33.5 14.5h18l117 173l63 327q15 77 76 140t144 83l-18 32q-6 19 3 32t29 13h94q20 0 29 -10.5t3 -29.5q-18 -36 -18 -37q83 -19 144 -82.5t76 -140.5l63 -327l118 -173h17q20 0 33.5 -14.5t13.5 -35.5q0 -20 -13 -40t-31 -27q-8 -3 -23 -8.5 t-65 -20t-103 -25t-132.5 -19.5t-158.5 -9q-125 0 -245.5 20.5t-178.5 40.5l-58 20q-18 7 -31 27.5t-13 40.5zM497 110q12 -49 40 -79.5t63 -30.5t63 30.5t39 79.5q-48 -6 -102 -6t-103 6z" />
 | 
			
		||||
<glyph unicode="" d="M21 445l233 -45l-78 -224l224 78l45 -233l155 179l155 -179l45 233l224 -78l-78 224l234 45l-180 155l180 156l-234 44l78 225l-224 -78l-45 233l-155 -180l-155 180l-45 -233l-224 78l78 -225l-233 -44l179 -156z" />
 | 
			
		||||
<glyph unicode="" d="M0 200h200v600h-200v-600zM300 275q0 -75 100 -75h61q124 -100 139 -100h250q46 0 83 57l238 344q29 31 29 74v100q0 44 -30.5 84.5t-69.5 40.5h-328q28 118 28 125v150q0 44 -30.5 84.5t-69.5 40.5h-50q-27 0 -51 -20t-38 -48l-96 -198l-145 -196q-20 -26 -20 -63v-400z M400 300v375l150 213l100 212h50v-175l-50 -225h450v-125l-250 -375h-214l-136 100h-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v600h200v-600h-200zM300 525v400q0 75 100 75h61q124 100 139 100h250q46 0 83 -57l238 -344q29 -31 29 -74v-100q0 -44 -30.5 -84.5t-69.5 -40.5h-328q28 -118 28 -125v-150q0 -44 -30.5 -84.5t-69.5 -40.5h-50q-27 0 -51 20t-38 48l-96 198l-145 196 q-20 26 -20 63zM400 525l150 -212l100 -213h50v175l-50 225h450v125l-250 375h-214l-136 -100h-100v-375z" />
 | 
			
		||||
<glyph unicode="" d="M8 200v600h200v-600h-200zM308 275v525q0 17 14 35.5t28 28.5l14 9l362 230q14 6 25 6q17 0 29 -12l109 -112q14 -14 14 -34q0 -18 -11 -32l-85 -121h302q85 0 138.5 -38t53.5 -110t-54.5 -111t-138.5 -39h-107l-130 -339q-7 -22 -20.5 -41.5t-28.5 -19.5h-341 q-7 0 -90 81t-83 94zM408 289l100 -89h293l131 339q6 21 19.5 41t28.5 20h203q16 0 25 15t9 36q0 20 -9 34.5t-25 14.5h-457h-6.5h-7.5t-6.5 0.5t-6 1t-5 1.5t-5.5 2.5t-4 4t-4 5.5q-5 12 -5 20q0 14 10 27l147 183l-86 83l-339 -236v-503z" />
 | 
			
		||||
<glyph unicode="" d="M-101 651q0 72 54 110t139 38l302 -1l-85 121q-11 16 -11 32q0 21 14 34l109 113q13 12 29 12q11 0 25 -6l365 -230q7 -4 17 -10.5t26.5 -26t16.5 -36.5v-526q0 -13 -86 -93.5t-94 -80.5h-341q-16 0 -29.5 20t-19.5 41l-130 339h-107q-84 0 -139 39t-55 111zM-1 601h222 q15 0 28.5 -20.5t19.5 -40.5l131 -339h293l107 89v502l-343 237l-87 -83l145 -184q10 -11 10 -26q0 -11 -5 -20q-1 -3 -3.5 -5.5l-4 -4t-5 -2.5t-5.5 -1.5t-6.5 -1t-6.5 -0.5h-7.5h-6.5h-476v-100zM1000 201v600h200v-600h-200z" />
 | 
			
		||||
<glyph unicode="" d="M97 719l230 -363q4 -6 10.5 -15.5t26 -25t36.5 -15.5h525q13 0 94 83t81 90v342q0 15 -20 28.5t-41 19.5l-339 131v106q0 84 -39 139t-111 55t-110 -53.5t-38 -138.5v-302l-121 84q-15 12 -33.5 11.5t-32.5 -13.5l-112 -110q-22 -22 -6 -53zM172 739l83 86l183 -146 q22 -18 47 -5q3 1 5.5 3.5l4 4t2.5 5t1.5 5.5t1 6.5t0.5 6.5v7.5v6.5v456q0 22 25 31t50 -0.5t25 -30.5v-202q0 -16 20 -29.5t41 -19.5l339 -130v-294l-89 -100h-503zM400 0v200h600v-200h-600z" />
 | 
			
		||||
<glyph unicode="" d="M2 585q-16 -31 6 -53l112 -110q13 -13 32 -13.5t34 10.5l121 85q0 -51 -0.5 -153.5t-0.5 -148.5q0 -84 38.5 -138t110.5 -54t111 55t39 139v106l339 131q20 6 40.5 19.5t20.5 28.5v342q0 7 -81 90t-94 83h-525q-17 0 -35.5 -14t-28.5 -28l-10 -15zM77 565l236 339h503 l89 -100v-294l-340 -130q-20 -6 -40 -20t-20 -29v-202q0 -22 -25 -31t-50 0t-25 31v456v14.5t-1.5 11.5t-5 12t-9.5 7q-24 13 -46 -5l-184 -146zM305 1104v200h600v-200h-600z" />
 | 
			
		||||
<glyph unicode="" d="M5 597q0 122 47.5 232.5t127.5 190.5t190.5 127.5t232.5 47.5q162 0 299.5 -80t217.5 -218t80 -300t-80 -299.5t-217.5 -217.5t-299.5 -80t-300 80t-218 217.5t-80 299.5zM298 701l2 -201h300l-2 -194l402 294l-402 298v-197h-300z" />
 | 
			
		||||
<glyph unicode="" d="M0 597q0 122 47.5 232.5t127.5 190.5t190.5 127.5t231.5 47.5q122 0 232.5 -47.5t190.5 -127.5t127.5 -190.5t47.5 -232.5q0 -162 -80 -299.5t-218 -217.5t-300 -80t-299.5 80t-217.5 217.5t-80 299.5zM200 600l402 -294l-2 194h300l2 201h-300v197z" />
 | 
			
		||||
<glyph unicode="" d="M5 597q0 122 47.5 232.5t127.5 190.5t190.5 127.5t232.5 47.5q162 0 299.5 -80t217.5 -218t80 -300t-80 -299.5t-217.5 -217.5t-299.5 -80t-300 80t-218 217.5t-80 299.5zM300 600h200v-300h200v300h200l-300 400z" />
 | 
			
		||||
<glyph unicode="" d="M5 597q0 122 47.5 232.5t127.5 190.5t190.5 127.5t232.5 47.5q162 0 299.5 -80t217.5 -218t80 -300t-80 -299.5t-217.5 -217.5t-299.5 -80t-300 80t-218 217.5t-80 299.5zM300 600l300 -400l300 400h-200v300h-200v-300h-200z" />
 | 
			
		||||
<glyph unicode="" d="M5 597q0 122 47.5 232.5t127.5 190.5t190.5 127.5t232.5 47.5q121 0 231.5 -47.5t190.5 -127.5t127.5 -190.5t47.5 -232.5q0 -162 -80 -299.5t-217.5 -217.5t-299.5 -80t-300 80t-218 217.5t-80 299.5zM254 780q-8 -33 5.5 -92.5t7.5 -87.5q0 -9 17 -44t16 -60 q12 0 23 -5.5t23 -15t20 -13.5q24 -12 108 -42q22 -8 53 -31.5t59.5 -38.5t57.5 -11q8 -18 -15 -55t-20 -57q42 -71 87 -80q0 -6 -3 -15.5t-3.5 -14.5t4.5 -17q104 -3 221 112q30 29 47 47t34.5 49t20.5 62q-14 9 -37 9.5t-36 7.5q-14 7 -49 15t-52 19q-9 0 -39.5 -0.5 t-46.5 -1.5t-39 -6.5t-39 -16.5q-50 -35 -66 -12q-4 2 -3.5 25.5t0.5 25.5q-6 13 -26.5 17t-24.5 7q2 22 -2 41t-16.5 28t-38.5 -20q-23 -25 -42 4q-19 28 -8 58q6 16 22 22q6 -1 26 -1.5t33.5 -4t19.5 -13.5q12 -19 32 -37.5t34 -27.5l14 -8q0 3 9.5 39.5t5.5 57.5 q-4 23 14.5 44.5t22.5 31.5q5 14 10 35t8.5 31t15.5 22.5t34 21.5q-6 18 10 37q8 0 23.5 -1.5t24.5 -1.5t20.5 4.5t20.5 15.5q-10 23 -30.5 42.5t-38 30t-49 26.5t-43.5 23q11 39 2 44q31 -13 58 -14.5t39 3.5l11 4q7 36 -16.5 53.5t-64.5 28.5t-56 23q-19 -3 -37 0 q-15 -12 -36.5 -21t-34.5 -12t-44 -8t-39 -6q-15 -3 -45.5 0.5t-45.5 -2.5q-21 -7 -52 -26.5t-34 -34.5q-3 -11 6.5 -22.5t8.5 -18.5q-3 -34 -27.5 -90.5t-29.5 -79.5zM518 916q3 12 16 30t16 25q10 -10 18.5 -10t14 6t14.5 14.5t16 12.5q0 -24 17 -66.5t17 -43.5 q-9 2 -31 5t-36 5t-32 8t-30 14zM692 1003h1h-1z" />
 | 
			
		||||
<glyph unicode="" d="M0 164.5q0 21.5 15 37.5l600 599q-33 101 6 201.5t135 154.5q164 92 306 -9l-259 -138l145 -232l251 126q13 -175 -151 -267q-123 -70 -253 -23l-596 -596q-15 -16 -36.5 -16t-36.5 16l-111 110q-15 15 -15 36.5z" />
 | 
			
		||||
<glyph unicode="" horiz-adv-x="1220" d="M0 196v100q0 41 29.5 70.5t70.5 29.5h1000q41 0 70.5 -29.5t29.5 -70.5v-100q0 -41 -29.5 -70.5t-70.5 -29.5h-1000q-41 0 -70.5 29.5t-29.5 70.5zM0 596v100q0 41 29.5 70.5t70.5 29.5h1000q41 0 70.5 -29.5t29.5 -70.5v-100q0 -41 -29.5 -70.5t-70.5 -29.5h-1000 q-41 0 -70.5 29.5t-29.5 70.5zM0 996v100q0 41 29.5 70.5t70.5 29.5h1000q41 0 70.5 -29.5t29.5 -70.5v-100q0 -41 -29.5 -70.5t-70.5 -29.5h-1000q-41 0 -70.5 29.5t-29.5 70.5zM600 596h500v100h-500v-100zM800 196h300v100h-300v-100zM900 996h200v100h-200v-100z" />
 | 
			
		||||
<glyph unicode="" d="M100 1100v100h1000v-100h-1000zM150 1000h900l-350 -500v-300l-200 -200v500z" />
 | 
			
		||||
<glyph unicode="" d="M0 200v200h1200v-200q0 -41 -29.5 -70.5t-70.5 -29.5h-1000q-41 0 -70.5 29.5t-29.5 70.5zM0 500v400q0 41 29.5 70.5t70.5 29.5h300v100q0 41 29.5 70.5t70.5 29.5h200q41 0 70.5 -29.5t29.5 -70.5v-100h300q41 0 70.5 -29.5t29.5 -70.5v-400h-500v100h-200v-100h-500z M500 1000h200v100h-200v-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v400l129 -129l200 200l142 -142l-200 -200l129 -129h-400zM0 800l129 129l200 -200l142 142l-200 200l129 129h-400v-400zM729 329l142 142l200 -200l129 129v-400h-400l129 129zM729 871l200 200l-129 129h400v-400l-129 129l-200 -200z" />
 | 
			
		||||
<glyph unicode="" d="M0 596q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM182 596q0 -172 121.5 -293t292.5 -121t292.5 121t121.5 293q0 171 -121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM291 655 q0 23 15.5 38.5t38.5 15.5t39 -16t16 -38q0 -23 -16 -39t-39 -16q-22 0 -38 16t-16 39zM400 850q0 22 16 38.5t39 16.5q22 0 38 -16t16 -39t-16 -39t-38 -16q-23 0 -39 16.5t-16 38.5zM514 609q0 32 20.5 56.5t51.5 29.5l122 126l1 1q-9 14 -9 28q0 22 16 38.5t39 16.5 q22 0 38 -16t16 -39t-16 -39t-38 -16q-14 0 -29 10l-55 -145q17 -22 17 -51q0 -36 -25.5 -61.5t-61.5 -25.5t-61.5 25.5t-25.5 61.5zM800 655q0 22 16 38t39 16t38.5 -15.5t15.5 -38.5t-16 -39t-38 -16q-23 0 -39 16t-16 39z" />
 | 
			
		||||
<glyph unicode="" d="M-40 375q-13 -95 35 -173q35 -57 94 -89t129 -32q63 0 119 28q33 16 65 40.5t52.5 45.5t59.5 64q40 44 57 61l394 394q35 35 47 84t-3 96q-27 87 -117 104q-20 2 -29 2q-46 0 -78.5 -16.5t-67.5 -51.5l-389 -396l-7 -7l69 -67l377 373q20 22 39 38q23 23 50 23 q38 0 53 -36q16 -39 -20 -75l-547 -547q-52 -52 -125 -52q-55 0 -100 33t-54 96q-5 35 2.5 66t31.5 63t42 50t56 54q24 21 44 41l348 348q52 52 82.5 79.5t84 54t107.5 26.5q25 0 48 -4q95 -17 154 -94.5t51 -175.5q-7 -101 -98 -192l-252 -249l-253 -256l7 -7l69 -60 l517 511q67 67 95 157t11 183q-16 87 -67 154t-130 103q-69 33 -152 33q-107 0 -197 -55q-40 -24 -111 -95l-512 -512q-68 -68 -81 -163z" />
 | 
			
		||||
<glyph unicode="" d="M80 784q0 131 98.5 229.5t230.5 98.5q143 0 241 -129q103 129 246 129q129 0 226 -98.5t97 -229.5q0 -46 -17.5 -91t-61 -99t-77 -89.5t-104.5 -105.5q-197 -191 -293 -322l-17 -23l-16 23q-43 58 -100 122.5t-92 99.5t-101 100q-71 70 -104.5 105.5t-77 89.5t-61 99 t-17.5 91zM250 784q0 -27 30.5 -70t61.5 -75.5t95 -94.5l22 -22q93 -90 190 -201q82 92 195 203l12 12q64 62 97.5 97t64.5 79t31 72q0 71 -48 119.5t-105 48.5q-74 0 -132 -83l-118 -171l-114 174q-51 80 -123 80q-60 0 -109.5 -49.5t-49.5 -118.5z" />
 | 
			
		||||
<glyph unicode="" d="M57 353q0 -95 66 -159l141 -142q68 -66 159 -66q93 0 159 66l283 283q66 66 66 159t-66 159l-141 141q-8 9 -19 17l-105 -105l212 -212l-389 -389l-247 248l95 95l-18 18q-46 45 -75 101l-55 -55q-66 -66 -66 -159zM269 706q0 -93 66 -159l141 -141q7 -7 19 -17l105 105 l-212 212l389 389l247 -247l-95 -96l18 -17q47 -49 77 -100l29 29q35 35 62.5 88t27.5 96q0 93 -66 159l-141 141q-66 66 -159 66q-95 0 -159 -66l-283 -283q-66 -64 -66 -159z" />
 | 
			
		||||
<glyph unicode="" d="M200 100v953q0 21 30 46t81 48t129 38t163 15t162 -15t127 -38t79 -48t29 -46v-953q0 -41 -29.5 -70.5t-70.5 -29.5h-600q-41 0 -70.5 29.5t-29.5 70.5zM300 300h600v700h-600v-700zM496 150q0 -43 30.5 -73.5t73.5 -30.5t73.5 30.5t30.5 73.5t-30.5 73.5t-73.5 30.5 t-73.5 -30.5t-30.5 -73.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 0l303 380l207 208l-210 212h300l267 279l-35 36q-15 14 -15 35t15 35q14 15 35 15t35 -15l283 -282q15 -15 15 -36t-15 -35q-14 -15 -35 -15t-35 15l-36 35l-279 -267v-300l-212 210l-208 -207z" />
 | 
			
		||||
<glyph unicode="" d="M295 433h139q5 -77 48.5 -126.5t117.5 -64.5v335q-6 1 -15.5 4t-11.5 3q-46 14 -79 26.5t-72 36t-62.5 52t-40 72.5t-16.5 99q0 92 44 159.5t109 101t144 40.5v78h100v-79q38 -4 72.5 -13.5t75.5 -31.5t71 -53.5t51.5 -84t24.5 -118.5h-159q-8 72 -35 109.5t-101 50.5 v-307l64 -14q34 -7 64 -16.5t70 -31.5t67.5 -52t47.5 -80.5t20 -112.5q0 -139 -89 -224t-244 -96v-77h-100v78q-152 17 -237 104q-40 40 -52.5 93.5t-15.5 139.5zM466 889q0 -29 8 -51t16.5 -34t29.5 -22.5t31 -13.5t38 -10q7 -2 11 -3v274q-61 -8 -97.5 -37.5t-36.5 -102.5 zM700 237q170 18 170 151q0 64 -44 99.5t-126 60.5v-311z" />
 | 
			
		||||
<glyph unicode="" d="M100 600v100h166q-24 49 -44 104q-10 26 -14.5 55.5t-3 72.5t25 90t68.5 87q97 88 263 88q129 0 230 -89t101 -208h-153q0 52 -34 89.5t-74 51.5t-76 14q-37 0 -79 -14.5t-62 -35.5q-41 -44 -41 -101q0 -28 16.5 -69.5t28 -62.5t41.5 -72h241v-100h-197q8 -50 -2.5 -115 t-31.5 -94q-41 -59 -99 -113q35 11 84 18t70 7q33 1 103 -16t103 -17q76 0 136 30l50 -147q-41 -25 -80.5 -36.5t-59 -13t-61.5 -1.5q-23 0 -128 33t-155 29q-39 -4 -82 -17t-66 -25l-24 -11l-55 145l16.5 11t15.5 10t13.5 9.5t14.5 12t14.5 14t17.5 18.5q48 55 54 126.5 t-30 142.5h-221z" />
 | 
			
		||||
<glyph unicode="" d="M2 300l298 -300l298 300h-198v900h-200v-900h-198zM602 900l298 300l298 -300h-198v-900h-200v900h-198z" />
 | 
			
		||||
<glyph unicode="" d="M2 300h198v900h200v-900h198l-298 -300zM700 0v200h100v-100h200v-100h-300zM700 400v100h300v-200h-99v-100h-100v100h99v100h-200zM700 700v500h300v-500h-100v100h-100v-100h-100zM801 900h100v200h-100v-200z" />
 | 
			
		||||
<glyph unicode="" d="M2 300h198v900h200v-900h198l-298 -300zM700 0v500h300v-500h-100v100h-100v-100h-100zM700 700v200h100v-100h200v-100h-300zM700 1100v100h300v-200h-99v-100h-100v100h99v100h-200zM801 200h100v200h-100v-200z" />
 | 
			
		||||
<glyph unicode="" d="M2 300l298 -300l298 300h-198v900h-200v-900h-198zM800 100v400h300v-500h-100v100h-200zM800 1100v100h200v-500h-100v400h-100zM901 200h100v200h-100v-200z" />
 | 
			
		||||
<glyph unicode="" d="M2 300l298 -300l298 300h-198v900h-200v-900h-198zM800 400v100h200v-500h-100v400h-100zM800 800v400h300v-500h-100v100h-200zM901 900h100v200h-100v-200z" />
 | 
			
		||||
<glyph unicode="" d="M2 300l298 -300l298 300h-198v900h-200v-900h-198zM700 100v200h500v-200h-500zM700 400v200h400v-200h-400zM700 700v200h300v-200h-300zM700 1000v200h200v-200h-200z" />
 | 
			
		||||
<glyph unicode="" d="M2 300l298 -300l298 300h-198v900h-200v-900h-198zM700 100v200h200v-200h-200zM700 400v200h300v-200h-300zM700 700v200h400v-200h-400zM700 1000v200h500v-200h-500z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300q0 165 117.5 282.5t282.5 117.5h300q162 0 281 -118.5t119 -281.5v-300q0 -165 -118.5 -282.5t-281.5 -117.5h-300q-165 0 -282.5 117.5t-117.5 282.5zM200 300q0 -41 29.5 -70.5t70.5 -29.5h500q41 0 70.5 29.5t29.5 70.5v500q0 41 -29.5 70.5t-70.5 29.5 h-500q-41 0 -70.5 -29.5t-29.5 -70.5v-500z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300q0 163 119 281.5t281 118.5h300q165 0 282.5 -117.5t117.5 -282.5v-300q0 -165 -117.5 -282.5t-282.5 -117.5h-300q-163 0 -281.5 117.5t-118.5 282.5zM200 300q0 -41 29.5 -70.5t70.5 -29.5h500q41 0 70.5 29.5t29.5 70.5v500q0 41 -29.5 70.5t-70.5 29.5 h-500q-41 0 -70.5 -29.5t-29.5 -70.5v-500zM400 300l333 250l-333 250v-500z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300q0 163 117.5 281.5t282.5 118.5h300q163 0 281.5 -119t118.5 -281v-300q0 -165 -117.5 -282.5t-282.5 -117.5h-300q-165 0 -282.5 117.5t-117.5 282.5zM200 300q0 -41 29.5 -70.5t70.5 -29.5h500q41 0 70.5 29.5t29.5 70.5v500q0 41 -29.5 70.5t-70.5 29.5 h-500q-41 0 -70.5 -29.5t-29.5 -70.5v-500zM300 700l250 -333l250 333h-500z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300q0 165 117.5 282.5t282.5 117.5h300q165 0 282.5 -117.5t117.5 -282.5v-300q0 -162 -118.5 -281t-281.5 -119h-300q-165 0 -282.5 118.5t-117.5 281.5zM200 300q0 -41 29.5 -70.5t70.5 -29.5h500q41 0 70.5 29.5t29.5 70.5v500q0 41 -29.5 70.5t-70.5 29.5 h-500q-41 0 -70.5 -29.5t-29.5 -70.5v-500zM300 400h500l-250 333z" />
 | 
			
		||||
<glyph unicode="" d="M0 400v300h300v200l400 -350l-400 -350v200h-300zM500 0v200h500q41 0 70.5 29.5t29.5 70.5v500q0 41 -29.5 70.5t-70.5 29.5h-500v200h400q165 0 282.5 -117.5t117.5 -282.5v-300q0 -165 -117.5 -282.5t-282.5 -117.5h-400z" />
 | 
			
		||||
<glyph unicode="" d="M217 519q8 -19 31 -19h302q-155 -438 -160 -458q-5 -21 4 -32l9 -8h9q14 0 26 15q11 13 274.5 321.5t264.5 308.5q14 19 5 36q-8 17 -31 17l-301 -1q1 4 78 219.5t79 227.5q2 15 -5 27l-9 9h-9q-15 0 -25 -16q-4 -6 -98 -111.5t-228.5 -257t-209.5 -237.5q-16 -19 -6 -41 z" />
 | 
			
		||||
<glyph unicode="" d="M0 400q0 -165 117.5 -282.5t282.5 -117.5h300q47 0 100 15v185h-500q-41 0 -70.5 29.5t-29.5 70.5v500q0 41 29.5 70.5t70.5 29.5h500v185q-14 4 -114 7.5t-193 5.5l-93 2q-165 0 -282.5 -117.5t-117.5 -282.5v-300zM600 400v300h300v200l400 -350l-400 -350v200h-300z " />
 | 
			
		||||
<glyph unicode="" d="M0 400q0 -165 117.5 -282.5t282.5 -117.5h300q163 0 281.5 117.5t118.5 282.5v98l-78 73l-122 -123v-148q0 -41 -29.5 -70.5t-70.5 -29.5h-500q-41 0 -70.5 29.5t-29.5 70.5v500q0 41 29.5 70.5t70.5 29.5h156l118 122l-74 78h-100q-165 0 -282.5 -117.5t-117.5 -282.5 v-300zM496 709l353 342l-149 149h500v-500l-149 149l-342 -353z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -171 121.5 -292.5t292.5 -121.5t292.5 121.5t121.5 292.5t-121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM406 600 q0 80 57 137t137 57t137 -57t57 -137t-57 -137t-137 -57t-137 57t-57 137z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v275q0 11 7 18t18 7h1048q11 0 19 -7.5t8 -17.5v-275h-1100zM100 800l445 -500l450 500h-295v400h-300v-400h-300zM900 150h100v50h-100v-50z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v275q0 11 7 18t18 7h1048q11 0 19 -7.5t8 -17.5v-275h-1100zM100 700h300v-300h300v300h295l-445 500zM900 150h100v50h-100v-50z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v275q0 11 7 18t18 7h1048q11 0 19 -7.5t8 -17.5v-275h-1100zM100 705l305 -305l596 596l-154 155l-442 -442l-150 151zM900 150h100v50h-100v-50z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v275q0 11 7 18t18 7h1048q11 0 19 -7.5t8 -17.5v-275h-1100zM100 988l97 -98l212 213l-97 97zM200 400l697 1l3 699l-250 -239l-149 149l-212 -212l149 -149zM900 150h100v50h-100v-50z" />
 | 
			
		||||
<glyph unicode="" d="M0 0v275q0 11 7 18t18 7h1048q11 0 19 -7.5t8 -17.5v-275h-1100zM200 612l212 -212l98 97l-213 212zM300 1200l239 -250l-149 -149l212 -212l149 148l249 -237l-1 697zM900 150h100v50h-100v-50z" />
 | 
			
		||||
<glyph unicode="" d="M23 415l1177 784v-1079l-475 272l-310 -393v416h-392zM494 210l672 938l-672 -712v-226z" />
 | 
			
		||||
<glyph unicode="" d="M0 150v1000q0 20 14.5 35t35.5 15h250v-300h500v300h100l200 -200v-850q0 -21 -15 -35.5t-35 -14.5h-150v400h-700v-400h-150q-21 0 -35.5 14.5t-14.5 35.5zM600 1000h100v200h-100v-200z" />
 | 
			
		||||
<glyph unicode="" d="M0 150v1000q0 20 14.5 35t35.5 15h250v-300h500v300h100l200 -200v-218l-276 -275l-120 120l-126 -127h-378v-400h-150q-21 0 -35.5 14.5t-14.5 35.5zM581 306l123 123l120 -120l353 352l123 -123l-475 -476zM600 1000h100v200h-100v-200z" />
 | 
			
		||||
<glyph unicode="" d="M0 150v1000q0 20 14.5 35t35.5 15h250v-300h500v300h100l200 -200v-269l-103 -103l-170 170l-298 -298h-329v-400h-150q-21 0 -35.5 14.5t-14.5 35.5zM600 1000h100v200h-100v-200zM700 133l170 170l-170 170l127 127l170 -170l170 170l127 -128l-170 -169l170 -170 l-127 -127l-170 170l-170 -170z" />
 | 
			
		||||
<glyph unicode="" d="M0 150v1000q0 20 14.5 35t35.5 15h250v-300h500v300h100l200 -200v-300h-400v-200h-500v-400h-150q-21 0 -35.5 14.5t-14.5 35.5zM600 300l300 -300l300 300h-200v300h-200v-300h-200zM600 1000v200h100v-200h-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 150v1000q0 20 14.5 35t35.5 15h250v-300h500v300h100l200 -200v-402l-200 200l-298 -298h-402v-400h-150q-21 0 -35.5 14.5t-14.5 35.5zM600 300h200v-300h200v300h200l-300 300zM600 1000v200h100v-200h-100z" />
 | 
			
		||||
<glyph unicode="" d="M0 250q0 -21 14.5 -35.5t35.5 -14.5h1100q21 0 35.5 14.5t14.5 35.5v550h-1200v-550zM0 900h1200v150q0 21 -14.5 35.5t-35.5 14.5h-1100q-21 0 -35.5 -14.5t-14.5 -35.5v-150zM100 300v200h400v-200h-400z" />
 | 
			
		||||
<glyph unicode="" d="M0 400l300 298v-198h400v-200h-400v-198zM100 800v200h100v-200h-100zM300 800v200h100v-200h-100zM500 800v200h400v198l300 -298l-300 -298v198h-400zM800 300v200h100v-200h-100zM1000 300h100v200h-100v-200z" />
 | 
			
		||||
<glyph unicode="" d="M100 700v400l50 100l50 -100v-300h100v300l50 100l50 -100v-300h100v300l50 100l50 -100v-400l-100 -203v-447q0 -21 -14.5 -35.5t-35.5 -14.5h-200q-21 0 -35.5 14.5t-14.5 35.5v447zM800 597q0 -29 10.5 -55.5t25 -43t29 -28.5t25.5 -18l10 -5v-397q0 -21 14.5 -35.5 t35.5 -14.5h200q21 0 35.5 14.5t14.5 35.5v1106q0 31 -18 40.5t-44 -7.5l-276 -116q-25 -17 -43.5 -51.5t-18.5 -65.5v-359z" />
 | 
			
		||||
<glyph unicode="" d="M100 0h400v56q-75 0 -87.5 6t-12.5 44v394h500v-394q0 -38 -12.5 -44t-87.5 -6v-56h400v56q-4 0 -11 0.5t-24 3t-30 7t-24 15t-11 24.5v888q0 22 25 34.5t50 13.5l25 2v56h-400v-56q75 0 87.5 -6t12.5 -44v-394h-500v394q0 38 12.5 44t87.5 6v56h-400v-56q4 0 11 -0.5 t24 -3t30 -7t24 -15t11 -24.5v-888q0 -22 -25 -34.5t-50 -13.5l-25 -2v-56z" />
 | 
			
		||||
<glyph unicode="" d="M0 300q0 -41 29.5 -70.5t70.5 -29.5h300q41 0 70.5 29.5t29.5 70.5v500q0 41 -29.5 70.5t-70.5 29.5h-300q-41 0 -70.5 -29.5t-29.5 -70.5v-500zM100 100h400l200 200h105l295 98v-298h-425l-100 -100h-375zM100 300v200h300v-200h-300zM100 600v200h300v-200h-300z M100 1000h400l200 -200v-98l295 98h105v200h-425l-100 100h-375zM700 402v163l400 133v-163z" />
 | 
			
		||||
<glyph unicode="" d="M16.5 974.5q0.5 -21.5 16 -90t46.5 -140t104 -177.5t175 -208q103 -103 207.5 -176t180 -103.5t137 -47t92.5 -16.5l31 1l163 162q17 18 13.5 41t-22.5 37l-192 136q-19 14 -45 12t-42 -19l-118 -118q-142 101 -268 227t-227 268l118 118q17 17 20 41.5t-11 44.5 l-139 194q-14 19 -36.5 22t-40.5 -14l-162 -162q-1 -11 -0.5 -32.5z" />
 | 
			
		||||
<glyph unicode="" d="M0 50v212q0 20 10.5 45.5t24.5 39.5l365 303v50q0 4 1 10.5t12 22.5t30 28.5t60 23t97 10.5t97 -10t60 -23.5t30 -27.5t12 -24l1 -10v-50l365 -303q14 -14 24.5 -39.5t10.5 -45.5v-212q0 -21 -14.5 -35.5t-35.5 -14.5h-1100q-20 0 -35 14.5t-15 35.5zM0 712 q0 -21 14.5 -33.5t34.5 -8.5l202 33q20 4 34.5 21t14.5 38v146q141 24 300 24t300 -24v-146q0 -21 14.5 -38t34.5 -21l202 -33q20 -4 34.5 8.5t14.5 33.5v200q-6 8 -19 20.5t-63 45t-112 57t-171 45t-235 20.5q-92 0 -175 -10.5t-141.5 -27t-108.5 -36.5t-81.5 -40 t-53.5 -36.5t-31 -27.5l-9 -10v-200z" />
 | 
			
		||||
<glyph unicode="" d="M100 0v100h1100v-100h-1100zM175 200h950l-125 150v250l100 100v400h-100v-200h-100v200h-200v-200h-100v200h-200v-200h-100v200h-100v-400l100 -100v-250z" />
 | 
			
		||||
<glyph unicode="" d="M100 0h300v400q0 41 -29.5 70.5t-70.5 29.5h-100q-41 0 -70.5 -29.5t-29.5 -70.5v-400zM500 0v1000q0 41 29.5 70.5t70.5 29.5h100q41 0 70.5 -29.5t29.5 -70.5v-1000h-300zM900 0v700q0 41 29.5 70.5t70.5 29.5h100q41 0 70.5 -29.5t29.5 -70.5v-700h-300z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 300h300v300h-200v100h200v100h-300v-300h200v-100h-200v-100zM600 300h200v100h100v300h-100v100h-200v-500 zM700 400v300h100v-300h-100z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 300h100v200h100v-200h100v500h-100v-200h-100v200h-100v-500zM600 300h200v100h100v300h-100v100h-200v-500 zM700 400v300h100v-300h-100z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 300h300v100h-200v300h200v100h-300v-500zM600 300h300v100h-200v300h200v100h-300v-500z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 550l300 -150v300zM600 400l300 150l-300 150v-300z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 300v500h700v-500h-700zM300 400h130q41 0 68 42t27 107t-28.5 108t-66.5 43h-130v-300zM575 549 q0 -65 27 -107t68 -42h130v300h-130q-38 0 -66.5 -43t-28.5 -108z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 300h300v300h-200v100h200v100h-300v-300h200v-100h-200v-100zM601 300h100v100h-100v-100zM700 700h100 v-400h100v500h-200v-100z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 300h300v400h-200v100h-100v-500zM301 400v200h100v-200h-100zM601 300h100v100h-100v-100zM700 700h100 v-400h100v500h-200v-100z" />
 | 
			
		||||
<glyph unicode="" d="M-100 300v500q0 124 88 212t212 88h700q124 0 212 -88t88 -212v-500q0 -124 -88 -212t-212 -88h-700q-124 0 -212 88t-88 212zM100 200h900v700h-900v-700zM200 700v100h300v-300h-99v-100h-100v100h99v200h-200zM201 300v100h100v-100h-100zM601 300v100h100v-100h-100z M700 700v100h200v-500h-100v400h-100z" />
 | 
			
		||||
<glyph unicode="" d="M4 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM186 600q0 -171 121.5 -292.5t292.5 -121.5t292.5 121.5t121.5 292.5t-121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM400 500v200 l100 100h300v-100h-300v-200h300v-100h-300z" />
 | 
			
		||||
<glyph unicode="" d="M0 600q0 162 80 299t217 217t299 80t299 -80t217 -217t80 -299t-80 -299t-217 -217t-299 -80t-299 80t-217 217t-80 299zM182 600q0 -171 121.5 -292.5t292.5 -121.5t292.5 121.5t121.5 292.5t-121.5 292.5t-292.5 121.5t-292.5 -121.5t-121.5 -292.5zM400 400v400h300 l100 -100v-100h-100v100h-200v-100h200v-100h-200v-100h-100zM700 400v100h100v-100h-100z" />
 | 
			
		||||
<glyph unicode="" d="M-14 494q0 -80 56.5 -137t135.5 -57h222v300h400v-300h128q120 0 205 86.5t85 207.5t-85 207t-205 86q-46 0 -90 -14q-44 97 -134.5 156.5t-200.5 59.5q-152 0 -260 -107.5t-108 -260.5q0 -25 2 -37q-66 -14 -108.5 -67.5t-42.5 -122.5zM300 200h200v300h200v-300h200 l-300 -300z" />
 | 
			
		||||
<glyph unicode="" d="M-14 494q0 -80 56.5 -137t135.5 -57h8l414 414l403 -403q94 26 154.5 104.5t60.5 178.5q0 120 -85 206.5t-205 86.5q-46 0 -90 -14q-44 97 -134.5 156.5t-200.5 59.5q-152 0 -260 -107.5t-108 -260.5q0 -25 2 -37q-66 -14 -108.5 -67.5t-42.5 -122.5zM300 200l300 300 l300 -300h-200v-300h-200v300h-200z" />
 | 
			
		||||
<glyph unicode="" d="M100 200h400v-155l-75 -45h350l-75 45v155h400l-270 300h170l-270 300h170l-300 333l-300 -333h170l-270 -300h170z" />
 | 
			
		||||
<glyph unicode="" d="M121 700q0 -53 28.5 -97t75.5 -65q-4 -16 -4 -38q0 -74 52.5 -126.5t126.5 -52.5q56 0 100 30v-306l-75 -45h350l-75 45v306q46 -30 100 -30q74 0 126.5 52.5t52.5 126.5q0 24 -9 55q50 32 79.5 83t29.5 112q0 90 -61.5 155.5t-150.5 71.5q-26 89 -99.5 145.5 t-167.5 56.5q-116 0 -197.5 -81.5t-81.5 -197.5q0 -4 1 -11.5t1 -11.5q-14 2 -23 2q-74 0 -126.5 -52.5t-52.5 -126.5z" />
 | 
			
		||||
</font>
 | 
			
		||||
</defs></svg> 
 | 
			
		||||
| 
		 After Width: | Height: | Size: 62 KiB  | 
							
								
								
									
										
											BIN
										
									
								
								static/fonts/glyphicons-halflings-regular.ttf
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										
											BIN
										
									
								
								static/fonts/glyphicons-halflings-regular.ttf
									
									
									
									
									
										Normal file
									
								
							
										
											Binary file not shown.
										
									
								
							
							
								
								
									
										
											BIN
										
									
								
								static/fonts/glyphicons-halflings-regular.woff
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										
											BIN
										
									
								
								static/fonts/glyphicons-halflings-regular.woff
									
									
									
									
									
										Normal file
									
								
							
										
											Binary file not shown.
										
									
								
							
							
								
								
									
										42
									
								
								templates/default-layout-wrapper.hamlet
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										42
									
								
								templates/default-layout-wrapper.hamlet
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,42 @@
 | 
			
		||||
$newline never
 | 
			
		||||
\<!doctype html>
 | 
			
		||||
\<!--[if lt IE 7]> <html class="no-js ie6 oldie" lang="en"> <![endif]-->
 | 
			
		||||
\<!--[if IE 7]>    <html class="no-js ie7 oldie" lang="en"> <![endif]-->
 | 
			
		||||
\<!--[if IE 8]>    <html class="no-js ie8 oldie" lang="en"> <![endif]-->
 | 
			
		||||
\<!--[if gt IE 8]><!-->
 | 
			
		||||
<html class="no-js" lang="en"> <!--<![endif]-->
 | 
			
		||||
  <head>
 | 
			
		||||
    <meta charset="UTF-8">
 | 
			
		||||
 | 
			
		||||
    <title>#{pageTitle pc}
 | 
			
		||||
    <meta name="description" content="">
 | 
			
		||||
    <meta name="author" content="">
 | 
			
		||||
 | 
			
		||||
    <meta name="viewport" content="width=device-width,initial-scale=1">
 | 
			
		||||
 | 
			
		||||
    ^{pageHead pc}
 | 
			
		||||
 | 
			
		||||
    \<!--[if lt IE 9]>
 | 
			
		||||
    \<script src="http://html5shiv.googlecode.com/svn/trunk/html5.js"></script>
 | 
			
		||||
    \<![endif]-->
 | 
			
		||||
 | 
			
		||||
    <script>
 | 
			
		||||
      document.documentElement.className = document.documentElement.className.replace(/\bno-js\b/,'js');
 | 
			
		||||
  <body>
 | 
			
		||||
    <div class="container">
 | 
			
		||||
      <header>
 | 
			
		||||
      <div id="main" role="main">
 | 
			
		||||
        ^{pageBody pc}
 | 
			
		||||
      <footer>
 | 
			
		||||
        #{appCopyright $ appSettings master}
 | 
			
		||||
 | 
			
		||||
    $maybe analytics <- appAnalytics $ appSettings master
 | 
			
		||||
      <script>
 | 
			
		||||
        if(!window.location.href.match(/localhost/)){
 | 
			
		||||
          window._gaq = [['_setAccount','#{analytics}'],['_trackPageview'],['_trackPageLoadTime']];
 | 
			
		||||
          (function() {
 | 
			
		||||
          \  var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
 | 
			
		||||
          \  ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js';
 | 
			
		||||
          \  var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
 | 
			
		||||
          })();
 | 
			
		||||
        }
 | 
			
		||||
							
								
								
									
										3
									
								
								templates/default-layout.hamlet
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										3
									
								
								templates/default-layout.hamlet
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,3 @@
 | 
			
		||||
$maybe msg <- mmsg
 | 
			
		||||
  <div #message>#{msg}
 | 
			
		||||
^{widget}
 | 
			
		||||
							
								
								
									
										39
									
								
								templates/homepage.hamlet
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										39
									
								
								templates/homepage.hamlet
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,39 @@
 | 
			
		||||
<h1>Welcome to Yesod!
 | 
			
		||||
 | 
			
		||||
<ol>
 | 
			
		||||
  <li>Now that you have a working project you should use the #
 | 
			
		||||
    \<a href="http://www.yesodweb.com/book/">Yesod book<span class="glyphicon glyphicon-book"></span></a> to learn more. #
 | 
			
		||||
    You can also use this scaffolded site to explore some basic concepts.
 | 
			
		||||
 | 
			
		||||
  <li> This page was generated by the #{handlerName} handler in #
 | 
			
		||||
    \<em>Handler/Home.hs</em>.
 | 
			
		||||
 | 
			
		||||
  <li> The #{handlerName} handler is set to generate your site's home screen in Routes file #
 | 
			
		||||
    <em>config/routes
 | 
			
		||||
 | 
			
		||||
  <li> The HTML you are seeing now is actually composed by a number of <em>widgets</em>, #
 | 
			
		||||
    most of them are brought together by the <em>defaultLayout</em> function which #
 | 
			
		||||
    is defined in the <em>Foundation.hs</em> module, and used by <em>#{handlerName}</em>. #
 | 
			
		||||
    All the files for templates and wigdets are in <em>templates</em>.
 | 
			
		||||
 | 
			
		||||
  <li>
 | 
			
		||||
    A Widget's Html, Css and Javascript are separated in three files with the #
 | 
			
		||||
    \<em>.hamlet</em>, <em>.lucius</em> and <em>.julius</em> extensions.
 | 
			
		||||
 | 
			
		||||
  <li ##{aDomId}>If you had javascript enabled then you wouldn't be seeing this.
 | 
			
		||||
 | 
			
		||||
  <li #form>
 | 
			
		||||
    This is an example trivial Form. Read the #
 | 
			
		||||
    \<a href="http://www.yesodweb.com/book/forms">Forms chapter<span class="glyphicon glyphicon-bookmark"></span></a> #
 | 
			
		||||
    on the yesod book to learn more about them.
 | 
			
		||||
    $maybe (info,con) <- submission
 | 
			
		||||
      <div .message .alert .alert-success>
 | 
			
		||||
        Your file's type was <em>#{fileContentType info}</em>. You say it has: <em>#{con}</em>
 | 
			
		||||
    <form method=post action=@{HomeR}#form enctype=#{formEnctype}>
 | 
			
		||||
      ^{formWidget}
 | 
			
		||||
      <button .btn .btn-primary type="submit">
 | 
			
		||||
         Send it! <span class="glyphicon glyphicon-upload"></span>
 | 
			
		||||
 | 
			
		||||
  <li> And last but not least, Testing. In <em>tests/main.hs</em> you will find a #
 | 
			
		||||
    test suite that performs tests on this page. #
 | 
			
		||||
    You can run your tests by doing: <pre>yesod test</pre>
 | 
			
		||||
							
								
								
									
										1
									
								
								templates/homepage.julius
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										1
									
								
								templates/homepage.julius
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1 @@
 | 
			
		||||
document.getElementById(#{toJSON aDomId}).innerHTML = "This text was added by the Javascript part of the homepage widget.";
 | 
			
		||||
							
								
								
									
										6
									
								
								templates/homepage.lucius
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										6
									
								
								templates/homepage.lucius
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,6 @@
 | 
			
		||||
h1 {
 | 
			
		||||
    text-align: center
 | 
			
		||||
}
 | 
			
		||||
h2##{aDomId} {
 | 
			
		||||
    color: #990
 | 
			
		||||
}
 | 
			
		||||
							
								
								
									
										17
									
								
								test/Handler/CommonSpec.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										17
									
								
								test/Handler/CommonSpec.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,17 @@
 | 
			
		||||
module Handler.CommonSpec (spec) where
 | 
			
		||||
 | 
			
		||||
import TestImport
 | 
			
		||||
 | 
			
		||||
spec :: Spec
 | 
			
		||||
spec = withApp $ do
 | 
			
		||||
    describe "robots.txt" $ do
 | 
			
		||||
        it "gives a 200" $ do
 | 
			
		||||
            get RobotsR
 | 
			
		||||
            statusIs 200
 | 
			
		||||
        it "has correct User-agent" $ do
 | 
			
		||||
            get RobotsR
 | 
			
		||||
            bodyContains "User-agent: *"
 | 
			
		||||
    describe "favicon.ico" $ do
 | 
			
		||||
        it "gives a 200" $ do
 | 
			
		||||
            get FaviconR
 | 
			
		||||
            statusIs 200
 | 
			
		||||
							
								
								
									
										32
									
								
								test/Handler/HomeSpec.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										32
									
								
								test/Handler/HomeSpec.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,32 @@
 | 
			
		||||
module Handler.HomeSpec (spec) where
 | 
			
		||||
 | 
			
		||||
import TestImport
 | 
			
		||||
 | 
			
		||||
spec :: Spec
 | 
			
		||||
spec = withApp $ do
 | 
			
		||||
    it "loads the index and checks it looks right" $ do
 | 
			
		||||
        get HomeR
 | 
			
		||||
        statusIs 200
 | 
			
		||||
        htmlAllContain "h1" "Welcome to Yesod"
 | 
			
		||||
 | 
			
		||||
        request $ do
 | 
			
		||||
            setMethod "POST"
 | 
			
		||||
            setUrl HomeR
 | 
			
		||||
            addToken
 | 
			
		||||
            fileByLabel "Choose a file" "test/Spec.hs" "text/plain" -- talk about self-reference
 | 
			
		||||
            byLabel "What's on the file?" "Some Content"
 | 
			
		||||
 | 
			
		||||
        statusIs 200
 | 
			
		||||
        -- more debugging printBody
 | 
			
		||||
        htmlCount ".message" 1
 | 
			
		||||
        htmlAllContain ".message" "Some Content"
 | 
			
		||||
        htmlAllContain ".message" "text/plain"
 | 
			
		||||
 | 
			
		||||
    -- This is a simple example of using a database access in a test.  The
 | 
			
		||||
    -- test will succeed for a fresh scaffolded site with an empty database,
 | 
			
		||||
    -- but will fail on an existing database with a non-empty user table.
 | 
			
		||||
    it "leaves the user table empty" $ do
 | 
			
		||||
        get HomeR
 | 
			
		||||
        statusIs 200
 | 
			
		||||
        users <- runDB $ selectList ([] :: [Filter User]) []
 | 
			
		||||
        assertEqual "user table empty" 0 $ length users
 | 
			
		||||
							
								
								
									
										1
									
								
								test/Spec.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										1
									
								
								test/Spec.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1 @@
 | 
			
		||||
{-# OPTIONS_GHC -F -pgmF hspec-discover #-}
 | 
			
		||||
							
								
								
									
										51
									
								
								test/TestImport.hs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										51
									
								
								test/TestImport.hs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,51 @@
 | 
			
		||||
module TestImport
 | 
			
		||||
    ( module TestImport
 | 
			
		||||
    , module X
 | 
			
		||||
    ) where
 | 
			
		||||
 | 
			
		||||
import Application           (makeFoundation)
 | 
			
		||||
import ClassyPrelude         as X
 | 
			
		||||
import Database.Persist      as X hiding (get)
 | 
			
		||||
import Database.Persist.Sql  (SqlPersistM, SqlBackend, runSqlPersistMPool, rawExecute, rawSql, unSingle, connEscapeName)
 | 
			
		||||
import Foundation            as X
 | 
			
		||||
import Model                 as X
 | 
			
		||||
import Test.Hspec            as X
 | 
			
		||||
import Yesod.Default.Config2 (ignoreEnv, loadAppSettings)
 | 
			
		||||
import Yesod.Test            as X
 | 
			
		||||
 | 
			
		||||
runDB :: SqlPersistM a -> YesodExample App a
 | 
			
		||||
runDB query = do
 | 
			
		||||
    app <- getTestYesod
 | 
			
		||||
    liftIO $ runDBWithApp app query
 | 
			
		||||
 | 
			
		||||
runDBWithApp :: App -> SqlPersistM a -> IO a
 | 
			
		||||
runDBWithApp app query = runSqlPersistMPool query (appConnPool app)
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
withApp :: SpecWith App -> Spec
 | 
			
		||||
withApp = before $ do
 | 
			
		||||
    settings <- loadAppSettings
 | 
			
		||||
        ["config/test-settings.yml", "config/settings.yml"]
 | 
			
		||||
        []
 | 
			
		||||
        ignoreEnv
 | 
			
		||||
    foundation <- makeFoundation settings
 | 
			
		||||
    wipeDB foundation
 | 
			
		||||
    return foundation
 | 
			
		||||
 | 
			
		||||
-- This function will truncate all of the tables in your database.
 | 
			
		||||
-- 'withApp' calls it before each test, creating a clean environment for each
 | 
			
		||||
-- spec to run in.
 | 
			
		||||
wipeDB :: App -> IO ()
 | 
			
		||||
wipeDB app = do
 | 
			
		||||
    runDBWithApp app $ do
 | 
			
		||||
        tables <- getTables
 | 
			
		||||
        sqlBackend <- ask
 | 
			
		||||
 | 
			
		||||
        let escapedTables = map (connEscapeName sqlBackend . DBName) tables
 | 
			
		||||
            query = "TRUNCATE TABLE " ++ (intercalate ", " escapedTables)
 | 
			
		||||
        rawExecute query []
 | 
			
		||||
 | 
			
		||||
getTables :: MonadIO m => ReaderT SqlBackend m [Text]
 | 
			
		||||
getTables = do
 | 
			
		||||
    tables <- rawSql "SELECT table_name FROM information_schema.tables WHERE table_schema = 'public';" []
 | 
			
		||||
    return $ map unSingle tables
 | 
			
		||||
		Reference in New Issue
	
	Block a user