diff options
| author | Frédéric Menou <frederic.menou@fretlink.com> | 2016-12-08 10:19:15 +0200 |
|---|---|---|
| committer | Ismaël Bouya <ismael.bouya@fretlink.com> | 2022-05-17 18:01:51 +0200 |
| commit | a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7 (patch) | |
| tree | adf3186fdccaeef19151026cdfbd38a530cf9ecb /scaffolder/src/Text/Edifact/Scaffolder/Simples/Types.hs | |
| download | edi-parser-a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7.tar.gz edi-parser-a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7.tar.zst edi-parser-a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7.zip | |
Diffstat (limited to 'scaffolder/src/Text/Edifact/Scaffolder/Simples/Types.hs')
| -rw-r--r-- | scaffolder/src/Text/Edifact/Scaffolder/Simples/Types.hs | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/scaffolder/src/Text/Edifact/Scaffolder/Simples/Types.hs b/scaffolder/src/Text/Edifact/Scaffolder/Simples/Types.hs new file mode 100644 index 0000000..08b6ca5 --- /dev/null +++ b/scaffolder/src/Text/Edifact/Scaffolder/Simples/Types.hs | |||
| @@ -0,0 +1,14 @@ | |||
| 1 | module Text.Edifact.Scaffolder.Simples.Types where | ||
| 2 | |||
| 3 | data Representation = Representation Content Cardinality | ||
| 4 | deriving Show | ||
| 5 | |||
| 6 | data Content = AlphaNumeric | ||
| 7 | | Alpha | ||
| 8 | | Numeric | ||
| 9 | deriving Show | ||
| 10 | |||
| 11 | data Cardinality = UpTo Int | ||
| 12 | | Exactly Int | ||
| 13 | | AnyNumber | ||
| 14 | deriving Show | ||