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
 |