mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-10-31 04:50:34 -04:00 
			
		
		
		
	
		
			
	
	
		
			10 lines
		
	
	
		
			125 B
		
	
	
	
		
			Fortran
		
	
	
	
	
	
		
		
			
		
	
	
			10 lines
		
	
	
		
			125 B
		
	
	
	
		
			Fortran
		
	
	
	
	
	
|  | subroutine save_dxbase(dxbase0)
 | ||
|  | 
 | ||
|  |   use packjt77
 | ||
|  |   character*6 dxbase0
 | ||
|  | 
 | ||
|  |   dxbase=dxbase0
 | ||
|  | 
 | ||
|  |   return
 | ||
|  | end subroutine save_dxbase
 |