Revert to previous commit

[mothur.git] / completelinkage.cpp

diff --git a/completelinkage.cpp b/completelinkage.cpp
new file mode 100644 (file)
index 0000000..86e9054
--- /dev/null
+++ b/completelinkage.cpp
@@ -0,0 +1,34 @@
+
+#include "cluster.hpp"
+
+/***********************************************************************/
+
+CompleteLinkage::CompleteLinkage(RAbundVector* rav, ListVector* lv, SparseMatrix* dm, float c, string s) :
+       Cluster(rav, lv, dm, c, s)
+{}
+
+/***********************************************************************/
+//This function returns the tag of the method.
+string CompleteLinkage::getTag() {
+       return("fn");
+}
+
+
+/***********************************************************************/
+//This function updates the distance based on the furthest neighbor method.
+bool CompleteLinkage::updateDistance(MatData& colCell, MatData& rowCell) {
+       try {
+               bool changed = false;
+               if (colCell->dist < rowCell->dist) {
+                       colCell->dist = rowCell->dist;
+                       changed = true;
+               }       
+               return(changed);
+       }
+       catch(exception& e) {
+               m->errorOut(e, "CompleteLinkage", "updateDistance");
+               exit(1);
+       }
+}
+
+/***********************************************************************/