mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-11-03 21:40:52 -05:00 
			
		
		
		
	Correct the data in c0(). Decoder now works! (These corrections should
really be made in symspec...) git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@2652 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
		
							parent
							
								
									734e6e7163
								
							
						
					
					
						commit
						3aef19d91e
					
				
							
								
								
									
										12
									
								
								lib/jt9.f90
									
									
									
									
									
								
							
							
						
						
									
										12
									
								
								lib/jt9.f90
									
									
									
									
									
								
							@ -90,6 +90,18 @@ program jt9
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
10   continue
 | 
					10   continue
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					! Fix up the data in c0()
 | 
				
			||||||
 | 
					     twopi=8.0*atan(1.0)
 | 
				
			||||||
 | 
					     phi=0.
 | 
				
			||||||
 | 
					     dphi=twopi*500.0/1500.0
 | 
				
			||||||
 | 
					     do i=1,npts8
 | 
				
			||||||
 | 
					        phi=phi+dphi
 | 
				
			||||||
 | 
					        if(phi.gt.twopi) phi=phi-twopi
 | 
				
			||||||
 | 
					        if(phi.lt.-twopi) phi=phi+twopi
 | 
				
			||||||
 | 
					        c0(i)=cmplx(aimag(c0(i)),real(c0(i)))*cmplx(cos(phi),sin(phi))
 | 
				
			||||||
 | 
					     enddo
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					! Now do the decoding
 | 
				
			||||||
     nutc=nutc0
 | 
					     nutc=nutc0
 | 
				
			||||||
     nstandalone=1
 | 
					     nstandalone=1
 | 
				
			||||||
     call sync9(ss,tstep,f0a,df3,fpk)                 !Find sig, get rough freq
 | 
					     call sync9(ss,tstep,f0a,df3,fpk)                 !Find sig, get rough freq
 | 
				
			||||||
 | 
				
			|||||||
@ -1,4 +1,4 @@
 | 
				
			|||||||
//-------------------------------------------------------------- MainWindow
 | 
					//--------------------------------------------------------------- MainWindow
 | 
				
			||||||
#include "mainwindow.h"
 | 
					#include "mainwindow.h"
 | 
				
			||||||
#include "ui_mainwindow.h"
 | 
					#include "ui_mainwindow.h"
 | 
				
			||||||
#include "devsetup.h"
 | 
					#include "devsetup.h"
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user