Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
haskell-gargantext
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Christian Merten
haskell-gargantext
Commits
73447a4d
Commit
73447a4d
authored
Jan 26, 2018
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[SPEC] Typed tree with classification/favorites added.
parent
8fb8da94
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
5 additions
and
3 deletions
+5
-3
Main.hs
src/Data/Gargantext/Types/Main.hs
+5
-3
No files found.
src/Data/Gargantext/Types/Main.hs
View file @
73447a4d
...
...
@@ -56,16 +56,18 @@ corpusTree :: Tree NodeType NodeType
corpusTree
=
NodeT
Corpus
(
[
LeafT
Document
]
<>
[
LeafT
Lists
]
<>
[
LeafT
Metrics
]
<>
[
LeafT
Favorites
]
<>
[
LeafT
Classification
]
)
-- | TODO add Symbolic Node / Document
-- TODO make instances of Nodes
data
NodeType
=
NodeUser
|
Project
|
Corpus
|
Document
|
DocumentCopy
|
Favorites
|
Classification
|
Lists
|
Metrics
deriving
(
Show
,
Eq
)
deriving
(
Show
,
Read
,
Eq
)
data
Classification
=
Favorites
|
MyClassifcation
data
Lists
=
StopList
|
MainList
|
MapList
|
GroupList
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment