質問編集履歴
1
ソースコードにimportとデータ型の定義を追加しました
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -5,6 +5,18 @@
|
|
|
5
5
|
case文を使用したコード(parse error)
|
|
6
6
|
|
|
7
7
|
```haskell
|
|
8
|
+
|
|
9
|
+
import Control.Monad
|
|
10
|
+
|
|
11
|
+
import Control.Applicative
|
|
12
|
+
|
|
13
|
+
import Data.List
|
|
14
|
+
|
|
15
|
+
|
|
16
|
+
|
|
17
|
+
data Operation a = PushBack a | RandomAccess a | PopBack
|
|
18
|
+
|
|
19
|
+
|
|
8
20
|
|
|
9
21
|
-- reads an Operation, input i is dummy.
|
|
10
22
|
|
|
@@ -40,6 +52,18 @@
|
|
|
40
52
|
|
|
41
53
|
```haskell
|
|
42
54
|
|
|
55
|
+
import Control.Monad
|
|
56
|
+
|
|
57
|
+
import Control.Applicative
|
|
58
|
+
|
|
59
|
+
import Data.List
|
|
60
|
+
|
|
61
|
+
|
|
62
|
+
|
|
63
|
+
data Operation a = PushBack a | RandomAccess a | PopBack
|
|
64
|
+
|
|
65
|
+
|
|
66
|
+
|
|
43
67
|
-- reads an Operation, input i is dummy.
|
|
44
68
|
|
|
45
69
|
readOperation :: Int -> IO (Operation Int)
|