Fixed disjunctions

fantasy-monoids.js

@@ -2,7 +2,7 @@
 
 const Additive       = require('./src/additive');
 const Conjunction    = require('./src/conjunction');
-const Disjunction    = require('./src/conjunction');
+const Disjunction    = require('./src/disjunction');
 const Dual           = require('./src/dual');
 const Endo           = require('./src/endo');
 const Multiplicative = require('./src/multiplicative');
@@ -13,9 +13,17 @@ const Max            = require('./src/max');
 const concat         = require('./src/concat');
 const mconcat        = require('./src/mconcat');
 
+// Alias
+const Sum = Additive;
+const All = Conjunction;
+const Any = Disjunction;
+
 module.exports = { Additive
+                 , Sum
                  , Conjunction
+                 , All
                  , Disjunction
+                 , Any
                  , Dual
                  , Endo
                  , Multiplicative

package.json

@@ -27,7 +27,7 @@
     "nodeunit": "0.9.x"
   },
   "scripts": {
-    "test": "node --harmony_destructuring node_modules/.bin/nodeunit test/*.js"
+    "test": "node node_modules/.bin/nodeunit test/*.js"
   },
   "files": [
     "fantasy-monoids.js",

test/disjunction.js

@@ -2,6 +2,7 @@
 
 const {adapters: {nodeunit: λ}} = require('fantasy-check');
 const {identity} = require('fantasy-combinators');
+const {of, concat, empty} = require('fantasy-land')
 
 const m = require('fantasy-land/laws/monoid');
 const s = require('fantasy-land/laws/semigroup');
@@ -28,3 +29,27 @@ exports.setoid = {
     'symmetry': λ.law(sʹ.symmetry)(Disjunction),
     'transitivity': λ.law(sʹ.transitivity)(Disjunction)
 };
+
+exports.basicUsage = test => {
+    const expected = { x: true };
+    const expected2 = { x: false };
+
+    test.deepEqual(
+		  Disjunction(false)
+          [concat](Disjunction(false))
+          [concat](Disjunction(false))
+          [concat](Disjunction(false))
+          [concat](Disjunction(true))
+        , expected
+    )
+
+    test.deepEqual(
+		  Disjunction(false)
+          [concat](Disjunction(false))
+          [concat](Disjunction(false))
+          [concat](Disjunction(false))
+        , expected2
+    )
+
+    test.done();
+};