--- DarthVader/TrackerLevel2/src/F77/readallparam.f	2007/10/09 15:54:38	1.8
+++ DarthVader/TrackerLevel2/src/F77/readallparam.f	2009/08/04 14:01:39	1.10
@@ -9,6 +9,7 @@
 
       c2f_error = 0 
 
+
 c      if(C2F_DEBUG.EQ.1.eq.1)print *                   
       if(verbose.eq.1)print *                   
      $     ,c2f_path(1:c2f_pathlen)//'trk-maskvk.dat' 
@@ -36,9 +37,10 @@
             c2f_error = 1
             goto 1000
          endif
+         if(verbose.eq.1)print*,'view ',iv,': ',(mask_vk(iv,i),i=1,24)
       enddo
  1000 close(10)
- 1001 continue     
+c 1001 continue     
       return 
       end