Silence some warnings.

JacquesCarette · Nov 18, 2018 · b3c0bc9 · b3c0bc9 · JacquesCarette · Nov 18, 2018
1 parent 7938835
commit b3c0bc9
Show file tree

Hide file tree

Showing 12 changed files with 6 additions and 17 deletions.
diff --git a/code/drasil-data/Data/Drasil/Concepts/Computation.hs b/code/drasil-data/Data/Drasil/Concepts/Computation.hs
@@ -1,6 +1,5 @@
 module Data.Drasil.Concepts.Computation where
 
-import Control.Lens ((^.))
 import Language.Drasil
 import Data.Drasil.Concepts.Documentation (datum, input_, literacy, output_, 
     quantity, type_, value, variable)

diff --git a/code/drasil-example/Drasil/GamePhysics/IMods.hs b/code/drasil-example/Drasil/GamePhysics/IMods.hs
@@ -2,7 +2,7 @@ module Drasil.GamePhysics.IMods (iModels, iModels_new, im1_new, im2_new, im3_new
 
 import Language.Drasil
 import Language.Drasil.Development (MayHaveUnit)
-import Drasil.GamePhysics.Assumptions (newA1, newA2, newA3, newA4, newA5, newA6,
+import Drasil.GamePhysics.Assumptions (newA1, newA2, newA4, newA5, newA6,
   newA7)
 import Drasil.GamePhysics.Unitals(acc_i, force_i, transMotLegTerms, rotMotLegTerms,
   col2DLegTerms, mass_A, mass_i, normalVect, time_c, torque_i, vel_A, vel_i)

diff --git a/code/drasil-example/Drasil/GlassBR/Body.hs b/code/drasil-example/Drasil/GlassBR/Body.hs
@@ -1,7 +1,6 @@
 module Drasil.GlassBR.Body where
 
 import Control.Lens ((^.))
-import Data.List (nub)
 
 import Language.Drasil hiding (organization)
 import Language.Drasil.Code (CodeSpec, codeSpec, relToQD)

diff --git a/code/drasil-example/Drasil/GlassBR/IMods.hs b/code/drasil-example/Drasil/GlassBR/IMods.hs
@@ -5,9 +5,8 @@ import Prelude hiding (exp)
 import Control.Lens ((^.))
 import Language.Drasil
 
-import Drasil.GlassBR.Assumptions (glassType, glassCondition, standardValues, glassLite,
+import Drasil.GlassBR.Assumptions (standardValues, glassLite,
   boundaryConditions, responseType)
-import Drasil.GlassBR.Concepts (glassTypeFac, lResistance, lShareFac)
 import Drasil.GlassBR.DataDefs (glaTyFac, nonFL, risk, standOffDis)
 import Drasil.GlassBR.Labels (probOfBreakL, calOfCapacityL, calOfDemandL)
 import Drasil.GlassBR.References (astm2009, beasonEtAl1998)

diff --git a/code/drasil-lang/Language/Drasil/Chunk/AssumpChunk.hs b/code/drasil-lang/Language/Drasil/Chunk/AssumpChunk.hs
@@ -1,11 +1,10 @@
 {-# Language TemplateHaskell #-}
 module Language.Drasil.Chunk.AssumpChunk ( AssumpChunk(..) , assump) where
-import Control.Lens ((^.))
 
 import Data.Drasil.IdeaDicts (softEng)
 import Language.Drasil.Classes.Core (HasUID(uid), HasShortName(shortname))
 import Language.Drasil.Classes (HasLabel(getLabel), ConceptDomain(cdom), CommonIdea(abrv)
-	, NamedIdea(term))
+  , NamedIdea(term))
 import Language.Drasil.Label.Core (Label)
 import Language.Drasil.Sentence (Sentence)
 import Language.Drasil.UID (UID)

diff --git a/code/drasil-lang/Language/Drasil/Chunk/Citation.hs b/code/drasil-lang/Language/Drasil/Chunk/Citation.hs
@@ -18,7 +18,7 @@ import Language.Drasil.UID (UID)
 
 import Language.Drasil.Classes.Core (HasUID(uid), HasShortName(shortname))
 import Language.Drasil.Classes (HasLabel(getLabel), HasFields(getFields),
-  ConceptDomain(cdom), CommonIdea(abrv), NamedIdea(term))
+  CommonIdea(abrv), NamedIdea(term))
 import Language.Drasil.Chunk.CommonIdea (CI, commonIdeaWithDict)
 import Language.Drasil.Data.Citation (author, chapter, pages, editor, bookTitle, title, 
   year, school, journal, institution, note, publisher, CitationKind(..), CiteField)

diff --git a/code/drasil-lang/Language/Drasil/Chunk/DataDefinition.hs b/code/drasil-lang/Language/Drasil/Chunk/DataDefinition.hs
@@ -17,7 +17,6 @@ import Language.Drasil.RefTypes(RefType(..), DType(..), Reference)
 import Language.Drasil.Sentence (Sentence(EmptyS))
 import Language.Drasil.Symbol.Helpers (eqSymb)
 import Language.Drasil.Chunk.CommonIdea (CI, commonIdeaWithDict)
-import Language.Drasil.Chunk.NamedIdea (IdeaDict, mkIdea)
 import Language.Drasil.NounPhrase (cn')
 
 data Scope = Scp { _spec :: Label {-indirect reference-}}

diff --git a/code/drasil-lang/Language/Drasil/Chunk/GenDefn.hs b/code/drasil-lang/Language/Drasil/Chunk/GenDefn.hs
@@ -15,7 +15,6 @@ import Language.Drasil.Label (mkLabelSame)
 import Language.Drasil.RefTypes(RefType(..), DType(..), Reference)
 import Control.Lens (makeLenses, view)
 import Language.Drasil.Chunk.CommonIdea (CI, commonIdeaWithDict)
-import Language.Drasil.Chunk.NamedIdea (IdeaDict, mkIdea)
 import Language.Drasil.NounPhrase (cn')
 
 -- | A GenDefn is a RelationConcept that may have units

diff --git a/code/drasil-lang/Language/Drasil/Chunk/InstanceModel.hs b/code/drasil-lang/Language/Drasil/Chunk/InstanceModel.hs
@@ -21,7 +21,6 @@ import Language.Drasil.Label (mkLabelSame)
 import Language.Drasil.RefTypes (RefType(..), DType(..), Reference)
 import Language.Drasil.Sentence (Sentence)
 import Language.Drasil.Chunk.CommonIdea (CI, commonIdeaWithDict)
-import Language.Drasil.Chunk.NamedIdea (IdeaDict, mkIdea)
 import Language.Drasil.NounPhrase (cn')
 
 import Control.Lens (makeLenses, view)

diff --git a/code/drasil-lang/Language/Drasil/Document.hs b/code/drasil-lang/Language/Drasil/Document.hs
@@ -4,13 +4,11 @@ module Language.Drasil.Document where
 
 import Data.Drasil.IdeaDicts (documentc)
 import Language.Drasil.Document.Core
-import Language.Drasil.Classes (HasLabel(getLabel), HasShortName(shortname),
-	ConceptDomain(cdom))
+import Language.Drasil.Classes (HasLabel(getLabel), HasShortName(shortname))
 
 import Language.Drasil.Label (Label)
 import Language.Drasil.Sentence (Sentence(..))
 import Language.Drasil.Chunk.CommonIdea (CI, commonIdeaWithDict)
-import Language.Drasil.Chunk.NamedIdea (IdeaDict, mkIdea)
 import Language.Drasil.NounPhrase (cn')
 
 import Control.Lens (makeLenses)

diff --git a/code/drasil-printers/Language/Drasil/HTML/CSS.hs b/code/drasil-printers/Language/Drasil/HTML/CSS.hs
@@ -1,7 +1,6 @@
 module Language.Drasil.HTML.CSS where
 
-import Text.PrettyPrint (Doc, text, render, empty, ($$), (<>), vcat, hcat)
-import Data.List (intersperse)
+import Text.PrettyPrint (Doc, text, vcat)
 
 import Language.Drasil hiding (Expr)
 

diff --git a/code/drasil-printers/Language/Drasil/HTML/Helpers.hs b/code/drasil-printers/Language/Drasil/HTML/Helpers.hs
@@ -2,7 +2,6 @@ module Language.Drasil.HTML.Helpers where
 
 import Text.PrettyPrint (Doc, text, render, empty, ($$), (<>), vcat, hcat)
 import Data.List (intersperse, foldl1)
-import Data.String (unwords)
 
 import Language.Drasil hiding (Expr)