Add some homology unit tests

contrib/topology/test/homology.factor

@@ -0,0 +1,9 @@
+IN: temporary
+USING: homology test ;
+
+[ { 1 } ] [ {*} H ] unit-test
+[ { 2 } ] [ S^0 H ] unit-test
+[ { 1 1 } ] [ 1 S^ H ] unit-test
+[ { 1 0 } ] [ 1 D^ H ] unit-test
+[ { 1 0 1 } ] [ 2 S^ H ] unit-test
+[ { 1 0 0 } ] [ 2 D^ H ] unit-test