--- trunk/phylmd/CV3_routines/cv3_compress.f	2014/09/04 10:05:52	104
+++ trunk/phylmd/CV3_routines/cv3_compress.f	2014/09/04 10:40:24	105
@@ -39,7 +39,7 @@
     real sig(nloc, nd), w0(nloc, nd)
 
     ! local variables:
-    integer i, k, nn, j
+    integer i, k, nn
 
 
     do  k=1, nl+1