From 0b021e8630ab78ccad076cf8357e370f4a0fcab5 Mon Sep 17 00:00:00 2001 From: Mikolaj Konarski Date: Tue, 13 May 2025 16:49:22 +0200 Subject: Let stylish-haskell sort things --- src/Data/Array/Nested/Internal/Convert.hs | 2 +- src/Data/Array/Nested/Internal/Mixed.hs | 16 ++++++++-------- src/Data/Array/Nested/Internal/Ranked.hs | 8 ++++---- src/Data/Array/Nested/Internal/Shape.hs | 6 +++--- src/Data/Array/Nested/Internal/Shaped.hs | 14 +++++++------- 5 files changed, 23 insertions(+), 23 deletions(-) (limited to 'src/Data/Array/Nested') diff --git a/src/Data/Array/Nested/Internal/Convert.hs b/src/Data/Array/Nested/Internal/Convert.hs index 183d62c..c316161 100644 --- a/src/Data/Array/Nested/Internal/Convert.hs +++ b/src/Data/Array/Nested/Internal/Convert.hs @@ -2,8 +2,8 @@ {-# LANGUAGE GADTs #-} {-# LANGUAGE PolyKinds #-} {-# LANGUAGE ScopedTypeVariables #-} -{-# LANGUAGE TypeApplications #-} {-# LANGUAGE TypeAbstractions #-} +{-# LANGUAGE TypeApplications #-} {-# LANGUAGE TypeOperators #-} module Data.Array.Nested.Internal.Convert where diff --git a/src/Data/Array/Nested/Internal/Mixed.hs b/src/Data/Array/Nested/Internal/Mixed.hs index ca90889..1d4181e 100644 --- a/src/Data/Array/Nested/Internal/Mixed.hs +++ b/src/Data/Array/Nested/Internal/Mixed.hs @@ -20,7 +20,7 @@ module Data.Array.Nested.Internal.Mixed where import Prelude hiding (mconcat) -import Control.DeepSeq (NFData(..)) +import Control.DeepSeq (NFData (..)) import Control.Monad (forM_, when) import Control.Monad.ST import Data.Array.RankedS qualified as S @@ -28,8 +28,8 @@ import Data.Bifunctor (bimap) import Data.Coerce import Data.Foldable (toList) import Data.Int -import Data.Kind (Type, Constraint) -import Data.List.NonEmpty (NonEmpty(..)) +import Data.Kind (Constraint, Type) +import Data.List.NonEmpty (NonEmpty (..)) import Data.List.NonEmpty qualified as NE import Data.Proxy import Data.Type.Equality @@ -37,18 +37,18 @@ import Data.Vector.Storable qualified as VS import Data.Vector.Storable.Mutable qualified as VSM import Foreign.C.Types (CInt) import Foreign.Storable (Storable) -import GHC.Float qualified (log1p, expm1, log1pexp, log1mexp) +import GHC.Float qualified (expm1, log1mexp, log1p, log1pexp) import GHC.Generics (Generic) import GHC.TypeLits import Unsafe.Coerce (unsafeCoerce) -import Data.Array.Mixed.XArray (XArray(..)) -import Data.Array.Mixed.XArray qualified as X import Data.Array.Mixed.Internal.Arith +import Data.Array.Mixed.Lemmas +import Data.Array.Mixed.Permutation import Data.Array.Mixed.Shape import Data.Array.Mixed.Types -import Data.Array.Mixed.Permutation -import Data.Array.Mixed.Lemmas +import Data.Array.Mixed.XArray (XArray (..)) +import Data.Array.Mixed.XArray qualified as X import Data.Bag diff --git a/src/Data/Array/Nested/Internal/Ranked.hs b/src/Data/Array/Nested/Internal/Ranked.hs index 2aba1bc..045b2ef 100644 --- a/src/Data/Array/Nested/Internal/Ranked.hs +++ b/src/Data/Array/Nested/Internal/Ranked.hs @@ -22,7 +22,7 @@ module Data.Array.Nested.Internal.Ranked where import Prelude hiding (mappend, mconcat) -import Control.DeepSeq (NFData(..)) +import Control.DeepSeq (NFData (..)) import Control.Monad.ST import Data.Array.RankedS qualified as S import Data.Bifunctor (first) @@ -34,17 +34,17 @@ import Data.Proxy import Data.Type.Equality import Data.Vector.Storable qualified as VS import Foreign.Storable (Storable) -import GHC.Float qualified (log1p, expm1, log1pexp, log1mexp) +import GHC.Float qualified (expm1, log1mexp, log1p, log1pexp) import GHC.Generics (Generic) import GHC.TypeLits import GHC.TypeNats qualified as TN -import Data.Array.Mixed.XArray (XArray(..)) -import Data.Array.Mixed.XArray qualified as X import Data.Array.Mixed.Lemmas import Data.Array.Mixed.Permutation import Data.Array.Mixed.Shape import Data.Array.Mixed.Types +import Data.Array.Mixed.XArray (XArray (..)) +import Data.Array.Mixed.XArray qualified as X import Data.Array.Nested.Internal.Mixed import Data.Array.Nested.Internal.Shape import Data.Array.Strided.Arith diff --git a/src/Data/Array/Nested/Internal/Shape.hs b/src/Data/Array/Nested/Internal/Shape.hs index 490c9a8..e65164b 100644 --- a/src/Data/Array/Nested/Internal/Shape.hs +++ b/src/Data/Array/Nested/Internal/Shape.hs @@ -27,14 +27,14 @@ module Data.Array.Nested.Internal.Shape where import Control.DeepSeq (NFData (..)) -import Data.Array.Shape qualified as O import Data.Array.Mixed.Types +import Data.Array.Shape qualified as O import Data.Coerce (coerce) import Data.Foldable qualified as Foldable import Data.Functor.Const import Data.Functor.Product qualified as Fun -import Data.Kind (Type, Constraint) -import Data.Monoid (Sum(..)) +import Data.Kind (Constraint, Type) +import Data.Monoid (Sum (..)) import Data.Proxy import Data.Type.Equality import GHC.Exts (withDict) diff --git a/src/Data/Array/Nested/Internal/Shaped.hs b/src/Data/Array/Nested/Internal/Shaped.hs index a8f330f..cd69daa 100644 --- a/src/Data/Array/Nested/Internal/Shaped.hs +++ b/src/Data/Array/Nested/Internal/Shaped.hs @@ -21,12 +21,12 @@ module Data.Array.Nested.Internal.Shaped where import Prelude hiding (mappend, mconcat) -import Control.DeepSeq (NFData(..)) +import Control.DeepSeq (NFData (..)) import Control.Monad.ST -import Data.Array.Internal.ShapedS qualified as SS -import Data.Array.Internal.ShapedG qualified as SG -import Data.Array.Internal.RankedS qualified as RS import Data.Array.Internal.RankedG qualified as RG +import Data.Array.Internal.RankedS qualified as RS +import Data.Array.Internal.ShapedG qualified as SG +import Data.Array.Internal.ShapedS qualified as SS import Data.Bifunctor (first) import Data.Coerce (coerce) import Data.Kind (Type) @@ -35,16 +35,16 @@ import Data.Proxy import Data.Type.Equality import Data.Vector.Storable qualified as VS import Foreign.Storable (Storable) -import GHC.Float qualified (log1p, expm1, log1pexp, log1mexp) +import GHC.Float qualified (expm1, log1mexp, log1p, log1pexp) import GHC.Generics (Generic) import GHC.TypeLits -import Data.Array.Mixed.XArray (XArray) -import Data.Array.Mixed.XArray qualified as X import Data.Array.Mixed.Lemmas import Data.Array.Mixed.Permutation import Data.Array.Mixed.Shape import Data.Array.Mixed.Types +import Data.Array.Mixed.XArray (XArray) +import Data.Array.Mixed.XArray qualified as X import Data.Array.Nested.Internal.Lemmas import Data.Array.Nested.Internal.Mixed import Data.Array.Nested.Internal.Shape -- cgit v1.2.3-70-g09d2