module Drasil.Projectile.Lesson.Figures (figCSandA) where import Language.Drasil import Language.Drasil.Chunk.Concept.NamedCombinators (the) import Data.Drasil.Concepts.Documentation (coordinateSystem) resourcePath :: String resourcePath :: String resourcePath = String "../../../datafiles/Projectile/" figCSandA :: LabelledContent figCSandA :: LabelledContent figCSandA = Reference -> RawContent -> LabelledContent llcc (String -> Reference makeFigRef String "CoordSystAndAssumpts") forall a b. (a -> b) -> a -> b $ Lbl -> String -> RawContent fig (forall n. NounPhrase n => n -> Lbl atStartNP forall a b. (a -> b) -> a -> b $ forall t. NamedIdea t => t -> NP the IdeaDict coordinateSystem) (String resourcePath forall a. [a] -> [a] -> [a] ++ String "CoordSystAndAssumpts.png")