#include "cmm450.csci"
F0001:

	push(1)
	load(SP)
	push(0)
	eq
	brz( L0002 )
	push(0)
	load(SP)
	ret
	jump( L0001 )
L0002:

	push(1)
	load(SP)
	push(0)
	load(SP)
	push(0)
	load(SP)
	push(1)
	load(SP)
	div
	push(1)
	load(SP)
	mult
	sub
	push(2 )
	push(1 )
	call
	ret
L0001:

	ret
F0002:

	push(0)
	push(0)
	push(0)
	push(0 )
	push(-2 )
	call
	store(SP)
	push(1)
	push(0 )
	push(-2 )
	call
	store(SP)
	push(0)
	load(SP)
	push(1)
	load(SP)
	push(2 )
	push(1 )
	call
	push(1 )
	push(-1 )
	call
	end
CALLSWITCH:
	jumptable
	entry( -2 , INPUT )
	entry ( -1 , OUTPUT )
	entry ( 0 , INIT )
	entry ( 1 , F0001 )
MAIN:
	entry ( 2 , F0002 )
	endtable
INIT:
	start