removed duplicate print in projxyzt

2013-04-11 14:00:26 +00:00 · 2013-04-11 14:00:26 +00:00 · 9f445e5cd1
commit 9f445e5cd1
parent 912e9e1ec3
1 changed files with 7 additions and 7 deletions
--- a/src/gray.f
+++ b/src/gray.f
@ -5718,8 +5718,8 @@ c
 c
        end do
 c
-        if(.not.(iproj.eq.0.and.j.eq.1))
-     .    write(nfile,111) istep,j,k,xti,yti,zti,rti,psinv11
+c        if(.not.(iproj.eq.0.and.j.eq.1))
+c     .    write(nfile,111) istep,j,k,xti,yti,zti,rti,psinv11
        if(iproj.eq.1) write(nfile,*) ' '
      end do
 c