Transform files using stylish-haskell
This commit is contained in:
parent
5c60d90d82
commit
266acbe93d
2 changed files with 13 additions and 13 deletions
16
app/Main.hs
16
app/Main.hs
|
|
@ -2,14 +2,14 @@ module Main
|
|||
( main
|
||||
) where
|
||||
|
||||
import Cards
|
||||
import Control.Monad
|
||||
import Control.Monad.Trans.Class
|
||||
import Control.Monad.Trans.Maybe
|
||||
import Data.Char
|
||||
import Data.Time
|
||||
import System.Console.Haskeline
|
||||
import System.Console.Haskeline.History
|
||||
import Cards
|
||||
import Control.Monad
|
||||
import Control.Monad.Trans.Class
|
||||
import Control.Monad.Trans.Maybe
|
||||
import Data.Char
|
||||
import Data.Time
|
||||
import System.Console.Haskeline
|
||||
import System.Console.Haskeline.History
|
||||
|
||||
type Input = InputT IO
|
||||
|
||||
|
|
|
|||
|
|
@ -25,7 +25,7 @@ module Cards
|
|||
import Control.Applicative
|
||||
import Control.Monad
|
||||
import Data.List
|
||||
import qualified Data.Map.Strict as Map
|
||||
import qualified Data.Map.Strict as Map
|
||||
import Data.Time
|
||||
import Data.Void
|
||||
import Text.Megaparsec
|
||||
|
|
@ -46,16 +46,16 @@ data Element = ECard Card
|
|||
|
||||
-- | A single index card with one or more sides.
|
||||
data Card = Card
|
||||
{ sides :: [String]
|
||||
{ sides :: [String]
|
||||
-- ^ The sides of a 'Card'.
|
||||
--
|
||||
-- As opposed to real index cards, a 'Card' may have more or less than two
|
||||
-- sides.
|
||||
, tier :: Tier
|
||||
, tier :: Tier
|
||||
-- ^ The 'Tier' of a 'Card'.
|
||||
, lastChecked :: UTCTime
|
||||
-- ^ The time a 'Card' was last looked at.
|
||||
, offset :: NominalDiffTime
|
||||
, offset :: NominalDiffTime
|
||||
-- ^ A random offset, used when determining whether a 'Card' needs to be
|
||||
-- revised.
|
||||
--
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue