more corrections for ape 3.0-7

[ape.git] / src / SPR.c

diff --git a/src/SPR.c b/src/SPR.c
index e5e204f788db38b117c672cd1625221348c4d9f1..881cd8f89a24f9d6b8e0fcc2fbf46488a731051b 100644 (file)
--- a/src/SPR.c
+++ b/src/SPR.c
@@ -1,8 +1,10 @@
-/* #include <stdio.h> */
-/* #include <stdlib.h> */
-/* #include <math.h> */
-/* #include "graph.h" */
-/* #include "fastme.h" */
+/* SPR.c    2009-01-12 */
+
+/* Copyright 2009 Richard Desper */
+
+/* This file is part of the R-package `ape'. */
+/* See the file ../COPYING for licensing issues. */
+
 #include "me.h"
 
 /*functions from bNNI.c*/
@@ -249,7 +251,7 @@ void assignUpWeights(edge *etest, node *vtest, node *va, edge *back, node *cprev
   /*sib is tree C being passed by B*/
   /*D is tree below etest*/
   double D_AB, D_CD, D_AC, D_BD;
-  /* double thisWeight; */
+  double thisWeight;
   sib = siblingEdge(etest);
   left = etest->head->leftEdge;
   right = etest->head->rightEdge;