Comment out a debug write statement.

This commit is contained in:
Steven Franke 2020-04-03 10:39:51 -05:00
parent f78f63a53d
commit 583f9d2f0e
1 changed files with 1 additions and 1 deletions

View File

@ -176,7 +176,7 @@ program wsprcpmd
imode=1 ! refine istart
istart=is0
call coherent_preamble_fsync(c2,h,ipreamble,nsync,NSPS,istart,fcest,imode,xp1)
write(*,'(i5,i5,i5,6(f11.5,2x))') ifile,is0,istart,fc0,fc1,fcest,xf1,xp0,xp1
! write(*,'(i5,i5,i5,6(f11.5,2x))') ifile,is0,istart,fc0,fc1,fcest,xf1,xp0,xp1
!genie sync
!istart=375