MULT	0
	DZM	%MHIGH	
	SNA		
	JMP	%SMPZ	
	DAC	%SMP1
	XCT*	MULT	
	DAC	%SMP2
	XOR	%SMP1	
	DAC	%MPSIN	
	LAC	%SMP1	
	SPA		
	JMS	%SMNEG	
	DAC	%SMP1
	LAC	%SMP2	
	SPA		
	JMS	%SMNEG	
	DAC	%SMP2
	LAW	-22	
	DAC	%SMP3
	CLL
%SMP4	LAC	%SMP1	
	RAR		
	DAC	%SMP1	
	LAC	%MHIGH	
	SZL!CLL		
	TAD	%SMP2	
	RAR		
	DAC	%MHIGH
	ISZ	%SMP3	
	JMP	%SMP4	
	LAC	%SMP1	
	RAR
	DAC	%SMP1
	LAC	%MPSIN	
	SMA		
	JMP	%SMPZ-1
	LAC	%SMP1	
	JMS	%SMNEG
	DAC	%SMP1
	LAC	%MHIGH
	SPL!CLL!CMA
	TAD	(1
	DAC	%MHIGH
	LAC	%SMP1
%SMPZ	ISZ	MULT	
	JMP*	MULT
%SMP1	0
%MHIGH	0
%MPSIN	0
%SMP2	0
%SMP3	0
%SMNEG	0
	CMA!CLL
	TAD	(1
	JMP*	%SMNEG
DIV	0		
	SPA!CLL		
	CMA!CML		
	DAC	%REM	
	JMS	%SDV5	
%SDV5	0		
	XCT*	DIV	
	SZL		
	JMS	%SDNEG	
	DAC	%SQUO
	SPL!CLL		
	ISZ	%REM	
	NOP
	ISZ	DIV	
	XCT*	DIV	
	DAC	%SDVS	
	XOR	%SDV5	
	DAC	%SDV4	
	LAC	%SDVS
	SMA		
	JMS	%SDNEG	
	DAC	%SDVS	
	TAD	%REM	
	ISZ	DIV	
	SMA!CLA!STL	
	JMP	%SDV0	
	LAW	-23	
	DAC	%SDV1	
	CLL
	JMP	%SDV2
%SDV3	LAC	%REM	
	RAL		
	DAC	%REM	
	TAD	%SDVS	
	SZL		
	DAC	%REM	
%SDV2	LAC	%SQUO	
	RAL		
	DAC	%SQUO	
	ISZ	%SDV1	
	JMP	%SDV3	
	LAC	%SDV5	
	RAL		
	LAC	%REM	
	SZL		
	JMS	%SDNEG	
	DAC	%REM
	LAC	%SDV4	
	RAL		
	LAC	%SQUO	
	SZL		
	JMS	%SDNEG
	SKP!CLL
%SDV0	DZM	%REM
	JMP*	DIV
%SDVS	0
%REM	0
%SQUO	0
%SDV4	0
%SDV1	0
%SDNEG	0		
	CMA!CLL		
	TAD	(1	
	JMP*	%SDNEG