stylish

Author: fraser-iohk

ouroboros-consensus-cardano/src/byron/Ouroboros/Consensus/Byron/Ledger/Mempool.hs

@@ -17,11 +17,11 @@ module Ouroboros.Consensus.Byron.Ledger.Mempool (
     -- * Mempool integration
     GenTx (..)
   , TxId (..)
-  , pattern ByronTxId
+  , Validated (..)
   , pattern ByronDlgId
+  , pattern ByronTxId
   , pattern ByronUpdateProposalId
   , pattern ByronUpdateVoteId
-  , Validated (..)
     -- * Transaction IDs
   , byronIdDlg
   , byronIdProp
@@ -41,7 +41,6 @@ module Ouroboros.Consensus.Byron.Ledger.Mempool (
   , countByronGenTxs
   ) where
 
-import Data.Coerce
 import qualified Cardano.Chain.Block as CC
 import qualified Cardano.Chain.Byron.API as CC
 import qualified Cardano.Chain.Delegation as Delegation
@@ -65,6 +64,7 @@ import           Control.Monad.Except (Except, throwError)
 import           Data.ByteString (ByteString)
 import qualified Data.ByteString as Strict
 import qualified Data.ByteString.Lazy as Lazy
+import           Data.Coerce
 import           Data.Maybe (maybeToList)
 import           Data.Word
 import           GHC.Generics (Generic)

ouroboros-consensus-cardano/src/unstable-byron-testlib/Ouroboros/Consensus/ByronDual/Ledger.hs

@@ -24,13 +24,13 @@ module Ouroboros.Consensus.ByronDual.Ledger (
   , forgeDualByronBlock
   ) where
 
-import           Data.Coerce
 import qualified Byron.Spec.Ledger.Core as Spec
 import qualified Byron.Spec.Ledger.UTxO as Spec
 import qualified Cardano.Chain.UTxO as Impl
 import           Cardano.Crypto.DSIGN.Class
 import           Codec.Serialise
 import           Data.ByteString (ByteString)
+import           Data.Coerce
 import           Data.Map.Strict (Map)
 import qualified Data.Map.Strict as Map
 import qualified Data.Set as Set

ouroboros-consensus-cardano/src/unstable-byron-testlib/Test/Consensus/Byron/Examples.hs

@@ -23,14 +23,14 @@ module Test.Consensus.Byron.Examples (
   , examples
   ) where
 
-import           Data.Coerce
 import qualified Cardano.Chain.Block as CC.Block
 import qualified Cardano.Chain.Byron.API as CC
 import qualified Cardano.Chain.Common as CC
-import qualified Cardano.Crypto.Hashing as Crypto
 import qualified Cardano.Chain.Update.Validation.Interface as CC.UPI
 import qualified Cardano.Chain.UTxO as CC
+import qualified Cardano.Crypto.Hashing as Crypto
 import           Control.Monad.Except (runExcept)
+import           Data.Coerce
 import qualified Data.Map.Strict as Map
 import           Ouroboros.Consensus.Block
 import           Ouroboros.Consensus.Byron.Crypto.DSIGN (SignKeyDSIGN (..))