Change the definition of Doppler Spread (option "-d x" used in jt65sim

so that specified spreads correspond to the full limb-to-limb spread 
for EME.  Line widths at -3 dB will be 1/3 of the specified value.


git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6563 ab8295b8-cf94-4d9e-aec4-7959e3be5d79

lib/fer65.f90

@@ -189,7 +189,7 @@ program fer65
      endif
      write(20,1100) snr,nsync,ngood,nbad,xsync,esync,dsnr,esnr,  &
           xdt,edt,dfreq,efreq,xsum,esum,xwidth,ewidth
-1100 format(f5.1,2i6i4,2f6.1,f6.1,f5.1,f6.2,f5.2,6f5.1)
+1100 format(f5.1,2i6,i4,2f6.1,f6.1,f5.1,f6.2,f5.2,6f5.1)
      flush(20)
      if(ngood.ge.int(0.99*iters)) exit
   enddo

lib/jt65sim.f90

@@ -203,8 +203,9 @@ program jt65sim
 ! The following options were added 3/15/2016 to make the half-power tone 
 ! widths equal to the requested Doppler spread.  (Previously we effectively 
 ! used b=1.0 and Gaussian shape, which made the tones 1.665 times wider.)
-!        b=2.0*sqrt(log(2.0))                          !Gaussian
-        b=2.0                                         !Lorenzian
+!        b=2.0*sqrt(log(2.0))                     !Gaussian (before 3/15/2016)
+!        b=2.0                                    !Lorenzian 3/15 - 3/27
+        b=6.0                                     !Lorenzian 3/28 onward
 
         do i=1,NH
            f=i*df