blob: 9096ad7550ebfe739ba5955a0ba8a1cb0b58eca4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
> module Codec.Pesto.Parse where
> data Instruction =
> Annotation String
> | Ingredient Quantity
> | Tool Quantity
> | Action String
> | Reference Quantity
> | Result Quantity
> | Alternative Quantity
> | Directive String
> | Unknown String
> data Quantity = Quantity Approximately Unit Object
> type Unit = String
> type Object = String
> data Approximately =
> Range Amount Amount
> | Approx Amount
> | Exact Amount
> data Amount =
> AmountRatio Rational
> | AmountStr String
|
