{-# LANGUAGE PostfixOperators #-}
-- | Introduce the Drasil website.
module Drasil.Website.Introduction where

import Language.Drasil


-- * Introduction Section

-- | Creates the about section.
introSec :: Section
introSec :: Section
introSec = 
  Sentence -> [Contents] -> [Section] -> Reference -> Section
section (String -> Sentence
S String
"Introduction") -- Title
  [Sentence -> Contents
mkParagraph Sentence
introParagraph1] -- Contents
  [] (Reference -> Section) -> Reference -> Section
forall a b. (a -> b) -> a -> b
$ String -> Sentence -> Reference
makeSecRef String
"Introduction" (Sentence -> Reference) -> Sentence -> Reference
forall a b. (a -> b) -> a -> b
$ String -> Sentence
S String
"Introduction" -- Section reference

-- | Paragraph to introduce Drasil and its goals.
introParagraph1 :: Sentence
introParagraph1 :: Sentence
introParagraph1 = String -> Sentence
S String
"Drasil is a framework for generating all of the software artifacts from a stable knowledge base, \
  \focusing currently on scientific software. We welcome students and collaborators to assist us as we research optimal ways \
  \to extend Drasil's functionality."