From 09c3412acae2e2d85f3dff8bc45ae4f09991257d Mon Sep 17 00:00:00 2001 From: Joe Taylor Date: Tue, 30 Aug 2022 15:33:34 -0400 Subject: [PATCH] Better format for echosim file-by-file output to screen. --- lib/echosim.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/echosim.f90 b/lib/echosim.f90 index 0cf193de0..20d8354b4 100644 --- a/lib/echosim.f90 +++ b/lib/echosim.f90 @@ -92,8 +92,8 @@ program echosim open(10,file=fname,status='unknown',access='stream') write(10) h,iwave !Save to *.wav file close(10) - write(*,1110) ifile,xdt,f0,snrdb,fname -1110 format(i4,f7.2,f8.2,f7.1,2x,a17) + write(*,1110) ifile,f0,fdop,fspread,snrdb,fname +1110 format(i4,4f7.1,2x,a17) enddo 999 end program echosim