{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}

-- | This module defines documents pertaining to the course, such as lesson materials and lesson plans.
module Study.Courses.English.Grammar.Introduction.Documents where

import Study.Framework.DocumentBuilders (buildDocumentFromMarkdownCode)
import Data.FileEmbed (embedStringFile)
import qualified Text.Pandoc as P

-- * Lesson contents
-- | Lecture for the lesson.
lecture1 :: P.Pandoc
Right Pandoc
lecture1 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/01.md")

-- | Lecture for the lesson.
lecture2 :: P.Pandoc
Right Pandoc
lecture2 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/02.md")

-- | Lecture for the lesson.
lecture3 :: P.Pandoc
Right Pandoc
lecture3 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/03.md")

-- | Lecture for the lesson.
lecture4 :: P.Pandoc
Right Pandoc
lecture4 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/04.md")

-- | Lecture for the lesson.
lecture5 :: P.Pandoc
Right Pandoc
lecture5 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/05.md")

-- | Lecture for the lesson.
lecture6 :: P.Pandoc
Right Pandoc
lecture6 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/06.md")

-- | Lecture for the lesson.
lecture7 :: P.Pandoc
Right Pandoc
lecture7 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/07.md")

-- | Lecture for the lesson.
lecture1to7 :: P.Pandoc
Right Pandoc
lecture1to7 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/checkpoint_01to07.md")

-- | Lecture for the lesson.
lecture9 :: P.Pandoc
Right Pandoc
lecture9 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/09.md")

-- | Lecture for the lesson.
lecture10 :: P.Pandoc
Right Pandoc
lecture10 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/10.md")

-- | Lecture for the lesson.
lecture11 :: P.Pandoc
Right Pandoc
lecture11 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/11.md")

-- | Lecture for the lesson.
lecture12 :: P.Pandoc
Right Pandoc
lecture12 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/12.md")

-- | Lecture for the lesson.
lecture9to12 :: P.Pandoc
Right Pandoc
lecture9to12 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/checkpoint_09to12.md")

-- | Lecture for the lesson.
lecture14 :: P.Pandoc
Right Pandoc
lecture14 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/14.md")

-- | Lecture for the lesson.
lecture15 :: P.Pandoc
Right Pandoc
lecture15 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/15.md")

-- | Lecture for the lesson.
lecture16 :: P.Pandoc
Right Pandoc
lecture16 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/16.md")

-- | Lecture for the lesson.
lecture17 :: P.Pandoc
Right Pandoc
lecture17 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/17.md")

-- | Lecture for the lesson.
lecture18 :: P.Pandoc
Right Pandoc
lecture18 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/18.md")

-- | Lecture for the lesson.
lecture14to18 :: P.Pandoc
Right Pandoc
lecture14to18 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/checkpoint_14to18.md")

-- | Lecture for the lesson.
lecture20 :: P.Pandoc
Right Pandoc
lecture20 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/20.md")

-- | Lecture for the lesson.
lecture21 :: P.Pandoc
Right Pandoc
lecture21 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/21.md")

-- | Lecture for the lesson.
lecture22 :: P.Pandoc
Right Pandoc
lecture22 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/22.md")

-- | Lecture for the lesson.
lecture23 :: P.Pandoc
Right Pandoc
lecture23 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/23.md")

-- | Lecture for the lesson.
lecture24 :: P.Pandoc
Right Pandoc
lecture24 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/24.md")

-- | Lecture for the lesson.
lecture20to24 :: P.Pandoc
Right Pandoc
lecture20to24 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/checkpoint_20to24.md")

-- | Lecture for the lesson.
lecture26 :: P.Pandoc
Right Pandoc
lecture26 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/26.md")

-- | Lecture for the lesson.
lecture27 :: P.Pandoc
Right Pandoc
lecture27 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/lectures/27.md")

-- * Lesson plans

-- | Plan for the lesson.
plan1 :: P.Pandoc
Right Pandoc
plan1 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/01.md")

-- | Plan for the lesson.
plan2 :: P.Pandoc
Right Pandoc
plan2 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/02.md")

-- | Plan for the lesson.
plan3 :: P.Pandoc
Right Pandoc
plan3 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/03.md")

-- | Plan for the lesson.
plan4 :: P.Pandoc
Right Pandoc
plan4 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/04.md")

-- | Plan for the lesson.
plan5 :: P.Pandoc
Right Pandoc
plan5 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/05.md")

-- | Plan for the lesson.
plan6 :: P.Pandoc
Right Pandoc
plan6 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/06.md")

-- | Plan for the lesson.
plan7 :: P.Pandoc
Right Pandoc
plan7 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/07.md")

-- | Plan for the lesson.
plan1to7 :: P.Pandoc
Right Pandoc
plan1to7 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode Text
""

-- | Plan for the lesson.
plan9 :: P.Pandoc
Right Pandoc
plan9 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/09.md")

-- | Plan for the lesson.
plan10 :: P.Pandoc
Right Pandoc
plan10 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/10.md")

-- | Plan for the lesson.
plan11 :: P.Pandoc
Right Pandoc
plan11 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/11.md")

-- | Plan for the lesson.
plan12 :: P.Pandoc
Right Pandoc
plan12 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/12.md")

-- | Plan for the lesson.
plan9to12 :: P.Pandoc
Right Pandoc
plan9to12 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode Text
""

-- | Plan for the lesson.
plan14 :: P.Pandoc
Right Pandoc
plan14 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/14.md")

-- | Plan for the lesson.
plan15 :: P.Pandoc
Right Pandoc
plan15 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/15.md")

-- | Plan for the lesson.
plan16 :: P.Pandoc
Right Pandoc
plan16 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/16.md")

-- | Plan for the lesson.
plan17 :: P.Pandoc
Right Pandoc
plan17 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/17.md")

-- | Plan for the lesson.
plan18 :: P.Pandoc
Right Pandoc
plan18 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/18.md")

-- | Plan for the lesson.
plan14to18 :: P.Pandoc
Right Pandoc
plan14to18 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode Text
""

-- | Plan for the lesson.
plan20 :: P.Pandoc
Right Pandoc
plan20 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/20.md")

-- | Plan for the lesson.
plan21 :: P.Pandoc
Right Pandoc
plan21 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/21.md")

-- | Plan for the lesson.
plan22 :: P.Pandoc
Right Pandoc
plan22 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/22.md")

-- | Plan for the lesson.
plan23 :: P.Pandoc
Right Pandoc
plan23 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/23.md")

-- | Plan for the lesson.
plan24 :: P.Pandoc
Right Pandoc
plan24 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/24.md")

-- | Plan for the lesson.
plan20to24 :: P.Pandoc
Right Pandoc
plan20to24 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode Text
""

-- | Plan for the lesson.
plan26 :: P.Pandoc
Right Pandoc
plan26 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/26.md")

-- | Plan for the lesson.
plan27 :: P.Pandoc
Right Pandoc
plan27 = Text -> Either PandocError Pandoc
buildDocumentFromMarkdownCode $(embedStringFile "resources/courses/english/grammar/introduction/planning/27.md")