mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-10-31 13:10:19 -04:00 
			
		
		
		
	- Remove alsa/oss from configure.ac and regenerate configure file. - Note it is MAP65 not WSJT. - rfile3a.f90 -> rfile3a.F90 for gfortran preprocessor. - Comment out compiler option that does not work on gfortran for now. git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@1151 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
		
			
				
	
	
		
			10 lines
		
	
	
		
			235 B
		
	
	
	
		
			Fortran
		
	
	
	
	
	
			
		
		
	
	
			10 lines
		
	
	
		
			235 B
		
	
	
	
		
			Fortran
		
	
	
	
	
	
| !------------------------------------------------ ftn_quit
 | |
| subroutine ftn_quit
 | |
|   include 'gcom1.f90'
 | |
|   ngo=0
 | |
| ! Destroy the FFTW plans
 | |
|   call four2a(a,-1,1,1,1)
 | |
|   call filbig(id,-1,f0,newdat,c4a,c4b,n4)
 | |
|   return
 | |
| end subroutine ftn_quit
 |