--- trunk/phylmd/CV3_routines/cv3_feed.f	2014/03/05 14:57:53	82
+++ trunk/phylmd/CV3_routines/cv3_feed.f	2014/04/25 14:58:31	97
@@ -20,7 +20,7 @@
 
 
 ! inputs:
-        integer len, nd
+        integer, intent(in):: len, nd
       real, intent(in):: t(len,nd)
       real q(len,nd), qs(len,nd), p(len,nd)
       real hm(len,nd), gz(len,nd)