001-	43,22,F	g LBL F
002-	24	DEC
003-	1	1
004-	42 40	f OR		make it odd
005-	44 1	STO 1
006-	43,22,1	g LBL 1
007-	45 1	RCL 1
008-	43 25	g \/x
009-	1	1
010-	42 40	f OR		make it odd
011-	44 32	STO I
012-	43,22,6	g LBL 6
013-	45 1	RCL 1
014-	45 32	RCL I
015-	42 9	f RMD
016-	43 40	g x=0
017-	22 8	GTO 8
018-	45 32	RCL I
019-	2	2
020-	30	-
021-	44 32	STO I
022-	43 36	g LST x
023-	43 1	g x<=y
024-	22 6	GTO 6
025-	45 1	RCL 1
026-	43,6,0	g F? 0
027-	31	R/S
028-	43 34	g PSE
029-	43,22,8	g LBL 8
030-	2	2
031-	45 1	RCL 1
032-	40	+
033-	44 1	STO 1
034-	22 1	GTO 1