Submission #33479

Source Code Expand

import Data.List
main=interact$(`shows`"\n").f.tail.lines
f xs=sum[n|(n,'o')<-zip[0..]$foldr1(#)xs]`div`2+1
[a]#bs=bs
as#bs|"|-|"`isPrefixOf`as=xs++drop 2 as#ys
    where (ss, ts) = splitAt 3 bs
          rs = reverse ss++ts
          (xs, ys) = splitAt 2 rs
as#bs=take 2 bs++drop 2 as#drop 2 bs

Submission Info

Submission Time
Task B - あみだくじ
User notogawa
Language Haskell (GHC 7.4.1)
Score 100
Code Size 303 Byte
Status AC
Exec Time 39 ms
Memory 1556 KB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 34
Set Name Test Cases
All 00_min.txt, 00_sample_01.txt, 00_sample_02.txt, 00_sample_03.txt, 00_sample_04.txt, 00_sample_05.txt, 01_rnd_00.txt, 01_rnd_01.txt, 01_rnd_02.txt, 01_rnd_03.txt, 01_rnd_04.txt, 01_rnd_05.txt, 01_rnd_06.txt, 01_rnd_07.txt, 01_rnd_08.txt, 01_rnd_09.txt, 01_rnd_10.txt, 01_rnd_11.txt, 01_rnd_12.txt, 01_rnd_13.txt, 01_rnd_14.txt, 01_rnd_15.txt, 01_rnd_16.txt, 01_rnd_17.txt, 01_rnd_18.txt, 01_rnd_19.txt, 02_maxrnd_00.txt, 02_maxrnd_01.txt, 02_maxrnd_02.txt, 02_maxrnd_03.txt, 02_maxrnd_04.txt, 03_empty_00.txt, 03_empty_01.txt, 03_empty_02.txt
Case Name Status Exec Time Memory
00_min.txt AC 39 ms 1212 KB
00_sample_01.txt AC 25 ms 1268 KB
00_sample_02.txt AC 25 ms 1424 KB
00_sample_03.txt AC 26 ms 1296 KB
00_sample_04.txt AC 25 ms 1212 KB
00_sample_05.txt AC 25 ms 1276 KB
01_rnd_00.txt AC 25 ms 1368 KB
01_rnd_01.txt AC 32 ms 1336 KB
01_rnd_02.txt AC 25 ms 1212 KB
01_rnd_03.txt AC 26 ms 1496 KB
01_rnd_04.txt AC 25 ms 1460 KB
01_rnd_05.txt AC 27 ms 1424 KB
01_rnd_06.txt AC 25 ms 1416 KB
01_rnd_07.txt AC 25 ms 1496 KB
01_rnd_08.txt AC 24 ms 1208 KB
01_rnd_09.txt AC 26 ms 1340 KB
01_rnd_10.txt AC 28 ms 1404 KB
01_rnd_11.txt AC 26 ms 1336 KB
01_rnd_12.txt AC 25 ms 1320 KB
01_rnd_13.txt AC 25 ms 1344 KB
01_rnd_14.txt AC 27 ms 1432 KB
01_rnd_15.txt AC 25 ms 1232 KB
01_rnd_16.txt AC 25 ms 1272 KB
01_rnd_17.txt AC 26 ms 1468 KB
01_rnd_18.txt AC 25 ms 1332 KB
01_rnd_19.txt AC 26 ms 1268 KB
02_maxrnd_00.txt AC 26 ms 1460 KB
02_maxrnd_01.txt AC 26 ms 1552 KB
02_maxrnd_02.txt AC 25 ms 1548 KB
02_maxrnd_03.txt AC 25 ms 1460 KB
02_maxrnd_04.txt AC 26 ms 1556 KB
03_empty_00.txt AC 25 ms 1428 KB
03_empty_01.txt AC 25 ms 1340 KB
03_empty_02.txt AC 25 ms 1424 KB