#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(1 )
	call( 2 )
	ret
L0001:

	ret
F0002:

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