msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

pt -nub to remove duplicate trees from a list returned e.g. by a parser

Browse Source
This commit is contained in:
aarne
2013-03-13 13:43:30 +00:00
parent 31b4b13b65
commit 0dc182c216
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/compiler/GF/Command/TreeOperations.hs
View File

@@ -22,6 +22,8 @@ allTreeOps pgf = [
Left $ nub . concatMap (paraphrase pgf))), Left $ nub . concatMap (paraphrase pgf))),
("largest",("sort trees from largest to smallest, in number of nodes", ("largest",("sort trees from largest to smallest, in number of nodes",
Left $ largest)), Left $ largest)),
("nub",("remove duplicate trees",
Left $ nub)),
("smallest",("sort trees from smallest to largest, in number of nodes", ("smallest",("sort trees from smallest to largest, in number of nodes",
Left $ smallest)), Left $ smallest)),
("subtrees",("return all fully applied subtrees (stopping at abstractions), by default sorted from the largest", ("subtrees",("return all fully applied subtrees (stopping at abstractions), by default sorted from the largest",