--- trunk/phylmd/CV3_routines/cv3_yield.f	2014/04/25 14:58:31	97
+++ trunk/phylmd/CV3_routines/cv3_yield.f	2014/09/04 10:40:24	105
@@ -52,7 +52,7 @@
     ! local variables:
     integer i,k,il,n,j,num1
     real rat, awat, delti
-    real ax, bx, cx, dx, ex
+    real ax, bx, cx, dx
     real cpinv, rdcp, dpinv
     real lvcp(nloc,na), mke(nloc,na)
     real am(nloc), work(nloc), ad(nloc), amp1(nloc)