Commit a9b2cfb

committed

Template: Enable TypeApplications by default

1 parent 2dba539 commit a9b2cfbCopy full SHA for a9b2cfb

File tree

-2

lines changed

-2

lines changed

Lines changed: 2 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -19,7 +19,7 @@ end`
`19`	`19`	`fh = assert(io.open(filename, "w"))`
`20`	`20`	`fh:write([[`
`21`	`21`	`-- https://github.com/minoki/my-atcoder-solutions`
`22`		`-{-# LANGUAGE ScopedTypeVariables #-}`
	`22`	`+{-# LANGUAGE TypeApplications #-}`
`23`	`23`	`{-# LANGUAGE BangPatterns #-}`
`24`	`24`	`import Data.Char (isSpace)`
`25`	`25`	`import Data.Int (Int64)`
`@@ -30,7 +30,7 @@ import qualified Data.Vector.Unboxed.Mutable as UM`
`30`	`30`	`import qualified Data.ByteString.Char8 as BS`
`31`	`31`
`32`	`32`	`main = do`
`33`		`- _ :: [Int] <- map (read . BS.unpack) . BS.words <$> BS.getLine`
	`33`	`+ _ <- map (read @Int . BS.unpack) . BS.words <$> BS.getLine`
`34`	`34`	`[n,m] <- unfoldr (BS.readInt . BS.dropWhile isSpace) <$> BS.getLine`
`35`	`35`	`edges <- U.replicateM m $ do`
`36`	`36`	`[x,y,z] <- unfoldr (BS.readInt . BS.dropWhile isSpace) <$> BS.getLine`

Comments

(0)