version	U12.1.00
uid	classobject.u1-1786033046-0
record	ClassObject__ClassClass__state,11
	0,__s
	1,__m
	2,New
	3,__ClassToObject
	4,__ObjectToClass
	5,__operator_overload_error_messages
	6,__file
	7,__line
	8,__DebugMode
	9,__ErrorOutFile
	10,DebugPrint
record	ClassObject__ClassClass__methods,42
	0,__InitClass
	1,__AuxMessage
	2,SetClass
	3,ClassName
	4,Addition
	5,Divide
	6,Minus
	7,Modulus
	8,Multiply
	9,Negate
	10,UnaryPlus
	11,Power
	12,Equals
	13,GTorEqual
	14,Greater
	15,LTorEqual
	16,Less
	17,Nequal
	18,Integer
	19,Numeric
	20,Real
	21,initially
	22,__proc_components
	23,AbortIfDebug
	24,AbortMessage
	25,Caller
	26,CallingComponents
	27,ClassCalling
	28,Debug
	29,DebugMode
	30,ErrorOut
	31,IsOn
	32,MethodCalling
	33,NotInDebugMode
	34,Off
	35,On
	36,PackageCalling
	37,ParamCalling
	38,PrintMessage
	39,ProcedureCalling
	40,StopMessage
	41,ErrorSystem__ErrorSystem
record	ClassObject__ClassObject__state,6
	0,__s
	1,__m
	2,__operator_overload
	3,__DebugMode
	4,__ErrorOutFile
	5,DebugPrint
record	ClassObject__ClassObject__methods,82
	0,String
	1,__call_by_method_name
	2,ClassName
	3,Clone
	4,Copy
	5,operator_overload_error_error
	6,Serial
	7,set_operator_overload_abort
	8,Addition
	9,Divide
	10,Minus
	11,Modulus
	12,Multiply
	13,Negate
	14,UnaryPlus
	15,Power
	16,Equals
	17,GTorEqual
	18,Greater
	19,LTorEqual
	20,Less
	21,Nequal
	22,Integer
	23,Numeric
	24,Real
	25,__add__
	26,__div__
	27,__minus__
	28,__mod__
	29,__mult__
	30,__neg__
	31,__number__
	32,__powr__
	33,__eqv__
	34,__neqv__
	35,__lexeq__
	36,__lexge__
	37,__lexgt__
	38,__lexle__
	39,__lexlt__
	40,__lexne__
	41,__numeq__
	42,__numge__
	43,__numgt__
	44,__numle__
	45,__numlt__
	46,__numne__
	47,__cat__
	48,__lcat__
	49,__compl__
	50,__diff__
	51,__inter__
	52,__union__
	53,__bang__
	54,__random__
	55,__refresh__
	56,__sect__
	57,__size__
	58,__subsc__
	59,__tabmat__
	60,__toby__
	61,initially
	62,__proc_components
	63,AbortIfDebug
	64,AbortMessage
	65,Caller
	66,CallingComponents
	67,ClassCalling
	68,Debug
	69,DebugMode
	70,ErrorOut
	71,IsOn
	72,MethodCalling
	73,NotInDebugMode
	74,Off
	75,On
	76,PackageCalling
	77,ParamCalling
	78,PrintMessage
	79,ProcedureCalling
	80,StopMessage
	81,ErrorSystem__ErrorSystem
impl	local
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/errorsystem.u
link	ximage.u
link	utilities.u
link	/usr/obj/ports/unicon-13.3beta1/unicon-0b8f99c2affe981f87639fc2577d2a68d05739ba/uni/lib/errorsystem.u
global	105
	0,000005,ClassObject__ClassClass___InitClass,1
	1,000005,ClassObject__ClassClass___AuxMessage,3
	2,000005,ClassObject__ClassClass_SetClass,2
	3,000005,ClassObject__ClassClass_ClassName,2
	4,000005,ClassObject__ClassClass_Addition,3
	5,000005,ClassObject__ClassClass_Divide,3
	6,000005,ClassObject__ClassClass_Minus,3
	7,000005,ClassObject__ClassClass_Modulus,3
	8,000005,ClassObject__ClassClass_Multiply,3
	9,000005,ClassObject__ClassClass_Negate,2
	10,000005,ClassObject__ClassClass_UnaryPlus,2
	11,000005,ClassObject__ClassClass_Power,3
	12,000005,ClassObject__ClassClass_Equals,3
	13,000005,ClassObject__ClassClass_GTorEqual,3
	14,000005,ClassObject__ClassClass_Greater,3
	15,000005,ClassObject__ClassClass_LTorEqual,3
	16,000005,ClassObject__ClassClass_Less,3
	17,000005,ClassObject__ClassClass_Nequal,3
	18,000005,ClassObject__ClassClass_Integer,2
	19,000005,ClassObject__ClassClass_Numeric,2
	20,000005,ClassObject__ClassClass_Real,2
	21,000005,ClassObject__ClassClass_initially,1
	22,000011,ClassObject__ClassClass__state,11
	23,000011,ClassObject__ClassClass__methods,42
	24,000001,ClassObject__ClassClass__oprec,0
	25,000001,ErrorSystem__ErrorSystem__oprec,0
	26,000005,ClassObject__ClassClass,0
	27,000005,ClassObject__ClassClassinitialize,0
	28,000005,ClassObject__ClassObject_String,1
	29,000005,ClassObject__ClassObject___call_by_method_name,-3
	30,000005,ClassObject__ClassObject_ClassName,1
	31,000005,ClassObject__ClassObject_Clone,1
	32,000005,ClassObject__ClassObject_Copy,1
	33,000005,ClassObject__ClassObject_operator_overload_error_error,2
	34,000005,ClassObject__ClassObject_Serial,1
	35,000005,ClassObject__ClassObject_set_operator_overload_abort,2
	36,000005,ClassObject__ClassObject_Addition,2
	37,000005,ClassObject__ClassObject_Divide,2
	38,000005,ClassObject__ClassObject_Minus,2
	39,000005,ClassObject__ClassObject_Modulus,2
	40,000005,ClassObject__ClassObject_Multiply,2
	41,000005,ClassObject__ClassObject_Negate,1
	42,000005,ClassObject__ClassObject_UnaryPlus,1
	43,000005,ClassObject__ClassObject_Power,2
	44,000005,ClassObject__ClassObject_Equals,2
	45,000005,ClassObject__ClassObject_GTorEqual,2
	46,000005,ClassObject__ClassObject_Greater,2
	47,000005,ClassObject__ClassObject_LTorEqual,2
	48,000005,ClassObject__ClassObject_Less,2
	49,000005,ClassObject__ClassObject_Nequal,2
	50,000005,ClassObject__ClassObject_Integer,1
	51,000005,ClassObject__ClassObject_Numeric,1
	52,000005,ClassObject__ClassObject_Real,1
	53,000005,ClassObject__ClassObject___add__,2
	54,000005,ClassObject__ClassObject___div__,2
	55,000005,ClassObject__ClassObject___minus__,2
	56,000005,ClassObject__ClassObject___mod__,2
	57,000005,ClassObject__ClassObject___mult__,2
	58,000005,ClassObject__ClassObject___neg__,1
	59,000005,ClassObject__ClassObject___number__,1
	60,000005,ClassObject__ClassObject___powr__,2
	61,000005,ClassObject__ClassObject___eqv__,2
	62,000005,ClassObject__ClassObject___neqv__,2
	63,000005,ClassObject__ClassObject___lexeq__,2
	64,000005,ClassObject__ClassObject___lexge__,2
	65,000005,ClassObject__ClassObject___lexgt__,2
	66,000005,ClassObject__ClassObject___lexle__,2
	67,000005,ClassObject__ClassObject___lexlt__,2
	68,000005,ClassObject__ClassObject___lexne__,2
	69,000005,ClassObject__ClassObject___numeq__,2
	70,000005,ClassObject__ClassObject___numge__,2
	71,000005,ClassObject__ClassObject___numgt__,2
	72,000005,ClassObject__ClassObject___numle__,2
	73,000005,ClassObject__ClassObject___numlt__,2
	74,000005,ClassObject__ClassObject___numne__,2
	75,000005,ClassObject__ClassObject___cat__,2
	76,000005,ClassObject__ClassObject___lcat__,2
	77,000005,ClassObject__ClassObject___compl__,1
	78,000005,ClassObject__ClassObject___diff__,2
	79,000005,ClassObject__ClassObject___inter__,2
	80,000005,ClassObject__ClassObject___union__,2
	81,000005,ClassObject__ClassObject___bang__,1
	82,000005,ClassObject__ClassObject___random__,1
	83,000005,ClassObject__ClassObject___refresh__,1
	84,000005,ClassObject__ClassObject___sect__,3
	85,000005,ClassObject__ClassObject___size__,1
	86,000005,ClassObject__ClassObject___subsc__,2
	87,000005,ClassObject__ClassObject___tabmat__,1
	88,000005,ClassObject__ClassObject___toby__,3
	89,000005,ClassObject__ClassObject_initially,1
	90,000011,ClassObject__ClassObject__state,6
	91,000011,ClassObject__ClassObject__methods,82
	92,000001,ClassObject__ClassObject__oprec,0
	93,000005,ClassObject__ClassObject,0
	94,000005,ClassObject__ClassObjectinitialize,0
	95,000005,ClassObject____NewNotSet,1
	96,000005,ClassObject__AlreadyRun,1
	97,000005,ClassObject__DeepCopy,2
	98,000005,ClassObject__Execute,1
	99,000005,ClassObject__IsObject,1
	100,000005,ClassObject__IsObjectOf,-2
	101,000005,ClassObject__ObjectProperties,1
	102,000005,ClassObject__set_operator_overload_error_messages,0
	103,000005,ClassObject__SuperClass,1
	104,000005,ClassObject__HasMethod,2

proc ClassObject__ClassClass___InitClass
	local	0,001000,self
	local	1,000020,class_Identifier
	local	2,000020,index
	local	3,000000,image
	con	0,002000,1,0
	con	1,002000,1,1
	con	2,010000,18,103,154,141,163,163,040,111,144,145,156,164,151,146,151,145,162,072,040
	con	3,010000,8,040,151,156,144,145,170,072,040
	con	4,010000,20,162,145,164,165,162,156,040,166,141,154,165,145,072,040,151,156,144,145,170,072
	con	5,010000,3,040,055,040
	declend
	filen	classobject.icn
	line	292
	colm	11
	synt	any
	mark	L1
	pnull
	var	2
	int	0
	line	294
	colm	23
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	pnull
	var	0
	line	305
	colm	14
	synt	any
	field	DebugPrint
	line	305
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	305
	colm	30
	synt	any
	field	Off
	line	305
	colm	34
	synt	any
	invoke	0
	unmark
lab L2
	mark	L3
lab L4
	line	310
	colm	9
	synt	while
	mark0
	pnull
	var	1
	pnull
	var	0
	line	310
	colm	39
	synt	any
	field	ClassCalling
	pnull
	var	2
	dup
	int	1
	line	310
	colm	59
	synt	any
	plus
	asgn
	line	310
	colm	52
	synt	any
	invoke	1
	line	310
	colm	32
	synt	any
	asgn
	unmark
	mark	L4
	pnull
	var	0
	line	311
	colm	17
	synt	any
	field	DebugPrint
	str	2
	var	1
	str	3
	var	2
	line	311
	colm	28
	synt	any
	invoke	4
lab L5
	unmark
	goto	L4
lab L6
	line	310
	colm	9
	synt	endwhile
	unmark
lab L3
	mark	L7
	pnull
	var	0
	line	319
	colm	13
	synt	any
	field	DebugPrint
	str	4
	var	2
	str	5
	var	3
	var	1
	line	319
	colm	65
	synt	any
	invoke	1
	line	319
	colm	24
	synt	any
	invoke	4
	unmark
lab L7
	mark	L8
	mark	L9
	var	1
	line	321
	colm	9
	synt	any
	pret
lab L9
	synt	any
	pfail
	unmark
lab L8
	pnull
	line	322
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass___AuxMessage
	local	0,001000,self
	local	1,001000,errorno
	local	2,001000,messageno
	local	3,000040,ErrorMessages
	local	4,000000,table
	con	0,002000,3,101
	con	1,010000,1,055
	con	2,002000,1,1
	con	3,010000,23,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040,046,156,165,154,154
	con	4,002000,1,2
	con	5,010000,18,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040
	con	6,002000,1,3
	con	7,010000,24,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,040,146,157,162,040,151,072,040
	con	8,002000,1,4
	con	9,010000,24,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,040,146,157,162,040,152,072,040
	con	10,002000,1,5
	con	11,010000,36,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,040,146,157,162,040,151,040,150,141,163,040,164,171,160,145,040,157,146,072,040
	con	12,002000,1,6
	con	13,010000,51,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,040,146,157,162,040,151,040,151,163,040,154,145,163,163,040,164,150,141,156,040,157,162,040,145,161,165,141,154,040,164,157,040,060,072,040
	con	14,002000,1,7
	con	15,010000,42,012,154,145,156,147,164,150,040,157,146,040,155,141,160,160,151,156,147,040,163,164,162,151,156,147,163,040,141,162,145,040,156,157,164,040,145,161,165,141,154,072,040
	con	16,002000,3,102
	con	17,002000,3,103
	con	18,010000,109,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040,046,156,165,154,154,012,115,151,163,163,151,156,147,040,125,156,151,143,157,156,040,163,164,162,151,156,147,040,166,141,154,165,145,040,157,162,040,166,141,154,165,145,040,164,150,141,164,040,143,141,156,040,142,145,040,143,157,156,166,145,162,164,145,144,040,164,157,040,141,156,040,125,156,151,143,157,156,040,163,164,162,151,156,147,040,166,141,154,165,145,056
	con	19,010000,51,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040,046,156,165,154,154,012,115,151,163,163,151,156,147,040,125,156,151,143,157,156,040,163,164,162,151,156,147,040,166,141,154,165,145
	con	20,010000,75,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040,046,156,165,154,154,012,115,151,163,163,151,156,147,040,125,156,151,143,157,156,040,151,156,164,145,147,145,162,040,166,141,154,165,145,040,157,162,040,125,156,151,143,157,156,040,163,164,162,151,156,147,040,166,141,154,165,145
	con	21,002000,3,104
	con	22,010000,105,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040,046,156,165,154,154,012,115,151,163,163,151,156,147,040,125,156,151,143,157,156,040,143,163,145,164,040,166,141,154,165,145,040,157,162,040,166,141,154,165,145,040,164,150,141,164,040,143,141,156,040,142,145,040,143,157,156,166,145,162,164,145,144,040,164,157,040,141,156,040,125,156,151,143,157,156,040,143,163,145,164,040,166,141,154,165,145,056
	con	23,002000,3,110
	con	24,010000,125,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040,046,156,165,154,154,012,115,151,163,163,151,156,147,040,125,156,151,143,157,156,040,163,164,162,151,156,147,040,157,162,040,154,151,163,164,040,166,141,154,165,145,040,157,162,040,166,141,154,165,145,040,164,150,141,164,040,143,141,156,040,142,145,040,143,157,156,166,145,162,164,145,144,040,164,157,040,141,156,040,125,156,151,143,157,156,040,163,164,162,151,156,147,040,157,162,040,154,151,163,164,040,166,141,154,165,145,056
	con	25,002000,3,113
	con	26,002000,3,120
	con	27,010000,133,012,157,146,146,145,156,144,151,156,147,040,166,141,154,165,145,072,040,046,156,165,154,154,012,115,151,163,163,151,156,147,040,125,156,151,143,157,156,040,143,163,145,164,054,040,163,145,164,040,157,162,040,164,141,142,154,145,040,166,141,154,165,145,040,157,162,040,166,141,154,165,145,040,164,150,141,164,040,143,141,156,040,142,145,040,143,157,156,166,145,162,164,145,144,040,164,157,040,141,156,040,125,156,151,143,157,156,040,143,163,145,164,054,040,163,145,164,040,157,162,040,164,141,142,154,145,040,166,141,154,165,145,056
	con	28,010000,0
	declend
	line	328
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	pnull
	var	3
	var	4
	line	333
	colm	37
	synt	any
	invoke	0
	line	333
	colm	27
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	pnull
	var	3
	pnull
	pnull
	int	0
	str	1
	line	335
	colm	31
	synt	any
	cat
	int	2
	line	335
	colm	38
	synt	any
	cat
	line	335
	colm	26
	synt	any
	subsc
	str	3
	line	335
	colm	44
	synt	any
	asgn
	unmark
lab L5
	mark	L6
	pnull
	pnull
	var	3
	pnull
	pnull
	int	0
	str	1
	line	336
	colm	31
	synt	any
	cat
	int	4
	line	336
	colm	38
	synt	any
	cat
	line	336
	colm	26
	synt	any
	subsc
	str	5
	line	336
	colm	44
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	3
	pnull
	pnull
	int	0
	str	1
	line	337
	colm	31
	synt	any
	cat
	int	6
	line	337
	colm	38
	synt	any
	cat
	line	337
	colm	26
	synt	any
	subsc
	str	7
	line	337
	colm	44
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	pnull
	pnull
	var	3
	pnull
	pnull
	int	0
	str	1
	line	338
	colm	31
	synt	any
	cat
	int	8
	line	338
	colm	38
	synt	any
	cat
	line	338
	colm	26
	synt	any
	subsc
	str	9
	line	338
	colm	44
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	var	3
	pnull
	pnull
	int	0
	str	1
	line	339
	colm	31
	synt	any
	cat
	int	10
	line	339
	colm	38
	synt	any
	cat
	line	339
	colm	26
	synt	any
	subsc
	str	11
	line	339
	colm	44
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	pnull
	pnull
	var	3
	pnull
	pnull
	int	0
	str	1
	line	340
	colm	31
	synt	any
	cat
	int	12
	line	340
	colm	38
	synt	any
	cat
	line	340
	colm	26
	synt	any
	subsc
	str	13
	line	340
	colm	44
	synt	any
	asgn
	unmark
lab L10
	mark	L11
	pnull
	pnull
	var	3
	pnull
	pnull
	int	0
	str	1
	line	341
	colm	31
	synt	any
	cat
	int	14
	line	341
	colm	38
	synt	any
	cat
	line	341
	colm	26
	synt	any
	subsc
	str	15
	line	341
	colm	44
	synt	any
	asgn
	unmark
lab L11
	mark	L12
	pnull
	pnull
	var	3
	pnull
	pnull
	int	16
	str	1
	line	342
	colm	31
	synt	any
	cat
	int	2
	line	342
	colm	38
	synt	any
	cat
	line	342
	colm	26
	synt	any
	subsc
	str	3
	line	342
	colm	44
	synt	any
	asgn
	unmark
lab L12
	mark	L13
	pnull
	pnull
	var	3
	pnull
	pnull
	int	16
	str	1
	line	343
	colm	31
	synt	any
	cat
	int	4
	line	343
	colm	38
	synt	any
	cat
	line	343
	colm	26
	synt	any
	subsc
	str	5
	line	343
	colm	44
	synt	any
	asgn
	unmark
lab L13
	mark	L14
	pnull
	pnull
	var	3
	pnull
	pnull
	int	17
	str	1
	line	344
	colm	31
	synt	any
	cat
	int	2
	line	344
	colm	38
	synt	any
	cat
	line	344
	colm	26
	synt	any
	subsc
	str	18
	line	344
	colm	44
	synt	any
	asgn
	unmark
lab L14
	mark	L15
	pnull
	pnull
	var	3
	pnull
	pnull
	int	17
	str	1
	line	346
	colm	31
	synt	any
	cat
	int	4
	line	346
	colm	38
	synt	any
	cat
	line	346
	colm	26
	synt	any
	subsc
	str	5
	line	346
	colm	44
	synt	any
	asgn
	unmark
lab L15
	mark	L16
	pnull
	pnull
	var	3
	pnull
	pnull
	int	17
	str	1
	line	347
	colm	31
	synt	any
	cat
	int	6
	line	347
	colm	38
	synt	any
	cat
	line	347
	colm	26
	synt	any
	subsc
	str	19
	line	347
	colm	44
	synt	any
	asgn
	unmark
lab L16
	mark	L17
	pnull
	pnull
	var	3
	pnull
	pnull
	int	17
	str	1
	line	349
	colm	31
	synt	any
	cat
	int	8
	line	349
	colm	38
	synt	any
	cat
	line	349
	colm	26
	synt	any
	subsc
	str	20
	line	349
	colm	44
	synt	any
	asgn
	unmark
lab L17
	mark	L18
	pnull
	pnull
	var	3
	pnull
	pnull
	int	21
	str	1
	line	351
	colm	31
	synt	any
	cat
	int	2
	line	351
	colm	38
	synt	any
	cat
	line	351
	colm	26
	synt	any
	subsc
	str	22
	line	351
	colm	44
	synt	any
	asgn
	unmark
lab L18
	mark	L19
	pnull
	pnull
	var	3
	pnull
	pnull
	int	21
	str	1
	line	353
	colm	31
	synt	any
	cat
	int	4
	line	353
	colm	38
	synt	any
	cat
	line	353
	colm	26
	synt	any
	subsc
	str	3
	line	353
	colm	44
	synt	any
	asgn
	unmark
lab L19
	mark	L20
	pnull
	pnull
	var	3
	pnull
	pnull
	int	23
	str	1
	line	354
	colm	31
	synt	any
	cat
	int	2
	line	354
	colm	38
	synt	any
	cat
	line	354
	colm	26
	synt	any
	subsc
	str	24
	line	354
	colm	44
	synt	any
	asgn
	unmark
lab L20
	mark	L21
	pnull
	pnull
	var	3
	pnull
	pnull
	int	25
	str	1
	line	356
	colm	31
	synt	any
	cat
	int	2
	line	356
	colm	38
	synt	any
	cat
	line	356
	colm	26
	synt	any
	subsc
	str	24
	line	356
	colm	44
	synt	any
	asgn
	unmark
lab L21
	pnull
	pnull
	var	3
	pnull
	pnull
	int	26
	str	1
	line	358
	colm	31
	synt	any
	cat
	int	2
	line	358
	colm	38
	synt	any
	cat
	line	358
	colm	26
	synt	any
	subsc
	str	27
	line	358
	colm	44
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L22
	pnull
	pnull
	var	2
	line	361
	colm	9
	synt	any
	null
	int	2
	line	361
	colm	20
	synt	any
	asgn
	unmark
lab L22
	mark	L23
	mark	L24
	mark	L25
	pnull
	pnull
	var	3
	pnull
	pnull
	var	1
	str	1
	line	362
	colm	39
	synt	any
	cat
	var	2
	line	362
	colm	46
	synt	any
	cat
	line	362
	colm	30
	synt	any
	subsc
	line	362
	colm	16
	synt	any
	nonnull
	line	362
	colm	60
	synt	any
	esusp
	goto	L26
lab L25
	str	28
lab L26
	line	362
	colm	9
	synt	any
	pret
lab L24
	synt	any
	pfail
	unmark
lab L23
	pnull
	line	363
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_SetClass
	local	0,001000,self
	local	1,001000,obj
	local	2,000020,procedure_name
	local	3,000020,object_name
	local	4,000020,object_Identifier
	local	5,000020,package_name
	local	6,000000,get_active_name
	local	7,000000,image
	local	8,000000,ClassObject__ClassClass
	local	9,000000,match
	local	10,000000,trim
	local	11,000000,type
	local	12,000000,classname
	local	13,000000,proc
	local	14,000000,ximage
	con	0,002000,1,4
	con	1,010000,10,157,142,152,145,143,164,040,151,163,072
	con	2,010000,20,040,117,142,152,145,143,164,040,111,144,145,156,164,151,146,151,145,162,072,040
	con	3,010000,14,040,157,142,152,145,143,164,137,156,141,155,145,072,040
	con	4,010000,16,160,141,143,153,141,147,145,040,156,141,155,145,040,151,163,040
	con	5,010000,2,137,137
	con	6,002000,1,0
	con	7,010000,1,137
	con	8,010000,16,137,137,117,142,152,145,143,164,124,157,103,154,141,163,163,133
	con	9,010000,3,135,072,040
	con	10,010000,17,012,137,137,117,142,152,145,143,164,124,157,103,154,141,163,163,133
	con	11,010000,9,160,162,157,143,145,144,165,162,145
	con	12,010000,16,137,137,103,154,141,163,163,124,157,117,142,152,145,143,164,133
	con	13,010000,10,135,072,040,072,072,160,162,157,143,050
	con	14,010000,3,051,072,040
	con	15,010000,6,163,164,162,151,156,147
	con	16,010000,39,125,156,141,142,154,145,040,164,157,040,163,145,164,040,164,150,145,040,103,154,141,163,163,040,157,142,152,145,143,164,040,143,162,145,141,164,157,162,072
	con	17,010000,38,123,145,164,164,151,156,147,040,163,145,154,146,056,116,145,167,050,051,040,164,157,040,137,137,103,154,141,163,163,124,157,117,142,152,145,143,164,133
	con	18,010000,6,040,116,145,167,072,040
	declend
	line	369
	colm	11
	synt	any
	mark	L1
	pnull
	pnull
	var	0
	line	383
	colm	14
	synt	any
	field	DebugPrint
	line	383
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	383
	colm	30
	synt	any
	field	Off
	line	383
	colm	34
	synt	any
	invoke	0
	unmark
lab L1
	mark	L2
	pnull
	var	4
	pnull
	var	0
	line	388
	colm	34
	synt	any
	field	__InitClass
	line	388
	colm	46
	synt	any
	invoke	0
	line	388
	colm	27
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	var	3
	var	6
	var	1
	line	393
	colm	41
	synt	any
	invoke	1
	line	393
	colm	21
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	5
	pnull
	pnull
	var	0
	line	394
	colm	29
	synt	any
	field	CallingComponents
	var	3
	line	394
	colm	47
	synt	any
	invoke	1
	int	0
	line	394
	colm	60
	synt	any
	subsc
	line	394
	colm	22
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	0
	line	396
	colm	13
	synt	any
	field	DebugPrint
	str	1
	var	7
	var	1
	line	396
	colm	43
	synt	any
	invoke	1
	str	2
	var	4
	str	3
	var	7
	var	3
	line	396
	colm	114
	synt	any
	invoke	1
	line	396
	colm	24
	synt	any
	invoke	6
	unmark
lab L5
	mark	L6
	pnull
	var	0
	line	397
	colm	13
	synt	any
	field	DebugPrint
	str	4
	var	5
	line	397
	colm	24
	synt	any
	invoke	2
	unmark
lab L6
	mark	L7
	pnull
	pnull
	pnull
	var	8
	line	400
	colm	32
	synt	any
	field	__ObjectToClass
	var	4
	line	400
	colm	48
	synt	any
	subsc
	var	4
	line	400
	colm	68
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	pnull
	pnull
	pnull
	var	8
	line	401
	colm	32
	synt	any
	field	__ObjectToClass
	var	3
	line	401
	colm	48
	synt	any
	subsc
	var	4
	line	401
	colm	62
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	pnull
	var	8
	line	402
	colm	32
	synt	any
	field	__ObjectToClass
	pnull
	var	3
	var	9
	pnull
	var	5
	str	5
	line	402
	colm	82
	synt	any
	cat
	var	3
	line	402
	colm	68
	synt	any
	invoke	2
	int	6
	line	402
	colm	102
	synt	any
	synt	any
	sect
	line	402
	colm	48
	synt	any
	subsc
	var	4
	line	402
	colm	107
	synt	any
	asgn
	unmark
lab L9
	mark	L10
	pnull
	pnull
	pnull
	var	8
	line	403
	colm	32
	synt	any
	field	__ObjectToClass
	var	10
	pnull
	var	3
	var	9
	pnull
	var	5
	str	5
	line	403
	colm	89
	synt	any
	cat
	var	3
	line	403
	colm	75
	synt	any
	invoke	2
	int	6
	line	403
	colm	109
	synt	any
	synt	any
	sect
	str	7
	int	6
	line	403
	colm	55
	synt	any
	invoke	3
	line	403
	colm	48
	synt	any
	subsc
	var	4
	line	403
	colm	123
	synt	any
	asgn
	unmark
lab L10
	mark	L11
	pnull
	var	0
	line	409
	colm	13
	synt	any
	field	DebugPrint
	str	8
	var	7
	var	3
	line	410
	colm	40
	synt	any
	invoke	1
	str	9
	var	7
	var	4
	line	410
	colm	69
	synt	any
	invoke	1
	str	10
	var	7
	var	4
	line	411
	colm	42
	synt	any
	invoke	1
	str	9
	var	7
	var	4
	line	411
	colm	77
	synt	any
	invoke	1
	str	10
	var	3
	str	9
	var	7
	var	4
	line	412
	colm	62
	synt	any
	invoke	1
	str	10
	pnull
	var	3
	var	9
	pnull
	var	5
	str	5
	line	413
	colm	68
	synt	any
	cat
	var	3
	line	413
	colm	54
	synt	any
	invoke	2
	int	6
	line	413
	colm	88
	synt	any
	synt	any
	sect
	str	9
	var	7
	var	4
	line	413
	colm	107
	synt	any
	invoke	1
	str	10
	var	10
	pnull
	var	3
	var	9
	pnull
	var	5
	str	5
	line	414
	colm	75
	synt	any
	cat
	var	3
	line	414
	colm	61
	synt	any
	invoke	2
	int	6
	line	414
	colm	95
	synt	any
	synt	any
	sect
	str	7
	int	6
	line	414
	colm	41
	synt	any
	invoke	3
	str	9
	var	7
	var	4
	line	414
	colm	123
	synt	any
	invoke	1
	line	409
	colm	24
	synt	any
	invoke	20
	unmark
lab L11
	mark	L12
	line	416
	colm	9
	synt	ifelse
	mark	L13
	pnull
	var	11
	var	1
	line	416
	colm	18
	synt	any
	invoke	1
	str	11
	line	416
	colm	24
	synt	any
	lexeq
	unmark
	mark	L15
	pnull
	pnull
	pnull
	var	8
	line	417
	colm	36
	synt	any
	field	__ClassToObject
	var	4
	line	417
	colm	52
	synt	any
	subsc
	var	1
	line	417
	colm	72
	synt	any
	asgn
	unmark
lab L15
	pnull
	var	0
	line	423
	colm	17
	synt	any
	field	DebugPrint
	str	12
	var	7
	var	4
	line	424
	colm	44
	synt	any
	invoke	1
	str	9
	var	7
	var	1
	line	424
	colm	79
	synt	any
	invoke	1
	line	423
	colm	28
	synt	any
	invoke	4
	goto	L14
lab L13
	line	426
	colm	16
	synt	ifelse
	mark	L16
	pnull
	var	2
	var	12
	var	1
	line	426
	colm	48
	synt	any
	invoke	1
	line	426
	colm	34
	synt	any
	asgn
	unmark
	mark	L18
	pnull
	pnull
	pnull
	var	8
	line	427
	colm	36
	synt	any
	field	__ClassToObject
	var	4
	line	427
	colm	52
	synt	any
	subsc
	var	13
	var	2
	line	427
	colm	81
	synt	any
	invoke	1
	line	427
	colm	72
	synt	any
	asgn
	unmark
lab L18
	pnull
	var	0
	line	434
	colm	17
	synt	any
	field	DebugPrint
	str	12
	var	7
	var	4
	line	435
	colm	44
	synt	any
	invoke	1
	str	13
	var	7
	var	2
	line	435
	colm	86
	synt	any
	invoke	1
	str	14
	var	7
	var	13
	var	2
	line	435
	colm	125
	synt	any
	invoke	1
	line	435
	colm	118
	synt	any
	invoke	1
	line	434
	colm	28
	synt	any
	invoke	6
	goto	L17
lab L16
	line	437
	colm	16
	synt	ifelse
	mark	L19
	pnull
	var	11
	var	1
	line	437
	colm	25
	synt	any
	invoke	1
	str	15
	line	437
	colm	31
	synt	any
	lexeq
	unmark
	mark	L21
	pnull
	pnull
	pnull
	var	8
	line	438
	colm	36
	synt	any
	field	__ClassToObject
	var	4
	line	438
	colm	52
	synt	any
	subsc
	var	13
	var	1
	line	438
	colm	81
	synt	any
	invoke	1
	line	438
	colm	72
	synt	any
	asgn
	unmark
lab L21
	pnull
	var	0
	line	445
	colm	17
	synt	any
	field	DebugPrint
	str	12
	var	7
	var	4
	line	446
	colm	44
	synt	any
	invoke	1
	str	13
	var	7
	var	1
	line	446
	colm	86
	synt	any
	invoke	1
	str	14
	var	7
	var	13
	var	1
	line	446
	colm	114
	synt	any
	invoke	1
	line	446
	colm	107
	synt	any
	invoke	1
	line	445
	colm	28
	synt	any
	invoke	6
	goto	L20
lab L19
	pnull
	var	0
	line	449
	colm	17
	synt	any
	field	StopMessage
	str	16
	var	14
	var	1
	line	449
	colm	81
	synt	any
	invoke	1
	line	449
	colm	29
	synt	any
	invoke	2
lab L20
	line	437
	colm	16
	synt	endifelse
lab L17
	line	426
	colm	16
	synt	endifelse
lab L14
	line	416
	colm	9
	synt	endifelse
	unmark
lab L12
	mark	L22
	pnull
	var	0
	line	456
	colm	13
	synt	any
	field	DebugPrint
	str	17
	var	7
	var	4
	line	458
	colm	20
	synt	any
	invoke	1
	str	13
	var	7
	var	1
	line	460
	colm	20
	synt	any
	invoke	1
	str	14
	var	7
	var	13
	var	1
	line	462
	colm	27
	synt	any
	invoke	1
	line	462
	colm	20
	synt	any
	invoke	1
	str	18
	var	7
	var	13
	pnull
	var	0
	line	463
	colm	42
	synt	any
	field	New
	line	463
	colm	37
	synt	any
	invoke	1
	line	463
	colm	30
	synt	any
	invoke	1
	line	456
	colm	24
	synt	any
	invoke	8
	unmark
lab L22
	mark	L23
	pnull
	pnull
	var	0
	line	465
	colm	13
	synt	any
	field	New
	pnull
	pnull
	var	8
	line	465
	colm	44
	synt	any
	field	__ClassToObject
	var	4
	line	465
	colm	60
	synt	any
	subsc
	line	465
	colm	18
	synt	any
	asgn
	unmark
lab L23
	mark	L24
	pnull
	var	0
	line	471
	colm	13
	synt	any
	field	DebugPrint
	str	17
	var	7
	var	4
	line	473
	colm	20
	synt	any
	invoke	1
	str	13
	var	7
	var	1
	line	475
	colm	20
	synt	any
	invoke	1
	str	14
	var	7
	var	13
	var	1
	line	477
	colm	27
	synt	any
	invoke	1
	line	477
	colm	20
	synt	any
	invoke	1
	str	18
	var	7
	var	13
	pnull
	var	0
	line	478
	colm	42
	synt	any
	field	New
	line	478
	colm	37
	synt	any
	invoke	1
	line	478
	colm	30
	synt	any
	invoke	1
	line	471
	colm	24
	synt	any
	invoke	8
	unmark
lab L24
	mark	L25
	pnull
	var	0
	line	480
	colm	13
	synt	any
	field	Off
	line	480
	colm	17
	synt	any
	invoke	0
	unmark
lab L25
	mark	L26
	mark	L27
	var	0
	line	481
	colm	9
	synt	any
	pret
lab L27
	synt	any
	pfail
	unmark
lab L26
	pnull
	line	482
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_ClassName
	local	0,001000,self
	local	1,001000,obj
	local	2,000020,name
	local	3,000000,classname
	local	4,000000,ClassObject__ClassClass
	declend
	line	486
	colm	11
	synt	any
	mark	L1
	pnull
	var	2
	var	3
	var	1
	line	490
	colm	28
	synt	any
	invoke	1
	line	490
	colm	14
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	pnull
	pnull
	var	4
	line	496
	colm	40
	synt	any
	field	__ObjectToClass
	var	2
	line	496
	colm	56
	synt	any
	subsc
	line	496
	colm	16
	synt	any
	nonnull
	line	496
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	497
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Addition
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	516
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	520
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	520
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	520
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	520
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	521
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	521
	colm	47
	synt	any
	invoke	1
	line	520
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	523
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	523
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	523
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	523
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	524
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	524
	colm	47
	synt	any
	invoke	1
	line	523
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	526
	colm	27
	synt	any
	field	Numeric
	var	1
	line	526
	colm	35
	synt	any
	invoke	1
	line	526
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	527
	colm	27
	synt	any
	field	Numeric
	var	2
	line	527
	colm	35
	synt	any
	invoke	1
	line	527
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	529
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	529
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	529
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	529
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	530
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	530
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	530
	colm	66
	synt	any
	invoke	1
	line	529
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	532
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	532
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	532
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	532
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	533
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	533
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	533
	colm	66
	synt	any
	invoke	1
	line	532
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	535
	colm	27
	synt	any
	plus
	line	535
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	536
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Divide
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	541
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	545
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	545
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	545
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	545
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	546
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	546
	colm	47
	synt	any
	invoke	1
	line	545
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	548
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	548
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	548
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	548
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	549
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	549
	colm	47
	synt	any
	invoke	1
	line	548
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	551
	colm	27
	synt	any
	field	Numeric
	var	1
	line	551
	colm	35
	synt	any
	invoke	1
	line	551
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	552
	colm	27
	synt	any
	field	Numeric
	var	2
	line	552
	colm	35
	synt	any
	invoke	1
	line	552
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	554
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	554
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	554
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	554
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	555
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	555
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	555
	colm	66
	synt	any
	invoke	1
	line	554
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	557
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	557
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	557
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	557
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	558
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	558
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	558
	colm	66
	synt	any
	invoke	1
	line	557
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	560
	colm	27
	synt	any
	div
	line	560
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	561
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Minus
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	566
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	570
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	570
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	570
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	570
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	571
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	571
	colm	47
	synt	any
	invoke	1
	line	570
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	573
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	573
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	573
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	573
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	574
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	574
	colm	47
	synt	any
	invoke	1
	line	573
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	576
	colm	27
	synt	any
	field	Numeric
	var	1
	line	576
	colm	35
	synt	any
	invoke	1
	line	576
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	577
	colm	27
	synt	any
	field	Numeric
	var	2
	line	577
	colm	35
	synt	any
	invoke	1
	line	577
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	579
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	579
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	579
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	579
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	580
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	580
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	580
	colm	66
	synt	any
	invoke	1
	line	579
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	582
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	582
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	582
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	582
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	583
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	583
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	583
	colm	66
	synt	any
	invoke	1
	line	582
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	585
	colm	27
	synt	any
	minus
	line	585
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	586
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Modulus
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	591
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	595
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	595
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	595
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	595
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	596
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	596
	colm	47
	synt	any
	invoke	1
	line	595
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	598
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	598
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	598
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	598
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	599
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	599
	colm	47
	synt	any
	invoke	1
	line	598
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	601
	colm	27
	synt	any
	field	Numeric
	var	1
	line	601
	colm	35
	synt	any
	invoke	1
	line	601
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	602
	colm	27
	synt	any
	field	Numeric
	var	2
	line	602
	colm	35
	synt	any
	invoke	1
	line	602
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	604
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	604
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	604
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	604
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	605
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	605
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	605
	colm	66
	synt	any
	invoke	1
	line	604
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	607
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	607
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	607
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	607
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	608
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	608
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	608
	colm	66
	synt	any
	invoke	1
	line	607
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	610
	colm	27
	synt	any
	mod
	line	610
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	611
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Multiply
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	617
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	621
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	621
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	621
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	621
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	622
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	622
	colm	47
	synt	any
	invoke	1
	line	621
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	624
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	624
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	624
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	624
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	625
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	625
	colm	47
	synt	any
	invoke	1
	line	624
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	627
	colm	27
	synt	any
	field	Numeric
	var	1
	line	627
	colm	35
	synt	any
	invoke	1
	line	627
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	628
	colm	27
	synt	any
	field	Numeric
	var	2
	line	628
	colm	35
	synt	any
	invoke	1
	line	628
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	630
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	630
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	630
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	630
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	631
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	631
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	631
	colm	66
	synt	any
	invoke	1
	line	630
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	633
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	633
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	633
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	633
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	634
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	634
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	634
	colm	66
	synt	any
	invoke	1
	line	633
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	636
	colm	27
	synt	any
	mult
	line	636
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	637
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Negate
	local	0,001000,self
	local	1,001000,val
	local	2,000020,local_val
	local	3,000000,keyword
	local	4,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	642
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	645
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	645
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	3
	str	1
	pnull
	int	2
	line	645
	colm	45
	synt	any
	invoke	3
	var	3
	str	3
	pnull
	int	2
	line	645
	colm	65
	synt	any
	invoke	3
	pnull
	var	0
	line	646
	colm	33
	synt	any
	field	__AuxMessage
	int	0
	line	646
	colm	46
	synt	any
	invoke	1
	line	645
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	pnull
	var	0
	line	648
	colm	26
	synt	any
	field	Numeric
	var	1
	line	648
	colm	34
	synt	any
	invoke	1
	line	648
	colm	19
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	var	2
	line	650
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	650
	colm	26
	synt	any
	field	AbortMessage
	int	0
	var	3
	str	1
	pnull
	int	2
	line	650
	colm	51
	synt	any
	invoke	3
	var	3
	str	3
	pnull
	int	2
	line	650
	colm	71
	synt	any
	invoke	3
	pnull
	var	0
	line	651
	colm	39
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	651
	colm	52
	synt	any
	invoke	2
	var	4
	var	1
	line	651
	colm	65
	synt	any
	invoke	1
	line	650
	colm	39
	synt	any
	invoke	5
	unmark
lab L3
	mark	L4
	mark	L5
	pnull
	var	2
	line	653
	colm	16
	synt	any
	neg
	line	653
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	654
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_UnaryPlus
	local	0,001000,self
	local	1,001000,val
	local	2,000020,local_val
	local	3,000000,keyword
	local	4,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	660
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	663
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	663
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	3
	str	1
	pnull
	int	2
	line	663
	colm	45
	synt	any
	invoke	3
	var	3
	str	3
	pnull
	int	2
	line	663
	colm	65
	synt	any
	invoke	3
	pnull
	var	0
	line	664
	colm	33
	synt	any
	field	__AuxMessage
	int	0
	line	664
	colm	46
	synt	any
	invoke	1
	line	663
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	pnull
	var	0
	line	666
	colm	26
	synt	any
	field	Numeric
	var	1
	line	666
	colm	34
	synt	any
	invoke	1
	line	666
	colm	19
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	var	2
	line	668
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	668
	colm	26
	synt	any
	field	AbortMessage
	int	0
	var	3
	str	1
	pnull
	int	2
	line	668
	colm	51
	synt	any
	invoke	3
	var	3
	str	3
	pnull
	int	2
	line	668
	colm	71
	synt	any
	invoke	3
	pnull
	var	0
	line	669
	colm	39
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	669
	colm	52
	synt	any
	invoke	2
	var	4
	var	1
	line	669
	colm	65
	synt	any
	invoke	1
	line	668
	colm	39
	synt	any
	invoke	5
	unmark
lab L3
	mark	L4
	mark	L5
	pnull
	var	2
	line	671
	colm	16
	synt	any
	number
	line	671
	colm	9
	synt	any
	pret
lab L5
	synt	any
	pfail
	unmark
lab L4
	pnull
	line	672
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Power
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	677
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	681
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	681
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	681
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	681
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	682
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	682
	colm	47
	synt	any
	invoke	1
	line	681
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	684
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	684
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	684
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	684
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	685
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	685
	colm	47
	synt	any
	invoke	1
	line	684
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	687
	colm	27
	synt	any
	field	Numeric
	var	1
	line	687
	colm	35
	synt	any
	invoke	1
	line	687
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	688
	colm	27
	synt	any
	field	Numeric
	var	2
	line	688
	colm	35
	synt	any
	invoke	1
	line	688
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	690
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	690
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	690
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	690
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	691
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	691
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	691
	colm	66
	synt	any
	invoke	1
	line	690
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	693
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	693
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	693
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	693
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	694
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	694
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	694
	colm	66
	synt	any
	invoke	1
	line	693
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	696
	colm	27
	synt	any
	power
	line	696
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	697
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Equals
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	723
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	727
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	727
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	727
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	727
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	728
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	728
	colm	47
	synt	any
	invoke	1
	line	727
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	730
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	730
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	730
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	730
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	731
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	731
	colm	47
	synt	any
	invoke	1
	line	730
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	733
	colm	27
	synt	any
	field	Numeric
	var	1
	line	733
	colm	35
	synt	any
	invoke	1
	line	733
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	734
	colm	27
	synt	any
	field	Numeric
	var	2
	line	734
	colm	35
	synt	any
	invoke	1
	line	734
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	736
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	736
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	736
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	736
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	737
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	737
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	737
	colm	66
	synt	any
	invoke	1
	line	736
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	739
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	739
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	739
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	739
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	740
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	740
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	740
	colm	66
	synt	any
	invoke	1
	line	739
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	742
	colm	27
	synt	any
	numeq
	line	742
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	743
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_GTorEqual
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	755
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	759
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	759
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	759
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	759
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	760
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	760
	colm	47
	synt	any
	invoke	1
	line	759
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	762
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	762
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	762
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	762
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	763
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	763
	colm	47
	synt	any
	invoke	1
	line	762
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	765
	colm	27
	synt	any
	field	Numeric
	var	1
	line	765
	colm	35
	synt	any
	invoke	1
	line	765
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	766
	colm	27
	synt	any
	field	Numeric
	var	2
	line	766
	colm	35
	synt	any
	invoke	1
	line	766
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	768
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	768
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	768
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	768
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	769
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	769
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	769
	colm	66
	synt	any
	invoke	1
	line	768
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	771
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	771
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	771
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	771
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	772
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	772
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	772
	colm	66
	synt	any
	invoke	1
	line	771
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	774
	colm	27
	synt	any
	numge
	line	774
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	775
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Greater
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	787
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	791
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	791
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	791
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	791
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	792
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	792
	colm	47
	synt	any
	invoke	1
	line	791
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	794
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	794
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	794
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	794
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	795
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	795
	colm	47
	synt	any
	invoke	1
	line	794
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	797
	colm	27
	synt	any
	field	Numeric
	var	1
	line	797
	colm	35
	synt	any
	invoke	1
	line	797
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	798
	colm	27
	synt	any
	field	Numeric
	var	2
	line	798
	colm	35
	synt	any
	invoke	1
	line	798
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	800
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	800
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	800
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	800
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	801
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	801
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	801
	colm	66
	synt	any
	invoke	1
	line	800
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	803
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	803
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	803
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	803
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	804
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	804
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	804
	colm	66
	synt	any
	invoke	1
	line	803
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	806
	colm	27
	synt	any
	numgt
	line	806
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	807
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_LTorEqual
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	819
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	823
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	823
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	823
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	823
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	824
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	824
	colm	47
	synt	any
	invoke	1
	line	823
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	826
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	826
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	826
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	826
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	827
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	827
	colm	47
	synt	any
	invoke	1
	line	826
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	829
	colm	27
	synt	any
	field	Numeric
	var	1
	line	829
	colm	35
	synt	any
	invoke	1
	line	829
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	830
	colm	27
	synt	any
	field	Numeric
	var	2
	line	830
	colm	35
	synt	any
	invoke	1
	line	830
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	832
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	832
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	832
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	832
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	833
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	833
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	833
	colm	66
	synt	any
	invoke	1
	line	832
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	835
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	835
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	835
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	835
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	836
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	836
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	836
	colm	66
	synt	any
	invoke	1
	line	835
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	838
	colm	27
	synt	any
	numle
	line	838
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	839
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Less
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	851
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	855
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	855
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	855
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	855
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	856
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	856
	colm	47
	synt	any
	invoke	1
	line	855
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	858
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	858
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	858
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	858
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	859
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	859
	colm	47
	synt	any
	invoke	1
	line	858
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	861
	colm	27
	synt	any
	field	Numeric
	var	1
	line	861
	colm	35
	synt	any
	invoke	1
	line	861
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	862
	colm	27
	synt	any
	field	Numeric
	var	2
	line	862
	colm	35
	synt	any
	invoke	1
	line	862
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	864
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	864
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	864
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	864
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	865
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	865
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	865
	colm	66
	synt	any
	invoke	1
	line	864
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	867
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	867
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	867
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	867
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	868
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	868
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	868
	colm	66
	synt	any
	invoke	1
	line	867
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	870
	colm	27
	synt	any
	numlt
	line	870
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	871
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Nequal
	local	0,001000,self
	local	1,001000,val1
	local	2,001000,val2
	local	3,000020,local_val1
	local	4,000020,local_val2
	local	5,000000,keyword
	local	6,000000,image
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	con	4,002000,1,2
	declend
	line	883
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	887
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	887
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	887
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	887
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	888
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	888
	colm	47
	synt	any
	invoke	1
	line	887
	colm	34
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	2
	line	890
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	890
	colm	21
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	890
	colm	46
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	890
	colm	66
	synt	any
	invoke	3
	pnull
	var	0
	line	891
	colm	34
	synt	any
	field	__AuxMessage
	int	0
	line	891
	colm	47
	synt	any
	invoke	1
	line	890
	colm	34
	synt	any
	invoke	4
	unmark
lab L2
	mark	L3
	pnull
	var	3
	pnull
	var	0
	line	893
	colm	27
	synt	any
	field	Numeric
	var	1
	line	893
	colm	35
	synt	any
	invoke	1
	line	893
	colm	20
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	4
	pnull
	var	0
	line	894
	colm	27
	synt	any
	field	Numeric
	var	2
	line	894
	colm	35
	synt	any
	invoke	1
	line	894
	colm	20
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	pnull
	var	3
	line	896
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	896
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	896
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	896
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	897
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	897
	colm	53
	synt	any
	invoke	2
	var	6
	var	1
	line	897
	colm	66
	synt	any
	invoke	1
	line	896
	colm	40
	synt	any
	invoke	5
	unmark
lab L5
	mark	L6
	pnull
	var	4
	line	899
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	899
	colm	27
	synt	any
	field	AbortMessage
	int	0
	var	5
	str	1
	pnull
	int	2
	line	899
	colm	52
	synt	any
	invoke	3
	var	5
	str	3
	pnull
	int	2
	line	899
	colm	72
	synt	any
	invoke	3
	pnull
	var	0
	line	900
	colm	40
	synt	any
	field	__AuxMessage
	int	0
	int	4
	line	900
	colm	53
	synt	any
	invoke	2
	var	6
	var	2
	line	900
	colm	66
	synt	any
	invoke	1
	line	899
	colm	40
	synt	any
	invoke	5
	unmark
lab L6
	mark	L7
	mark	L8
	pnull
	var	3
	var	4
	line	902
	colm	27
	synt	any
	numne
	line	902
	colm	9
	synt	any
	pret
lab L8
	synt	any
	pfail
	unmark
lab L7
	pnull
	line	903
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Integer
	local	0,001000,self
	local	1,001000,val
	local	2,000020,tmp
	local	3,000000,ClassObject__HasMethod
	local	4,000000,integer
	con	0,010000,6,123,164,162,151,156,147
	declend
	line	931
	colm	11
	synt	any
	mark	L1
	line	940
	colm	9
	synt	if
	mark0
	var	3
	var	1
	str	0
	line	940
	colm	34
	synt	any
	invoke	2
	unmark
	mark	L2
	var	4
	pnull
	var	1
	line	941
	colm	33
	synt	any
	field	String
	line	941
	colm	40
	synt	any
	invoke	0
	line	941
	colm	29
	synt	any
	invoke	1
	line	941
	colm	13
	synt	any
	pret
lab L2
	synt	any
	pfail
	line	940
	colm	9
	synt	endif
	unmark
lab L1
	mark	L3
	mark	L4
	var	4
	var	1
	line	943
	colm	25
	synt	any
	invoke	1
	line	943
	colm	9
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	944
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Numeric
	local	0,001000,self
	local	1,001000,val
	local	2,000020,tmp
	local	3,000000,ClassObject__HasMethod
	local	4,000000,numeric
	con	0,010000,6,123,164,162,151,156,147
	declend
	line	950
	colm	11
	synt	any
	mark	L1
	line	959
	colm	9
	synt	if
	mark0
	var	3
	var	1
	str	0
	line	959
	colm	34
	synt	any
	invoke	2
	unmark
	mark	L2
	var	4
	pnull
	var	1
	line	960
	colm	33
	synt	any
	field	String
	line	960
	colm	40
	synt	any
	invoke	0
	line	960
	colm	29
	synt	any
	invoke	1
	line	960
	colm	13
	synt	any
	pret
lab L2
	synt	any
	pfail
	line	959
	colm	9
	synt	endif
	unmark
lab L1
	mark	L3
	mark	L4
	var	4
	var	1
	line	962
	colm	25
	synt	any
	invoke	1
	line	962
	colm	9
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	963
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_Real
	local	0,001000,self
	local	1,001000,val
	local	2,000020,tmp
	local	3,000000,ClassObject__HasMethod
	local	4,000000,real
	con	0,010000,6,123,164,162,151,156,147
	declend
	line	969
	colm	11
	synt	any
	mark	L1
	line	978
	colm	9
	synt	if
	mark0
	var	3
	var	1
	str	0
	line	978
	colm	34
	synt	any
	invoke	2
	unmark
	mark	L2
	var	4
	pnull
	var	1
	line	979
	colm	30
	synt	any
	field	String
	line	979
	colm	37
	synt	any
	invoke	0
	line	979
	colm	26
	synt	any
	invoke	1
	line	979
	colm	13
	synt	any
	pret
lab L2
	synt	any
	pfail
	line	978
	colm	9
	synt	endif
	unmark
lab L1
	mark	L3
	mark	L4
	var	4
	var	1
	line	981
	colm	22
	synt	any
	invoke	1
	line	981
	colm	9
	synt	any
	pret
lab L4
	synt	any
	pfail
	unmark
lab L3
	pnull
	line	982
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass_initially
	local	0,001000,self
	local	1,000000,ClassObject__Execute
	local	2,000000,ClassObject__ClassObject
	local	3,000000,ClassObject__ClassClass
	local	4,000000,proc
	local	5,000000,ClassObject____NewNotSet
	local	6,000000,table
	local	7,000000,ClassObject__set_operator_overload_error_messages
	declend
	line	1005
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	var	1
	var	2
	line	1022
	colm	29
	synt	any
	invoke	1
	unmark
lab L4
	mark	L5
	pnull
	var	0
	line	1027
	colm	13
	synt	any
	field	Off
	line	1027
	colm	17
	synt	any
	invoke	0
	unmark
lab L5
	mark	L6
	pnull
	var	3
	var	0
	line	1033
	colm	33
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	3
	line	1040
	colm	32
	synt	any
	field	New
	var	4
	var	5
	line	1040
	colm	46
	synt	any
	invoke	1
	line	1040
	colm	37
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	pnull
	pnull
	pnull
	var	3
	line	1046
	colm	33
	synt	any
	field	__ClassToObject
	line	1046
	colm	9
	synt	any
	null
	var	6
	line	1046
	colm	60
	synt	any
	invoke	0
	line	1046
	colm	50
	synt	any
	asgn
	unmark
lab L8
	mark	L9
	pnull
	pnull
	pnull
	var	3
	line	1047
	colm	33
	synt	any
	field	__ObjectToClass
	line	1047
	colm	9
	synt	any
	null
	var	6
	line	1047
	colm	60
	synt	any
	invoke	0
	line	1047
	colm	50
	synt	any
	asgn
	unmark
lab L9
	var	7
	line	1052
	colm	58
	synt	any
	invoke	0
	unmark
lab L2
	einit	L1
lab L3
	mark	L10
	mark	L11
	pnull
	line	1054
	colm	7
	synt	any
	pret
lab L11
	synt	any
	pfail
	unmark
lab L10
	pnull
	line	1055
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClass
	local	0,000020,self
	local	1,000020,clone
	local	2,000000,ClassObject__ClassClass__oprec
	local	3,000000,ClassObject__ClassClassinitialize
	local	4,000000,ErrorSystem__ErrorSystem__oprec
	local	5,000000,ErrorSystem__ErrorSysteminitialize
	local	6,000000,ClassObject__ClassClass__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	2
	line	8
	colm	6
	synt	any
	null
	unmark
	var	3
	line	8
	colm	76
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	4
	line	9
	colm	6
	synt	any
	null
	unmark
	var	5
	line	9
	colm	78
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	2
	line	10
	colm	33
	synt	any
	field	ErrorSystem__ErrorSystem
	var	4
	line	10
	colm	59
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	0
	var	6
	line	12
	colm	42
	synt	any
	keywd	null
	var	2
	line	12
	colm	41
	synt	any
	invoke	2
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	0
	line	13
	colm	7
	synt	any
	field	__s
	var	0
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	0
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	0
	pnull
	line	14
	colm	21
	synt	any
	invoke	2
	line	14
	colm	29
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	31
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	0
	line	15
	colm	3
	synt	any
	pret
lab L12
	synt	any
	pfail
	unmark
lab L11
	pnull
	line	16
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassClassinitialize
	local	0,000000,ClassObject__ClassClass__oprec
	local	1,000000,ClassObject__ClassClass__methods
	local	2,000000,ClassObject__ClassClass___InitClass
	local	3,000000,ClassObject__ClassClass___AuxMessage
	local	4,000000,ClassObject__ClassClass_SetClass
	local	5,000000,ClassObject__ClassClass_ClassName
	local	6,000000,ClassObject__ClassClass_Addition
	local	7,000000,ClassObject__ClassClass_Divide
	local	8,000000,ClassObject__ClassClass_Minus
	local	9,000000,ClassObject__ClassClass_Modulus
	local	10,000000,ClassObject__ClassClass_Multiply
	local	11,000000,ClassObject__ClassClass_Negate
	local	12,000000,ClassObject__ClassClass_UnaryPlus
	local	13,000000,ClassObject__ClassClass_Power
	local	14,000000,ClassObject__ClassClass_Equals
	local	15,000000,ClassObject__ClassClass_GTorEqual
	local	16,000000,ClassObject__ClassClass_Greater
	local	17,000000,ClassObject__ClassClass_LTorEqual
	local	18,000000,ClassObject__ClassClass_Less
	local	19,000000,ClassObject__ClassClass_Nequal
	local	20,000000,ClassObject__ClassClass_Integer
	local	21,000000,ClassObject__ClassClass_Numeric
	local	22,000000,ClassObject__ClassClass_Real
	local	23,000000,ClassObject__ClassClass_initially
	local	24,000000,ErrorSystem__ErrorSystem___proc_components
	local	25,000000,ErrorSystem__ErrorSystem_AbortIfDebug
	local	26,000000,ErrorSystem__ErrorSystem_AbortMessage
	local	27,000000,ErrorSystem__ErrorSystem_Caller
	local	28,000000,ErrorSystem__ErrorSystem_CallingComponents
	local	29,000000,ErrorSystem__ErrorSystem_ClassCalling
	local	30,000000,ErrorSystem__ErrorSystem_Debug
	local	31,000000,ErrorSystem__ErrorSystem_DebugMode
	local	32,000000,ErrorSystem__ErrorSystem_ErrorOut
	local	33,000000,ErrorSystem__ErrorSystem_IsOn
	local	34,000000,ErrorSystem__ErrorSystem_MethodCalling
	local	35,000000,ErrorSystem__ErrorSystem_NotInDebugMode
	local	36,000000,ErrorSystem__ErrorSystem_Off
	local	37,000000,ErrorSystem__ErrorSystem_On
	local	38,000000,ErrorSystem__ErrorSystem_PackageCalling
	local	39,000000,ErrorSystem__ErrorSystem_ParamCalling
	local	40,000000,ErrorSystem__ErrorSystem_PrintMessage
	local	41,000000,ErrorSystem__ErrorSystem_ProcedureCalling
	local	42,000000,ErrorSystem__ErrorSystem_StopMessage
	declend
	line	18
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	var	36
	var	37
	var	38
	var	39
	var	40
	var	41
	var	42
	line	19
	colm	77
	synt	any
	invoke	41
	line	19
	colm	42
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_String
	local	0,001000,self
	local	1,000000,runerr
	con	0,002000,3,700
	con	1,010000,15,155,145,164,150,157,144,040,123,164,162,151,156,147,050,051
	declend
	filen	classobject.icn
	line	1080
	colm	11
	synt	any
	mark	L1
	var	1
	int	0
	str	1
	line	1081
	colm	10
	synt	any
	invoke	2
	unmark
lab L1
	pnull
	line	1083
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___call_by_method_name
	local	0,001000,self
	local	1,001000,methname
	local	2,001000,params
	local	3,000000,image
	local	4,000000,push
	con	0,010000,10,155,145,164,150,156,141,155,145,072,040
	con	1,010000,5,040,055,055,076,040
	con	2,010000,9,160,141,162,141,155,163,133,135,072
	declend
	line	1087
	colm	11
	synt	any
	mark	L1
	pnull
	var	0
	line	1088
	colm	13
	synt	any
	field	DebugPrint
	str	0
	var	1
	str	1
	var	3
	pnull
	pnull
	pnull
	var	0
	line	1088
	colm	66
	synt	any
	field	__m
	var	1
	line	1088
	colm	70
	synt	any
	subsc
	line	1088
	colm	61
	synt	any
	nonnull
	line	1088
	colm	60
	synt	any
	invoke	1
	line	1088
	colm	24
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	pnull
	var	0
	line	1089
	colm	13
	synt	any
	field	DebugPrint
	str	2
	var	3
	var	2
	line	1089
	colm	42
	synt	any
	invoke	1
	line	1089
	colm	24
	synt	any
	invoke	2
	unmark
lab L2
	mark	L3
	line	1091
	colm	9
	synt	ifelse
	mark	L4
	pnull
	pnull
	pnull
	var	0
	line	1091
	colm	17
	synt	any
	field	__m
	var	1
	line	1091
	colm	21
	synt	any
	subsc
	line	1091
	colm	12
	synt	any
	nonnull
	unmark
	mark	L6
	pnull
	pnull
	var	0
	line	1092
	colm	24
	synt	any
	field	__m
	var	1
	line	1092
	colm	28
	synt	any
	subsc
	var	4
	var	2
	var	0
	line	1092
	colm	47
	synt	any
	invoke	2
	invoke	-1
	line	1092
	colm	13
	synt	any
	pret
lab L6
	synt	any
	pfail
	goto	L5
lab L4
	line	1093
	colm	16
	synt	ifelse
	mark	L7
	pnull
	pnull
	var	0
	line	1093
	colm	24
	synt	any
	field	__operator_overload
	line	1093
	colm	19
	synt	any
	nonnull
	unmark
	line	1094
	colm	13
	synt	any
	pfail
	goto	L8
lab L7
	pnull
	var	0
	line	1096
	colm	17
	synt	any
	field	operator_overload_error_error
	var	1
	line	1096
	colm	47
	synt	any
	invoke	1
lab L8
	line	1093
	colm	16
	synt	endifelse
lab L5
	line	1091
	colm	9
	synt	endifelse
	unmark
lab L3
	pnull
	line	1098
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_ClassName
	local	0,001000,self
	local	1,000000,ClassObject__ClassClass
	declend
	line	1102
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	pnull
	var	1
	line	1103
	colm	40
	synt	any
	field	ClassName
	var	0
	line	1103
	colm	50
	synt	any
	invoke	1
	line	1103
	colm	16
	synt	any
	nonnull
	line	1103
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1104
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Clone
	local	0,001000,self
	local	1,000000,ClassObject__DeepCopy
	declend
	line	1110
	colm	11
	synt	any
	mark	L1
	mark	L2
	var	1
	var	0
	line	1111
	colm	37
	synt	any
	invoke	1
	line	1111
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1112
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Copy
	local	0,001000,self
	local	1,000000,ClassObject__DeepCopy
	declend
	line	1117
	colm	11
	synt	any
	mark	L1
	mark	L2
	var	1
	var	0
	line	1118
	colm	37
	synt	any
	invoke	1
	line	1118
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1119
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_operator_overload_error_error
	local	0,001000,self
	local	1,001000,methname
	local	2,000020,err_message_info
	local	3,000000,ClassObject__ClassClass
	local	4,000000,keyword
	con	0,010000,5,046,146,151,154,145
	con	1,002000,1,3
	con	2,010000,5,046,154,151,156,145
	con	3,010000,31,151,163,040,156,157,164,040,144,145,146,151,156,145,144,040,146,157,162,040,164,150,151,163,040,157,142,152,145,143,164,056
	declend
	line	1126
	colm	11
	synt	any
	mark	L1
	pnull
	var	2
	pnull
	pnull
	pnull
	var	3
	line	1130
	colm	53
	synt	any
	field	__operator_overload_error_messages
	var	1
	line	1130
	colm	88
	synt	any
	subsc
	line	1130
	colm	29
	synt	any
	nonnull
	line	1130
	colm	26
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	var	0
	line	1132
	colm	13
	synt	any
	field	AbortMessage
	var	2
	var	4
	str	0
	pnull
	int	1
	line	1133
	colm	29
	synt	any
	invoke	3
	var	4
	str	2
	pnull
	int	1
	line	1134
	colm	29
	synt	any
	invoke	3
	str	3
	line	1132
	colm	26
	synt	any
	invoke	4
	unmark
lab L2
	pnull
	line	1136
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Serial
	local	0,001000,self
	local	1,000000,serial
	declend
	line	1141
	colm	11
	synt	any
	mark	L1
	mark	L2
	var	1
	var	0
	line	1142
	colm	24
	synt	any
	invoke	1
	line	1142
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1143
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_set_operator_overload_abort
	local	0,001000,self
	local	1,001000,noabort
	local	2,000000,ClassObject__set_operator_overload_error_messages
	declend
	line	1149
	colm	11
	synt	any
	mark	L1
	line	1150
	colm	9
	synt	ifelse
	mark	L2
	pnull
	var	1
	line	1150
	colm	12
	synt	any
	nonnull
	unmark
	pnull
	pnull
	var	0
	line	1151
	colm	17
	synt	any
	field	__operator_overload
	var	1
	line	1151
	colm	37
	synt	any
	asgn
	goto	L3
lab L2
	mark	L4
	pnull
	pnull
	var	0
	line	1153
	colm	17
	synt	any
	field	__operator_overload
	line	1153
	colm	39
	synt	any
	keywd	null
	line	1153
	colm	37
	synt	any
	asgn
	unmark
lab L4
	var	2
	line	1154
	colm	62
	synt	any
	invoke	0
lab L3
	line	1150
	colm	9
	synt	endifelse
	unmark
lab L1
	pnull
	line	1156
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Addition
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1175
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1176
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1176
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1176
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1176
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1177
	colm	41
	synt	any
	invoke	1
	line	1176
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1179
	colm	39
	synt	any
	field	Addition
	var	0
	var	1
	line	1179
	colm	48
	synt	any
	invoke	2
	line	1179
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1180
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Divide
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1185
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1186
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1186
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1186
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1186
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1187
	colm	41
	synt	any
	invoke	1
	line	1186
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1189
	colm	39
	synt	any
	field	Divide
	var	0
	var	1
	line	1189
	colm	46
	synt	any
	invoke	2
	line	1189
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1190
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Minus
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1195
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1196
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1196
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1196
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1196
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1197
	colm	41
	synt	any
	invoke	1
	line	1196
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1199
	colm	39
	synt	any
	field	Minus
	var	0
	var	1
	line	1199
	colm	45
	synt	any
	invoke	2
	line	1199
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1200
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Modulus
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1205
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1206
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1206
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1206
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1206
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1207
	colm	41
	synt	any
	invoke	1
	line	1206
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1209
	colm	39
	synt	any
	field	Modulus
	var	0
	var	1
	line	1209
	colm	47
	synt	any
	invoke	2
	line	1209
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1210
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Multiply
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1215
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1216
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1216
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1216
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1216
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1217
	colm	41
	synt	any
	invoke	1
	line	1216
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1219
	colm	39
	synt	any
	field	Multiply
	var	0
	var	1
	line	1219
	colm	48
	synt	any
	invoke	2
	line	1219
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1220
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Negate
	local	0,001000,self
	local	1,000000,ClassObject__ClassClass
	declend
	line	1225
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	line	1226
	colm	39
	synt	any
	field	Negate
	var	0
	line	1226
	colm	46
	synt	any
	invoke	1
	line	1226
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1227
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_UnaryPlus
	local	0,001000,self
	local	1,000000,ClassObject__ClassClass
	declend
	line	1233
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	line	1234
	colm	39
	synt	any
	field	UnaryPlus
	var	0
	line	1234
	colm	49
	synt	any
	invoke	1
	line	1234
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1235
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Power
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1240
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1241
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1241
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1241
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1241
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1242
	colm	41
	synt	any
	invoke	1
	line	1241
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1244
	colm	39
	synt	any
	field	Power
	var	0
	var	1
	line	1244
	colm	45
	synt	any
	invoke	2
	line	1244
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1245
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Equals
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1267
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1268
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1268
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1268
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1268
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1269
	colm	41
	synt	any
	invoke	1
	line	1268
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1271
	colm	39
	synt	any
	field	Equals
	var	0
	var	1
	line	1271
	colm	46
	synt	any
	invoke	2
	line	1271
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1272
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_GTorEqual
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1280
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1281
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1281
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1281
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1281
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1282
	colm	41
	synt	any
	invoke	1
	line	1281
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1284
	colm	39
	synt	any
	field	GTorEqual
	var	0
	var	1
	line	1284
	colm	49
	synt	any
	invoke	2
	line	1284
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1285
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Greater
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1293
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1294
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1294
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1294
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1294
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1295
	colm	41
	synt	any
	invoke	1
	line	1294
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1297
	colm	39
	synt	any
	field	Greater
	var	0
	var	1
	line	1297
	colm	47
	synt	any
	invoke	2
	line	1297
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1298
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_LTorEqual
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1306
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1307
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1307
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1307
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1307
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1308
	colm	41
	synt	any
	invoke	1
	line	1307
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1310
	colm	39
	synt	any
	field	LTorEqual
	var	0
	var	1
	line	1310
	colm	49
	synt	any
	invoke	2
	line	1310
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1311
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Less
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1319
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1320
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1320
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1320
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1320
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1321
	colm	41
	synt	any
	invoke	1
	line	1320
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1323
	colm	39
	synt	any
	field	Less
	var	0
	var	1
	line	1323
	colm	44
	synt	any
	invoke	2
	line	1323
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1324
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Nequal
	local	0,001000,self
	local	1,001000,val
	local	2,000000,keyword
	local	3,000000,__AuxMessage
	local	4,000000,ClassObject__ClassClass
	con	0,002000,3,102
	con	1,010000,5,046,146,151,154,145
	con	2,002000,1,1
	con	3,010000,5,046,154,151,156,145
	declend
	line	1332
	colm	11
	synt	any
	mark	L1
	pnull
	var	1
	line	1333
	colm	9
	synt	any
	null
	pop
	pnull
	var	0
	line	1333
	colm	20
	synt	any
	field	AbortMessage
	int	0
	var	2
	str	1
	pnull
	int	2
	line	1333
	colm	45
	synt	any
	invoke	3
	var	2
	str	3
	pnull
	int	2
	line	1333
	colm	65
	synt	any
	invoke	3
	var	3
	int	0
	line	1334
	colm	41
	synt	any
	invoke	1
	line	1333
	colm	33
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	4
	line	1336
	colm	39
	synt	any
	field	Nequal
	var	0
	var	1
	line	1336
	colm	46
	synt	any
	invoke	2
	line	1336
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1337
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Integer
	local	0,001000,self
	local	1,000000,ClassObject__ClassClass
	declend
	line	1358
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	line	1359
	colm	39
	synt	any
	field	Integer
	var	0
	line	1359
	colm	47
	synt	any
	invoke	1
	line	1359
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1360
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Numeric
	local	0,001000,self
	local	1,000000,ClassObject__ClassClass
	declend
	line	1366
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	line	1367
	colm	39
	synt	any
	field	Numeric
	var	0
	line	1367
	colm	47
	synt	any
	invoke	1
	line	1367
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1368
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_Real
	local	0,001000,self
	local	1,000000,ClassObject__ClassClass
	declend
	line	1374
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	1
	line	1375
	colm	39
	synt	any
	field	Real
	var	0
	line	1375
	colm	44
	synt	any
	invoke	1
	line	1375
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1376
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___add__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,8,101,144,144,151,164,151,157,156
	declend
	line	1418
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1419
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1419
	colm	42
	synt	any
	invoke	2
	line	1419
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1420
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___div__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,6,104,151,166,151,144,145
	declend
	line	1427
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1428
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1428
	colm	42
	synt	any
	invoke	2
	line	1428
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1429
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___minus__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,5,115,151,156,165,163
	declend
	line	1436
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1437
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1437
	colm	42
	synt	any
	invoke	2
	line	1437
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1438
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___mod__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,7,115,157,144,165,154,165,163
	declend
	line	1445
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1446
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1446
	colm	42
	synt	any
	invoke	2
	line	1446
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1447
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___mult__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,8,115,165,154,164,151,160,154,171
	declend
	line	1454
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1455
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1455
	colm	42
	synt	any
	invoke	2
	line	1455
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1456
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___neg__
	local	0,001000,self
	con	0,010000,6,116,145,147,141,164,145
	declend
	line	1463
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1464
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1464
	colm	42
	synt	any
	invoke	1
	line	1464
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1465
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___number__
	local	0,001000,self
	con	0,010000,9,125,156,141,162,171,120,154,165,163
	declend
	line	1472
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1473
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1473
	colm	42
	synt	any
	invoke	1
	line	1473
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1474
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___powr__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,5,120,157,167,145,162
	declend
	line	1481
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1482
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1482
	colm	42
	synt	any
	invoke	2
	line	1482
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1483
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___eqv__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,5,105,161,165,151,166
	declend
	line	1495
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1496
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1496
	colm	42
	synt	any
	invoke	2
	line	1496
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1497
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___neqv__
	local	0,001000,self
	local	1,001000,y
	local	2,000000,image
	con	0,010000,5,163,145,154,146,072
	con	1,010000,3,040,171,072
	con	2,010000,6,116,145,161,165,151,166
	declend
	line	1504
	colm	11
	synt	any
	mark	L1
	pnull
	var	0
	line	1505
	colm	13
	synt	any
	field	DebugPrint
	str	0
	var	2
	var	0
	line	1505
	colm	38
	synt	any
	invoke	1
	str	1
	var	2
	var	1
	line	1505
	colm	58
	synt	any
	invoke	1
	line	1505
	colm	24
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	0
	line	1506
	colm	20
	synt	any
	field	__call_by_method_name
	str	2
	var	1
	line	1506
	colm	42
	synt	any
	invoke	2
	line	1506
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1507
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___lexeq__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,9,114,145,170,105,161,165,141,154,163
	declend
	line	1523
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1524
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1524
	colm	42
	synt	any
	invoke	2
	line	1524
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1525
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___lexge__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,9,114,145,170,107,124,157,162,105,161
	declend
	line	1532
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1533
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1533
	colm	42
	synt	any
	invoke	2
	line	1533
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1534
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___lexgt__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,5,114,145,170,107,124
	declend
	line	1541
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1542
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1542
	colm	42
	synt	any
	invoke	2
	line	1542
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1543
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___lexle__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,9,114,145,170,114,124,157,162,105,161
	declend
	line	1550
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1551
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1551
	colm	42
	synt	any
	invoke	2
	line	1551
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1552
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___lexlt__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,5,114,145,170,114,124
	declend
	line	1559
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1560
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1560
	colm	42
	synt	any
	invoke	2
	line	1560
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1561
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___lexne__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,5,114,145,170,116,105
	declend
	line	1568
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1569
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1569
	colm	42
	synt	any
	invoke	2
	line	1569
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1570
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___numeq__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,6,105,161,165,141,154,163
	declend
	line	1586
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1587
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1587
	colm	42
	synt	any
	invoke	2
	line	1587
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1588
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___numge__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,9,107,124,157,162,105,161,165,141,154
	declend
	line	1595
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1596
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1596
	colm	42
	synt	any
	invoke	2
	line	1596
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1597
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___numgt__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,7,107,162,145,141,164,145,162
	declend
	line	1604
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1605
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1605
	colm	42
	synt	any
	invoke	2
	line	1605
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1606
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___numle__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,9,114,124,157,162,105,161,165,141,154
	declend
	line	1613
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1614
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1614
	colm	42
	synt	any
	invoke	2
	line	1614
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1615
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___numlt__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,4,114,145,163,163
	declend
	line	1622
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1623
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1623
	colm	42
	synt	any
	invoke	2
	line	1623
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1624
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___numne__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,6,116,145,161,165,141,154
	declend
	line	1631
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1632
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1632
	colm	42
	synt	any
	invoke	2
	line	1632
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1633
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___cat__
	local	0,001000,self
	local	1,001000,y
	local	2,000000,image
	con	0,010000,5,163,145,154,146,072
	con	1,010000,3,040,171,072
	con	2,010000,11,103,157,156,143,141,164,145,156,141,164,145
	declend
	line	1645
	colm	11
	synt	any
	mark	L1
	pnull
	var	0
	line	1646
	colm	13
	synt	any
	field	DebugPrint
	str	0
	var	2
	var	0
	line	1646
	colm	38
	synt	any
	invoke	1
	str	1
	var	2
	var	1
	line	1646
	colm	58
	synt	any
	invoke	1
	line	1646
	colm	24
	synt	any
	invoke	4
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	0
	line	1647
	colm	20
	synt	any
	field	__call_by_method_name
	str	2
	var	1
	line	1647
	colm	42
	synt	any
	invoke	2
	line	1647
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1648
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___lcat__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,12,114,143,157,156,143,141,164,145,156,141,164,145
	declend
	line	1655
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1656
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1656
	colm	42
	synt	any
	invoke	2
	line	1656
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1657
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___compl__
	local	0,001000,self
	con	0,010000,10,103,157,155,160,154,145,155,145,156,164
	declend
	line	1671
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1672
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1672
	colm	42
	synt	any
	invoke	1
	line	1672
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1673
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___diff__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,10,104,151,146,146,145,162,145,156,143,145
	declend
	line	1680
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1681
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1681
	colm	42
	synt	any
	invoke	2
	line	1681
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1682
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___inter__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,9,111,156,164,145,162,163,145,143,164
	declend
	line	1689
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1690
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1690
	colm	42
	synt	any
	invoke	2
	line	1690
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1691
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___union__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,5,125,156,151,157,156
	declend
	line	1698
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1699
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1699
	colm	42
	synt	any
	invoke	2
	line	1699
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1700
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___bang__
	local	0,001000,self
	con	0,010000,7,106,157,162,105,141,143,150
	declend
	line	1718
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1719
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1719
	colm	42
	synt	any
	invoke	1
	line	1719
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1720
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___random__
	local	0,001000,self
	con	0,010000,6,122,141,156,144,157,155
	declend
	line	1727
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1728
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1728
	colm	42
	synt	any
	invoke	1
	line	1728
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1729
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___refresh__
	local	0,001000,self
	con	0,010000,7,122,145,146,162,145,163,150
	declend
	line	1736
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1737
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1737
	colm	42
	synt	any
	invoke	1
	line	1737
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1738
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___sect__
	local	0,001000,self
	local	1,001000,y
	local	2,001000,z
	local	3,000000,image
	con	0,010000,5,163,145,154,146,072
	con	1,010000,3,040,171,072
	con	2,010000,3,040,172,072
	con	3,010000,10,123,165,142,163,145,143,164,151,157,156
	declend
	line	1745
	colm	11
	synt	any
	mark	L1
	pnull
	var	0
	line	1746
	colm	13
	synt	any
	field	DebugPrint
	str	0
	var	3
	var	0
	line	1746
	colm	38
	synt	any
	invoke	1
	str	1
	var	1
	str	2
	var	2
	line	1746
	colm	24
	synt	any
	invoke	6
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	0
	line	1747
	colm	20
	synt	any
	field	__call_by_method_name
	str	3
	var	1
	var	2
	line	1747
	colm	42
	synt	any
	invoke	3
	line	1747
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1748
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___size__
	local	0,001000,self
	con	0,010000,4,123,151,172,145
	declend
	line	1755
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1756
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1756
	colm	42
	synt	any
	invoke	1
	line	1756
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1757
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___subsc__
	local	0,001000,self
	local	1,001000,y
	con	0,010000,9,123,165,142,163,143,162,151,160,164
	declend
	line	1764
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1765
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	line	1765
	colm	42
	synt	any
	invoke	2
	line	1765
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1766
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___tabmat__
	local	0,001000,self
	con	0,010000,8,124,141,142,115,141,164,143,150
	declend
	line	1773
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1774
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	line	1774
	colm	42
	synt	any
	invoke	1
	line	1774
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1775
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject___toby__
	local	0,001000,self
	local	1,001000,y
	local	2,001000,z
	con	0,010000,4,124,157,102,171
	declend
	line	1782
	colm	11
	synt	any
	mark	L1
	mark	L2
	pnull
	var	0
	line	1783
	colm	20
	synt	any
	field	__call_by_method_name
	str	0
	var	1
	var	2
	line	1783
	colm	42
	synt	any
	invoke	3
	line	1783
	colm	9
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1784
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject_initially
	local	0,001000,self
	local	1,000020,tmp
	local	2,000000,ClassObject__Execute
	local	3,000000,ErrorSystem__ErrorSystem
	local	4,000000,get_active_name
	local	5,000000,proc
	local	6,000000,ClassObject__ClassClass
	local	7,000000,ClassObject__ClassObject
	con	0,002000,1,3
	con	1,010000,9,151,156,151,164,151,141,154,154,171
	con	2,002000,1,2
	con	3,010000,10,103,154,141,163,163,103,154,141,163,163
	con	4,002000,1,1
	declend
	line	1788
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	var	2
	var	3
	line	1800
	colm	29
	synt	any
	invoke	1
	unmark
lab L4
	mark	L5
	pnull
	var	1
	pnull
	var	0
	line	1805
	colm	20
	synt	any
	field	CallingComponents
	var	4
	var	5
	line	1805
	colm	60
	synt	any
	keywd	current
	int	0
	line	1805
	colm	59
	synt	any
	invoke	2
	line	1805
	colm	54
	synt	any
	invoke	1
	line	1805
	colm	38
	synt	any
	invoke	1
	line	1805
	colm	13
	synt	any
	asgn
	unmark
lab L5
	mark	L6
	line	1806
	colm	9
	synt	if
	mark0
	pnull
	pnull
	var	1
	int	0
	line	1806
	colm	15
	synt	any
	subsc
	str	1
	line	1806
	colm	19
	synt	any
	lexne
	pop
	pnull
	pnull
	var	1
	int	2
	line	1806
	colm	40
	synt	any
	subsc
	str	3
	line	1806
	colm	44
	synt	any
	lexne
	unmark
	var	6
	line	1807
	colm	36
	synt	any
	invoke	0
	line	1806
	colm	9
	synt	endif
	unmark
lab L6
	mark	L7
	pnull
	var	0
	line	1813
	colm	13
	synt	any
	field	Off
	line	1813
	colm	17
	synt	any
	invoke	0
	unmark
lab L7
	mark	L8
	pnull
	var	7
	var	0
	line	1819
	colm	34
	synt	any
	asgn
	unmark
lab L8
	pnull
	pnull
	var	0
	line	1825
	colm	13
	synt	any
	field	__operator_overload
	int	4
	line	1825
	colm	33
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L9
	mark	L10
	pnull
	line	1827
	colm	7
	synt	any
	pret
lab L10
	synt	any
	pfail
	unmark
lab L9
	pnull
	line	1828
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObject
	local	0,000020,self
	local	1,000020,clone
	local	2,000000,ClassObject__ClassObject__oprec
	local	3,000000,ClassObject__ClassObjectinitialize
	local	4,000000,ErrorSystem__ErrorSystem__oprec
	local	5,000000,ErrorSystem__ErrorSysteminitialize
	local	6,000000,ClassObject__ClassObject__state
	declend
	filen	__faux.icn
	line	5
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	mark	L4
	line	8
	colm	3
	synt	if
	mark0
	pnull
	var	2
	line	8
	colm	6
	synt	any
	null
	unmark
	var	3
	line	8
	colm	78
	synt	any
	invoke	0
	line	8
	colm	3
	synt	endif
	unmark
lab L4
	mark	L5
	line	9
	colm	3
	synt	if
	mark0
	pnull
	var	4
	line	9
	colm	6
	synt	any
	null
	unmark
	var	5
	line	9
	colm	78
	synt	any
	invoke	0
	line	9
	colm	3
	synt	endif
	unmark
lab L5
	pnull
	pnull
	var	2
	line	10
	colm	34
	synt	any
	field	ErrorSystem__ErrorSystem
	var	4
	line	10
	colm	60
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	mark	L6
	pnull
	var	0
	var	6
	line	12
	colm	43
	synt	any
	keywd	null
	var	2
	line	12
	colm	42
	synt	any
	invoke	2
	line	12
	colm	8
	synt	any
	asgn
	unmark
lab L6
	mark	L7
	pnull
	pnull
	var	0
	line	13
	colm	7
	synt	any
	field	__s
	var	0
	line	13
	colm	12
	synt	any
	asgn
	unmark
lab L7
	mark	L8
	mark	L9
	pnull
	pnull
	var	0
	line	14
	colm	7
	synt	any
	field	__m
	line	14
	colm	11
	synt	any
	field	initially
	var	0
	pnull
	line	14
	colm	21
	synt	any
	invoke	2
	line	14
	colm	29
	synt	any
	esusp
	goto	L10
lab L9
	line	14
	colm	31
	synt	any
	pfail
lab L10
	unmark
lab L8
	mark	L11
	mark	L12
	var	0
	line	15
	colm	3
	synt	any
	pret
lab L12
	synt	any
	pfail
	unmark
lab L11
	pnull
	line	16
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ClassObjectinitialize
	local	0,000000,ClassObject__ClassObject__oprec
	local	1,000000,ClassObject__ClassObject__methods
	local	2,000000,ClassObject__ClassObject_String
	local	3,000000,ClassObject__ClassObject___call_by_method_name
	local	4,000000,ClassObject__ClassObject_ClassName
	local	5,000000,ClassObject__ClassObject_Clone
	local	6,000000,ClassObject__ClassObject_Copy
	local	7,000000,ClassObject__ClassObject_operator_overload_error_error
	local	8,000000,ClassObject__ClassObject_Serial
	local	9,000000,ClassObject__ClassObject_set_operator_overload_abort
	local	10,000000,ClassObject__ClassObject_Addition
	local	11,000000,ClassObject__ClassObject_Divide
	local	12,000000,ClassObject__ClassObject_Minus
	local	13,000000,ClassObject__ClassObject_Modulus
	local	14,000000,ClassObject__ClassObject_Multiply
	local	15,000000,ClassObject__ClassObject_Negate
	local	16,000000,ClassObject__ClassObject_UnaryPlus
	local	17,000000,ClassObject__ClassObject_Power
	local	18,000000,ClassObject__ClassObject_Equals
	local	19,000000,ClassObject__ClassObject_GTorEqual
	local	20,000000,ClassObject__ClassObject_Greater
	local	21,000000,ClassObject__ClassObject_LTorEqual
	local	22,000000,ClassObject__ClassObject_Less
	local	23,000000,ClassObject__ClassObject_Nequal
	local	24,000000,ClassObject__ClassObject_Integer
	local	25,000000,ClassObject__ClassObject_Numeric
	local	26,000000,ClassObject__ClassObject_Real
	local	27,000000,ClassObject__ClassObject___add__
	local	28,000000,ClassObject__ClassObject___div__
	local	29,000000,ClassObject__ClassObject___minus__
	local	30,000000,ClassObject__ClassObject___mod__
	local	31,000000,ClassObject__ClassObject___mult__
	local	32,000000,ClassObject__ClassObject___neg__
	local	33,000000,ClassObject__ClassObject___number__
	local	34,000000,ClassObject__ClassObject___powr__
	local	35,000000,ClassObject__ClassObject___eqv__
	local	36,000000,ClassObject__ClassObject___neqv__
	local	37,000000,ClassObject__ClassObject___lexeq__
	local	38,000000,ClassObject__ClassObject___lexge__
	local	39,000000,ClassObject__ClassObject___lexgt__
	local	40,000000,ClassObject__ClassObject___lexle__
	local	41,000000,ClassObject__ClassObject___lexlt__
	local	42,000000,ClassObject__ClassObject___lexne__
	local	43,000000,ClassObject__ClassObject___numeq__
	local	44,000000,ClassObject__ClassObject___numge__
	local	45,000000,ClassObject__ClassObject___numgt__
	local	46,000000,ClassObject__ClassObject___numle__
	local	47,000000,ClassObject__ClassObject___numlt__
	local	48,000000,ClassObject__ClassObject___numne__
	local	49,000000,ClassObject__ClassObject___cat__
	local	50,000000,ClassObject__ClassObject___lcat__
	local	51,000000,ClassObject__ClassObject___compl__
	local	52,000000,ClassObject__ClassObject___diff__
	local	53,000000,ClassObject__ClassObject___inter__
	local	54,000000,ClassObject__ClassObject___union__
	local	55,000000,ClassObject__ClassObject___bang__
	local	56,000000,ClassObject__ClassObject___random__
	local	57,000000,ClassObject__ClassObject___refresh__
	local	58,000000,ClassObject__ClassObject___sect__
	local	59,000000,ClassObject__ClassObject___size__
	local	60,000000,ClassObject__ClassObject___subsc__
	local	61,000000,ClassObject__ClassObject___tabmat__
	local	62,000000,ClassObject__ClassObject___toby__
	local	63,000000,ClassObject__ClassObject_initially
	local	64,000000,ErrorSystem__ErrorSystem___proc_components
	local	65,000000,ErrorSystem__ErrorSystem_AbortIfDebug
	local	66,000000,ErrorSystem__ErrorSystem_AbortMessage
	local	67,000000,ErrorSystem__ErrorSystem_Caller
	local	68,000000,ErrorSystem__ErrorSystem_CallingComponents
	local	69,000000,ErrorSystem__ErrorSystem_ClassCalling
	local	70,000000,ErrorSystem__ErrorSystem_Debug
	local	71,000000,ErrorSystem__ErrorSystem_DebugMode
	local	72,000000,ErrorSystem__ErrorSystem_ErrorOut
	local	73,000000,ErrorSystem__ErrorSystem_IsOn
	local	74,000000,ErrorSystem__ErrorSystem_MethodCalling
	local	75,000000,ErrorSystem__ErrorSystem_NotInDebugMode
	local	76,000000,ErrorSystem__ErrorSystem_Off
	local	77,000000,ErrorSystem__ErrorSystem_On
	local	78,000000,ErrorSystem__ErrorSystem_PackageCalling
	local	79,000000,ErrorSystem__ErrorSystem_ParamCalling
	local	80,000000,ErrorSystem__ErrorSystem_PrintMessage
	local	81,000000,ErrorSystem__ErrorSystem_ProcedureCalling
	local	82,000000,ErrorSystem__ErrorSystem_StopMessage
	declend
	line	18
	colm	11
	synt	any
lab L1
	init	L3
	mark	L2
	pnull
	var	0
	var	1
	var	2
	var	3
	var	4
	var	5
	var	6
	var	7
	var	8
	var	9
	var	10
	var	11
	var	12
	var	13
	var	14
	var	15
	var	16
	var	17
	var	18
	var	19
	var	20
	var	21
	var	22
	var	23
	var	24
	var	25
	var	26
	var	27
	var	28
	var	29
	var	30
	var	31
	var	32
	var	33
	var	34
	var	35
	var	36
	var	37
	var	38
	var	39
	var	40
	var	41
	var	42
	var	43
	var	44
	var	45
	var	46
	var	47
	var	48
	var	49
	var	50
	var	51
	var	52
	var	53
	var	54
	var	55
	var	56
	var	57
	var	58
	var	59
	var	60
	var	61
	var	62
	var	63
	var	64
	var	65
	var	66
	var	67
	var	68
	var	69
	var	70
	var	71
	var	72
	var	73
	var	74
	var	75
	var	76
	var	77
	var	78
	var	79
	var	80
	var	81
	var	82
	line	19
	colm	79
	synt	any
	invoke	81
	line	19
	colm	43
	synt	any
	asgn
	unmark
lab L2
	einit	L1
lab L3
	line	20
	colm	1
	synt	any
	pfail
	end
proc ClassObject____NewNotSet
	local	0,001000,val
	local	1,000000,write
	con	0,010000,152,124,150,145,040,155,145,164,150,157,144,040,116,145,167,050,051,040,150,141,163,040,156,157,164,040,142,145,040,151,156,151,164,151,141,154,151,163,145,144,056,040,111,156,151,164,151,141,154,151,163,145,040,142,171,040,143,141,154,154,151,156,147,040,164,150,145,040,155,145,164,150,157,144,040,123,145,164,103,154,141,163,163,050,051,040,151,156,040,164,150,145,040,151,156,151,164,151,141,154,154,171,040,155,145,164,150,157,144,040,157,146,040,164,150,145,040,163,165,142,143,154,141,163,163,040,157,146,040,103,154,141,163,163,117,142,152,145,143,164,072,072,103,154,141,163,163,103,154,141,163,163,056
	declend
	filen	classobject.icn
	line	1833
	colm	11
	synt	any
	mark	L1
	pnull
	var	0
	line	1834
	colm	5
	synt	any
	nonnull
	pop
	var	1
	str	0
	line	1834
	colm	20
	synt	any
	invoke	1
	unmark
lab L1
	pnull
	line	1837
	colm	1
	synt	any
	pfail
	end
proc ClassObject__AlreadyRun
	local	0,001000,object_tested
	local	1,000000,ClassObject__IsObject
	declend
	line	1846
	colm	12
	synt	any
	mark	L1
	mark	L2
	var	1
	var	0
	line	1851
	colm	33
	synt	any
	invoke	1
	line	1851
	colm	5
	synt	any
	pret
lab L2
	synt	any
	pfail
	unmark
lab L1
	pnull
	line	1852
	colm	1
	synt	any
	pfail
	end
proc ClassObject__DeepCopy
	local	0,001000,A
	local	1,001000,cache
	local	2,000020,k
	local	3,000000,table
	local	4,000000,type
	local	5,000000,copy
	local	6,000000,key
	local	7,000000,ClassObject__DeepCopy
	local	8,000000,set
	local	9,000000,insert
	local	10,000000,match
	local	11,000000,image
	con	0,010000,5,164,141,142,154,145
	con	1,010000,4,154,151,163,164
	con	2,010000,3,163,145,164
	con	3,010000,7,162,145,143,157,162,144,040
	declend
	line	1866
	colm	12
	synt	any
	mark	L1
	pnull
	pnull
	var	1
	line	1869
	colm	5
	synt	any
	null
	var	3
	line	1869
	colm	22
	synt	any
	invoke	0
	line	1869
	colm	12
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	line	1870
	colm	5
	synt	if
	mark0
	pnull
	pnull
	var	1
	var	0
	line	1870
	colm	14
	synt	any
	subsc
	line	1870
	colm	8
	synt	any
	nonnull
	unmark
	mark	L3
	pnull
	var	1
	var	0
	line	1871
	colm	21
	synt	any
	subsc
	line	1871
	colm	9
	synt	any
	pret
lab L3
	synt	any
	pfail
	line	1870
	colm	5
	synt	endif
	unmark
lab L2
	mark	L4
	line	1874
	colm	5
	synt	case
	mark0
	var	4
	var	0
	line	1874
	colm	14
	synt	any
	invoke	1
	eret
	mark	L6
	ccase
	mark	L7
	str	0
	line	1875
	colm	17
	synt	any
	esusp
	goto	L8
lab L7
	str	1
lab L8
	line	1875
	colm	25
	synt	any
	eqv
	unmark
	pop
	mark	L9
	pnull
	pnull
	var	1
	var	0
	line	1876
	colm	18
	synt	any
	subsc
	var	5
	var	0
	line	1876
	colm	31
	synt	any
	invoke	1
	line	1876
	colm	22
	synt	any
	asgn
	unmark
lab L9
	line	1877
	colm	13
	synt	every
	mark0
	pnull
	pnull
	pnull
	var	1
	var	0
	line	1877
	colm	24
	synt	any
	subsc
	pnull
	var	2
	var	6
	var	0
	line	1877
	colm	38
	synt	any
	invoke	1
	line	1877
	colm	30
	synt	any
	asgn
	line	1877
	colm	27
	synt	any
	subsc
	var	7
	pnull
	var	0
	var	2
	line	1877
	colm	69
	synt	any
	subsc
	var	1
	line	1877
	colm	67
	synt	any
	invoke	2
	line	1877
	colm	43
	synt	any
	asgn
	pop
lab L10
	efail
lab L11
	line	1877
	colm	13
	synt	endevery
	goto	L5
lab L6
	mark	L12
	ccase
	str	2
	line	1879
	colm	14
	synt	any
	eqv
	unmark
	pop
	mark	L13
	pnull
	pnull
	var	1
	var	0
	line	1880
	colm	18
	synt	any
	subsc
	var	8
	line	1880
	colm	30
	synt	any
	invoke	0
	line	1880
	colm	22
	synt	any
	asgn
	unmark
lab L13
	line	1881
	colm	13
	synt	every
	mark0
	var	9
	pnull
	var	1
	var	0
	line	1881
	colm	33
	synt	any
	subsc
	var	7
	pnull
	var	0
	line	1881
	colm	60
	synt	any
	bang
	var	1
	line	1881
	colm	59
	synt	any
	invoke	2
	line	1881
	colm	27
	synt	any
	invoke	2
	pop
lab L14
	efail
lab L15
	line	1881
	colm	13
	synt	endevery
	goto	L5
lab L12
	pop
	mark	L16
	pnull
	pnull
	var	1
	var	0
	line	1884
	colm	18
	synt	any
	subsc
	var	5
	var	0
	line	1884
	colm	31
	synt	any
	invoke	1
	line	1884
	colm	22
	synt	any
	asgn
	unmark
lab L16
	line	1885
	colm	13
	synt	if
	mark0
	var	10
	str	3
	var	11
	var	0
	line	1885
	colm	42
	synt	any
	invoke	1
	line	1885
	colm	23
	synt	any
	invoke	2
	unmark
	line	1886
	colm	17
	synt	every
	mark0
	pnull
	pnull
	pnull
	var	1
	var	0
	line	1886
	colm	28
	synt	any
	subsc
	pnull
	var	2
	var	6
	var	0
	line	1886
	colm	42
	synt	any
	invoke	1
	line	1886
	colm	34
	synt	any
	asgn
	line	1886
	colm	31
	synt	any
	subsc
	var	7
	pnull
	var	0
	var	2
	line	1886
	colm	73
	synt	any
	subsc
	var	1
	line	1886
	colm	71
	synt	any
	invoke	2
	line	1886
	colm	47
	synt	any
	asgn
	pop
lab L17
	efail
lab L18
	line	1886
	colm	17
	synt	endevery
	line	1885
	colm	13
	synt	endif
lab L5
	line	1874
	colm	5
	synt	endcase
	unmark
lab L4
	mark	L19
	mark	L20
	pnull
	pnull
	var	1
	var	0
	line	1890
	colm	18
	synt	any
	subsc
	line	1890
	colm	12
	synt	any
	value
	line	1890
	colm	5
	synt	any
	pret
lab L20
	synt	any
	pfail
	unmark
lab L19
	pnull
	line	1891
	colm	1
	synt	any
	pfail
	end
proc ClassObject__Execute
	local	0,001000,object_or_class_value
	local	1,000000,ClassObject__IsObject
	declend
	line	1901
	colm	12
	synt	any
	mark	L1
	line	1902
	colm	5
	synt	if
	mark0
	mark	L2
	var	1
	var	0
	line	1902
	colm	33
	synt	any
	invoke	1
	unmark
	efail
lab L2
	pnull
	unmark
	var	0
	line	1903
	colm	30
	synt	any
	invoke	0
	line	1902
	colm	5
	synt	endif
	unmark
lab L1
	pnull
	line	1905
	colm	1
	synt	any
	pfail
	end
proc ClassObject__IsObject
	local	0,001000,value_tested
	local	1,000020,object_identifier
	local	2,000000,image
	local	3,000000,trim
	local	4,000000,tab
	local	5,000000,classname
	con	0,010000,6,157,142,152,145,143,164
	con	1,002000,1,0
	declend
	line	1914
	colm	12
	synt	any
	mark	L1
	var	2
	var	0
	line	1922
	colm	12
	synt	any
	invoke	1
	line	1922
	colm	27
	synt	any
	bscan
	pnull
	str	0
	line	1922
	colm	31
	synt	any
	tabmat
	pop
	pnull
	var	1
	var	3
	var	4
	int	1
	line	1922
	colm	76
	synt	any
	invoke	1
	line	1922
	colm	70
	synt	any
	invoke	1
	line	1922
	colm	61
	synt	any
	asgn
	line	1922
	colm	27
	synt	any
	escan
	unmark
lab L1
	mark	L2
	mark	L3
	pnull
	var	1
	line	1928
	colm	12
	synt	any
	nonnull
	pop
	pnull
	var	5
	var	0
	line	1928
	colm	45
	synt	any
	invoke	1
	line	1928
	colm	33
	synt	any
	nonnull
	line	1928
	colm	5
	synt	any
	pret
lab L3
	synt	any
	pfail
	unmark
lab L2
	pnull
	line	1929
	colm	1
	synt	any
	pfail
	end
proc ClassObject__IsObjectOf
	local	0,001000,value
	local	1,001000,expectedtypes
	local	2,000020,object_identifier
	local	3,000020,superclasses
	local	4,000020,current_superclass
	local	5,000020,parentclass_list
	local	6,000000,ErrorSystem__ErrorSystem
	local	7,000000,image
	local	8,000000,trim
	local	9,000000,tab
	local	10,000000,ClassObject__SuperClass
	local	11,000000,put
	local	12,000000,ClassObject__ClassClass
	local	13,000000,push
	local	14,000000,classname
	con	0,010000,5,166,141,154,165,145
	con	1,010000,16,040,052,145,170,160,145,143,164,145,144,164,171,160,145,163,072
	con	2,010000,15,040,145,170,160,145,143,164,145,144,164,171,160,145,163,072
	con	3,010000,6,157,142,152,145,143,164
	con	4,002000,1,0
	declend
	line	1942
	colm	12
	synt	any
	mark	L1
	pnull
	var	3
	pnull
	line	1945
	colm	29
	synt	any
	llist	0
	line	1945
	colm	26
	synt	any
	asgn
	unmark
lab L1
	mark	L2
	pnull
	var	5
	pnull
	line	1948
	colm	33
	synt	any
	llist	0
	line	1948
	colm	30
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	var	6
	line	1955
	colm	29
	synt	any
	field	DebugPrint
	str	0
	var	7
	var	0
	line	1955
	colm	57
	synt	any
	invoke	1
	str	1
	pnull
	var	1
	line	1956
	colm	41
	synt	any
	size
	str	2
	var	7
	var	1
	line	1956
	colm	83
	synt	any
	invoke	1
	line	1955
	colm	40
	synt	any
	invoke	6
	unmark
lab L3
	mark	L4
	var	7
	var	0
	line	1957
	colm	12
	synt	any
	invoke	1
	line	1957
	colm	20
	synt	any
	bscan
	pnull
	str	3
	line	1957
	colm	24
	synt	any
	tabmat
	pop
	pnull
	var	2
	var	8
	var	9
	int	4
	line	1957
	colm	69
	synt	any
	invoke	1
	line	1957
	colm	63
	synt	any
	invoke	1
	line	1957
	colm	54
	synt	any
	asgn
	line	1957
	colm	20
	synt	any
	escan
	unmark
lab L4
	mark	L5
	pnull
	var	3
	var	10
	var	0
	line	1963
	colm	44
	synt	any
	invoke	1
	line	1963
	colm	18
	synt	any
	asgn
	unmark
lab L5
	mark	L6
	line	1970
	colm	5
	synt	every
	mark0
	pnull
	var	4
	pnull
	var	3
	line	1970
	colm	33
	synt	any
	bang
	line	1970
	colm	30
	synt	any
	asgn
	pop
	mark0
	var	11
	var	5
	mark	L9
	pnull
	pnull
	pnull
	var	12
	line	1971
	colm	57
	synt	any
	field	__ObjectToClass
	var	4
	line	1971
	colm	73
	synt	any
	subsc
	line	1971
	colm	33
	synt	any
	nonnull
	line	1971
	colm	94
	synt	any
	esusp
	goto	L10
lab L9
	var	4
lab L10
	line	1971
	colm	14
	synt	any
	invoke	2
	unmark
lab L7
	efail
lab L8
	line	1970
	colm	5
	synt	endevery
	unmark
lab L6
	mark	L11
	var	13
	var	5
	var	14
	var	0
	line	1974
	colm	41
	synt	any
	invoke	1
	pop
	pnull
	var	0
	line	1974
	colm	56
	synt	any
	field	ClassName
	line	1974
	colm	66
	synt	any
	invoke	0
	line	1974
	colm	11
	synt	any
	invoke	2
	unmark
lab L11
	mark	L12
	line	1980
	colm	5
	synt	if
	mark0
	pnull
	var	2
	line	1980
	colm	8
	synt	any
	nonnull
	pop
	pnull
	var	14
	var	0
	line	1980
	colm	41
	synt	any
	invoke	1
	line	1980
	colm	29
	synt	any
	nonnull
	pop
	pnull
	pnull
	var	5
	line	1980
	colm	52
	synt	any
	bang
	pnull
	var	1
	line	1980
	colm	73
	synt	any
	bang
	line	1980
	colm	70
	synt	any
	lexeq
	unmark
	mark	L13
	var	0
	line	1981
	colm	9
	synt	any
	pret
lab L13
	synt	any
	pfail
	line	1980
	colm	5
	synt	endif
	unmark
lab L12
	pnull
	line	1983
	colm	1
	synt	any
	pfail
	end
proc ClassObject__ObjectProperties
	local	0,001000,object_or_classname
	local	1,000020,class_name
	local	2,000000,type
	local	3,000000,proc
	local	4,000000,ClassObject__IsObject
	local	5,000000,membernames
	local	6,000000,methodnames
	con	0,010000,6,163,164,162,151,156,147
	con	1,002000,1,0
	con	2,010000,9,160,162,157,143,145,144,165,162,145
	con	3,010000,6,155,145,155,142,145,162
	declend
	line	1997
	colm	12
	synt	any
	mark	L1
	line	2004
	colm	5
	synt	ifelse
	mark	L2
	pnull
	var	2
	var	0
	line	2004
	colm	14
	synt	any
	invoke	1
	str	0
	line	2004
	colm	36
	synt	any
	lexeq
	unmark
	mark	L4
	pnull
	var	1
	var	3
	var	0
	int	1
	line	2008
	colm	29
	synt	any
	invoke	2
	line	2008
	colm	20
	synt	any
	asgn
	unmark
lab L4
	line	2014
	colm	9
	synt	if
	mark0
	pnull
	var	2
	var	1
	line	2014
	colm	18
	synt	any
	invoke	1
	str	2
	line	2014
	colm	31
	synt	any
	lexne
	unmark
	pnull
	var	1
	line	2015
	colm	27
	synt	any
	keywd	null
	line	2015
	colm	24
	synt	any
	asgn
	line	2014
	colm	9
	synt	endif
	goto	L3
lab L2
	pnull
	var	1
	var	4
	var	0
	line	2022
	colm	45
	synt	any
	invoke	1
	pop
	var	0
	line	2022
	colm	20
	synt	any
	asgn
lab L3
	line	2004
	colm	5
	synt	endifelse
	unmark
lab L1
	mark	L5
	line	2025
	colm	5
	synt	if
	mark0
	pnull
	var	1
	line	2025
	colm	8
	synt	any
	nonnull
	unmark
	mark	L6
	line	2031
	colm	9
	synt	suspend
	mark0
	pnull
	pnull
	var	5
	var	1
	line	2031
	colm	32
	synt	any
	invoke	1
	line	2031
	colm	18
	synt	any
	bang
	str	3
	line	2031
	colm	17
	synt	any
	llist	2
	line	2031
	colm	9
	synt	any
	psusp
	pop
lab L7
	efail
lab L8
	line	2031
	colm	9
	synt	endsuspend
	unmark
lab L6
	line	2038
	colm	9
	synt	suspend
	mark0
	pnull
	pnull
	var	6
	var	1
	line	2038
	colm	32
	synt	any
	invoke	1
	line	2038
	colm	18
	synt	any
	bang
	str	2
	line	2038
	colm	17
	synt	any
	llist	2
	line	2038
	colm	9
	synt	any
	psusp
	pop
lab L9
	efail
lab L10
	line	2038
	colm	9
	synt	endsuspend
	line	2025
	colm	5
	synt	endif
	unmark
lab L5
	pnull
	line	2040
	colm	1
	synt	any
	pfail
	end
proc ClassObject__set_operator_overload_error_messages
	local	0,000000,ClassObject__ClassClass
	local	1,000000,runtime_error_message
	local	2,000000,table
	con	0,002000,3,999
	con	1,010000,66,124,150,151,163,040,151,163,040,141,156,040,125,156,153,156,157,167,156,040,117,160,145,162,141,164,157,162,040,141,156,144,040,150,141,163,040,156,157,164,040,142,145,145,156,040,144,145,146,151,156,145,144,040,151,156,040,125,156,151,143,157,156,040,141,156,144
	con	2,002000,3,900
	con	3,010000,68,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,101,144,144,151,164,151,157,156,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,053,042
	con	4,002000,3,901
	con	5,010000,65,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,115,151,156,165,163,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,055,042
	con	6,002000,3,902
	con	7,010000,68,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,115,165,154,164,151,160,154,171,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,052,042
	con	8,002000,3,903
	con	9,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,104,151,166,151,144,145,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,057,042
	con	10,002000,3,904
	con	11,010000,65,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,120,157,167,145,162,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,136,042
	con	12,002000,3,905
	con	13,010000,67,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,125,156,141,162,171,120,154,165,163,050,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,053,042
	con	14,002000,3,906
	con	15,010000,64,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,116,145,147,141,164,145,050,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,055,042
	con	16,002000,3,907
	con	17,010000,67,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,115,157,144,165,154,165,163,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,045,042
	con	18,002000,3,908
	con	19,010000,67,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,105,161,165,151,166,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,075,075,075,042
	con	20,002000,3,909
	con	21,010000,69,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,116,145,161,165,151,166,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,176,075,075,075,042
	con	22,002000,3,910
	con	23,010000,65,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,106,157,162,105,141,143,150,050,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,041,042
	con	24,002000,3,911
	con	25,010000,64,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,122,141,156,144,157,155,050,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,077,042
	con	26,002000,3,912
	con	27,010000,68,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,103,157,155,160,154,145,155,145,156,164,050,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,176,042
	con	28,002000,3,913
	con	29,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,124,141,142,115,141,164,143,150,050,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,075,042
	con	30,002000,3,914
	con	31,010000,62,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,123,151,172,145,050,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,052,042
	con	32,002000,3,915
	con	33,010000,72,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,103,157,156,143,141,164,145,156,141,164,145,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,174,174,042
	con	34,002000,3,916
	con	35,010000,74,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,143,157,156,143,141,164,145,156,141,164,145,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,174,174,174,042
	con	36,002000,3,917
	con	37,010000,71,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,104,151,146,146,145,162,145,156,143,145,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,055,055,042
	con	38,002000,3,918
	con	39,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,125,156,151,157,156,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,053,053,042
	con	40,002000,3,919
	con	41,010000,70,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,111,156,164,145,162,163,145,143,164,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,052,052,042
	con	42,002000,3,920
	con	43,010000,70,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,145,170,105,161,165,141,154,163,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,075,075,042
	con	44,002000,3,921
	con	45,010000,71,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,145,170,107,124,157,162,105,161,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,076,076,075,042
	con	46,002000,3,922
	con	47,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,145,170,107,124,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,076,076,042
	con	48,002000,3,923
	con	49,010000,71,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,145,170,114,124,157,162,105,161,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,074,074,075,042
	con	50,002000,3,924
	con	51,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,145,170,114,124,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,074,074,042
	con	52,002000,3,925
	con	53,010000,67,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,145,170,116,105,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,176,075,075,042
	con	54,002000,3,926
	con	55,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,105,161,165,141,154,163,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,075,042
	con	56,002000,3,927
	con	57,010000,70,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,107,124,157,162,105,161,165,141,154,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,076,075,042
	con	58,002000,3,928
	con	59,010000,67,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,107,162,145,141,164,145,162,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,076,042
	con	60,002000,3,929
	con	61,010000,70,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,124,157,162,105,161,165,141,154,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,074,075,042
	con	62,002000,3,930
	con	63,010000,64,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,114,145,163,163,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,074,042
	con	64,002000,3,931
	con	65,010000,67,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,116,145,161,165,141,154,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,176,075,042
	con	66,002000,3,932
	con	67,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,122,145,146,162,145,163,150,050,171,051,040,146,157,162,040,164,150,145,040,165,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,136,042
	con	68,002000,3,933
	con	69,010000,76,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,123,165,142,163,145,143,164,151,157,156,050,171,054,040,172,051,040,146,157,162,040,164,150,145,040,164,145,162,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,133,072,135,042
	con	70,002000,3,934
	con	71,010000,70,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,123,165,142,163,143,162,151,160,164,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,133,135,042
	con	72,002000,3,935
	con	73,010000,66,124,150,145,040,117,160,145,162,141,164,157,162,040,117,166,145,162,154,157,141,144,040,155,145,164,150,157,144,040,124,157,102,171,050,171,051,040,146,157,162,040,164,150,145,040,142,151,156,141,162,171,040,157,160,145,162,141,164,157,162,040,042,056,056,056,042
	con	74,010000,8,101,144,144,151,164,151,157,156
	con	75,010000,5,115,151,156,165,163
	con	76,010000,8,115,165,154,164,151,160,154,171
	con	77,010000,6,104,151,166,151,144,145
	con	78,010000,5,120,157,167,145,162
	con	79,010000,9,125,156,141,162,171,120,154,165,163
	con	80,010000,6,116,145,147,141,164,145
	con	81,010000,7,115,157,144,165,154,165,163
	con	82,010000,5,105,161,165,151,166
	con	83,010000,6,116,145,161,165,151,166
	con	84,010000,7,106,157,162,105,141,143,150
	con	85,010000,6,122,141,156,144,157,155
	con	86,010000,10,103,157,155,160,154,145,155,145,156,164
	con	87,010000,8,124,141,142,115,141,164,143,150
	con	88,010000,4,123,151,172,145
	con	89,010000,11,103,157,156,143,141,164,145,156,141,164,145
	con	90,010000,12,114,143,157,156,143,141,164,145,156,141,164,145
	con	91,010000,10,104,151,146,146,145,162,145,156,143,145
	con	92,010000,5,125,156,151,157,156
	con	93,010000,9,111,156,164,145,162,163,145,143,164
	con	94,010000,9,114,145,170,105,161,165,141,154,163
	con	95,010000,9,114,145,170,107,124,157,162,105,161
	con	96,010000,5,114,145,170,107,124
	con	97,010000,9,114,145,170,114,124,157,162,105,161
	con	98,010000,5,114,145,170,114,124
	con	99,010000,5,114,145,170,116,105
	con	100,010000,6,105,161,165,141,154,163
	con	101,010000,9,107,124,157,162,105,161,165,141,154
	con	102,010000,7,107,162,145,141,164,145,162
	con	103,010000,9,114,124,157,162,105,161,165,141,154
	con	104,010000,4,114,145,163,163
	con	105,010000,6,116,145,161,165,141,154
	con	106,010000,7,122,145,146,162,145,163,150
	con	107,010000,10,123,165,142,163,145,143,164,151,157,156
	con	108,010000,9,123,165,142,163,143,162,151,160,164
	con	109,010000,4,124,157,102,171
	declend
	line	2048
	colm	12
	synt	any
lab L1
	init	L3
	mark	L2
	line	2053
	colm	9
	synt	if
	mark0
	pnull
	pnull
	var	0
	line	2053
	colm	36
	synt	any
	field	__operator_overload_error_messages
	line	2053
	colm	12
	synt	any
	null
	unmark
	mark	L4
	var	1
	int	0
	str	1
	line	2063
	colm	36
	synt	any
	invoke	2
	unmark
lab L4
	mark	L5
	var	1
	int	2
	str	3
	line	2064
	colm	36
	synt	any
	invoke	2
	unmark
lab L5
	mark	L6
	var	1
	int	4
	str	5
	line	2065
	colm	36
	synt	any
	invoke	2
	unmark
lab L6
	mark	L7
	var	1
	int	6
	str	7
	line	2066
	colm	36
	synt	any
	invoke	2
	unmark
lab L7
	mark	L8
	var	1
	int	8
	str	9
	line	2067
	colm	36
	synt	any
	invoke	2
	unmark
lab L8
	mark	L9
	var	1
	int	10
	str	11
	line	2068
	colm	36
	synt	any
	invoke	2
	unmark
lab L9
	mark	L10
	var	1
	int	12
	str	13
	line	2069
	colm	36
	synt	any
	invoke	2
	unmark
lab L10
	mark	L11
	var	1
	int	14
	str	15
	line	2070
	colm	36
	synt	any
	invoke	2
	unmark
lab L11
	mark	L12
	var	1
	int	16
	str	17
	line	2071
	colm	36
	synt	any
	invoke	2
	unmark
lab L12
	mark	L13
	var	1
	int	18
	str	19
	line	2072
	colm	36
	synt	any
	invoke	2
	unmark
lab L13
	mark	L14
	var	1
	int	20
	str	21
	line	2073
	colm	36
	synt	any
	invoke	2
	unmark
lab L14
	mark	L15
	var	1
	int	22
	str	23
	line	2074
	colm	36
	synt	any
	invoke	2
	unmark
lab L15
	mark	L16
	var	1
	int	24
	str	25
	line	2075
	colm	36
	synt	any
	invoke	2
	unmark
lab L16
	mark	L17
	var	1
	int	26
	str	27
	line	2076
	colm	36
	synt	any
	invoke	2
	unmark
lab L17
	mark	L18
	var	1
	int	28
	str	29
	line	2077
	colm	36
	synt	any
	invoke	2
	unmark
lab L18
	mark	L19
	var	1
	int	30
	str	31
	line	2078
	colm	36
	synt	any
	invoke	2
	unmark
lab L19
	mark	L20
	var	1
	int	32
	str	33
	line	2079
	colm	36
	synt	any
	invoke	2
	unmark
lab L20
	mark	L21
	var	1
	int	34
	str	35
	line	2080
	colm	36
	synt	any
	invoke	2
	unmark
lab L21
	mark	L22
	var	1
	int	36
	str	37
	line	2081
	colm	36
	synt	any
	invoke	2
	unmark
lab L22
	mark	L23
	var	1
	int	38
	str	39
	line	2082
	colm	36
	synt	any
	invoke	2
	unmark
lab L23
	mark	L24
	var	1
	int	40
	str	41
	line	2083
	colm	36
	synt	any
	invoke	2
	unmark
lab L24
	mark	L25
	var	1
	int	42
	str	43
	line	2084
	colm	36
	synt	any
	invoke	2
	unmark
lab L25
	mark	L26
	var	1
	int	44
	str	45
	line	2085
	colm	36
	synt	any
	invoke	2
	unmark
lab L26
	mark	L27
	var	1
	int	46
	str	47
	line	2086
	colm	36
	synt	any
	invoke	2
	unmark
lab L27
	mark	L28
	var	1
	int	48
	str	49
	line	2087
	colm	36
	synt	any
	invoke	2
	unmark
lab L28
	mark	L29
	var	1
	int	50
	str	51
	line	2088
	colm	36
	synt	any
	invoke	2
	unmark
lab L29
	mark	L30
	var	1
	int	52
	str	53
	line	2089
	colm	36
	synt	any
	invoke	2
	unmark
lab L30
	mark	L31
	var	1
	int	54
	str	55
	line	2090
	colm	36
	synt	any
	invoke	2
	unmark
lab L31
	mark	L32
	var	1
	int	56
	str	57
	line	2091
	colm	36
	synt	any
	invoke	2
	unmark
lab L32
	mark	L33
	var	1
	int	58
	str	59
	line	2092
	colm	36
	synt	any
	invoke	2
	unmark
lab L33
	mark	L34
	var	1
	int	60
	str	61
	line	2093
	colm	36
	synt	any
	invoke	2
	unmark
lab L34
	mark	L35
	var	1
	int	62
	str	63
	line	2094
	colm	36
	synt	any
	invoke	2
	unmark
lab L35
	mark	L36
	var	1
	int	64
	str	65
	line	2095
	colm	36
	synt	any
	invoke	2
	unmark
lab L36
	mark	L37
	var	1
	int	66
	str	67
	line	2096
	colm	36
	synt	any
	invoke	2
	unmark
lab L37
	mark	L38
	var	1
	int	68
	str	69
	line	2097
	colm	36
	synt	any
	invoke	2
	unmark
lab L38
	mark	L39
	var	1
	int	70
	str	71
	line	2098
	colm	36
	synt	any
	invoke	2
	unmark
lab L39
	mark	L40
	var	1
	int	72
	str	73
	line	2099
	colm	36
	synt	any
	invoke	2
	unmark
lab L40
	mark	L41
	pnull
	pnull
	var	0
	line	2102
	colm	36
	synt	any
	field	__operator_overload_error_messages
	var	2
	int	0
	line	2102
	colm	82
	synt	any
	invoke	1
	line	2102
	colm	72
	synt	any
	asgn
	unmark
lab L41
	mark	L42
	pnull
	pnull
	pnull
	var	0
	line	2103
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	74
	line	2103
	colm	71
	synt	any
	subsc
	int	2
	line	2103
	colm	84
	synt	any
	asgn
	unmark
lab L42
	mark	L43
	pnull
	pnull
	pnull
	var	0
	line	2104
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	75
	line	2104
	colm	71
	synt	any
	subsc
	int	4
	line	2104
	colm	81
	synt	any
	asgn
	unmark
lab L43
	mark	L44
	pnull
	pnull
	pnull
	var	0
	line	2105
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	76
	line	2105
	colm	71
	synt	any
	subsc
	int	6
	line	2105
	colm	84
	synt	any
	asgn
	unmark
lab L44
	mark	L45
	pnull
	pnull
	pnull
	var	0
	line	2106
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	77
	line	2106
	colm	71
	synt	any
	subsc
	int	8
	line	2106
	colm	82
	synt	any
	asgn
	unmark
lab L45
	mark	L46
	pnull
	pnull
	pnull
	var	0
	line	2107
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	78
	line	2107
	colm	71
	synt	any
	subsc
	int	10
	line	2107
	colm	81
	synt	any
	asgn
	unmark
lab L46
	mark	L47
	pnull
	pnull
	pnull
	var	0
	line	2108
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	79
	line	2108
	colm	71
	synt	any
	subsc
	int	12
	line	2108
	colm	85
	synt	any
	asgn
	unmark
lab L47
	mark	L48
	pnull
	pnull
	pnull
	var	0
	line	2109
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	80
	line	2109
	colm	71
	synt	any
	subsc
	int	14
	line	2109
	colm	82
	synt	any
	asgn
	unmark
lab L48
	mark	L49
	pnull
	pnull
	pnull
	var	0
	line	2110
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	81
	line	2110
	colm	71
	synt	any
	subsc
	int	16
	line	2110
	colm	83
	synt	any
	asgn
	unmark
lab L49
	mark	L50
	pnull
	pnull
	pnull
	var	0
	line	2111
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	82
	line	2111
	colm	71
	synt	any
	subsc
	int	18
	line	2111
	colm	81
	synt	any
	asgn
	unmark
lab L50
	mark	L51
	pnull
	pnull
	pnull
	var	0
	line	2112
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	83
	line	2112
	colm	71
	synt	any
	subsc
	int	20
	line	2112
	colm	82
	synt	any
	asgn
	unmark
lab L51
	mark	L52
	pnull
	pnull
	pnull
	var	0
	line	2113
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	84
	line	2113
	colm	71
	synt	any
	subsc
	int	22
	line	2113
	colm	83
	synt	any
	asgn
	unmark
lab L52
	mark	L53
	pnull
	pnull
	pnull
	var	0
	line	2114
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	85
	line	2114
	colm	71
	synt	any
	subsc
	int	24
	line	2114
	colm	82
	synt	any
	asgn
	unmark
lab L53
	mark	L54
	pnull
	pnull
	pnull
	var	0
	line	2115
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	86
	line	2115
	colm	71
	synt	any
	subsc
	int	26
	line	2115
	colm	86
	synt	any
	asgn
	unmark
lab L54
	mark	L55
	pnull
	pnull
	pnull
	var	0
	line	2116
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	87
	line	2116
	colm	71
	synt	any
	subsc
	int	28
	line	2116
	colm	84
	synt	any
	asgn
	unmark
lab L55
	mark	L56
	pnull
	pnull
	pnull
	var	0
	line	2117
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	88
	line	2117
	colm	71
	synt	any
	subsc
	int	30
	line	2117
	colm	80
	synt	any
	asgn
	unmark
lab L56
	mark	L57
	pnull
	pnull
	pnull
	var	0
	line	2118
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	89
	line	2118
	colm	71
	synt	any
	subsc
	int	32
	line	2118
	colm	87
	synt	any
	asgn
	unmark
lab L57
	mark	L58
	pnull
	pnull
	pnull
	var	0
	line	2119
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	90
	line	2119
	colm	71
	synt	any
	subsc
	int	34
	line	2119
	colm	88
	synt	any
	asgn
	unmark
lab L58
	mark	L59
	pnull
	pnull
	pnull
	var	0
	line	2120
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	91
	line	2120
	colm	71
	synt	any
	subsc
	int	36
	line	2120
	colm	86
	synt	any
	asgn
	unmark
lab L59
	mark	L60
	pnull
	pnull
	pnull
	var	0
	line	2121
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	92
	line	2121
	colm	71
	synt	any
	subsc
	int	38
	line	2121
	colm	81
	synt	any
	asgn
	unmark
lab L60
	mark	L61
	pnull
	pnull
	pnull
	var	0
	line	2122
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	93
	line	2122
	colm	71
	synt	any
	subsc
	int	40
	line	2122
	colm	85
	synt	any
	asgn
	unmark
lab L61
	mark	L62
	pnull
	pnull
	pnull
	var	0
	line	2123
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	94
	line	2123
	colm	71
	synt	any
	subsc
	int	42
	line	2123
	colm	85
	synt	any
	asgn
	unmark
lab L62
	mark	L63
	pnull
	pnull
	pnull
	var	0
	line	2124
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	95
	line	2124
	colm	71
	synt	any
	subsc
	int	44
	line	2124
	colm	85
	synt	any
	asgn
	unmark
lab L63
	mark	L64
	pnull
	pnull
	pnull
	var	0
	line	2125
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	96
	line	2125
	colm	71
	synt	any
	subsc
	int	46
	line	2125
	colm	81
	synt	any
	asgn
	unmark
lab L64
	mark	L65
	pnull
	pnull
	pnull
	var	0
	line	2126
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	97
	line	2126
	colm	71
	synt	any
	subsc
	int	48
	line	2126
	colm	85
	synt	any
	asgn
	unmark
lab L65
	mark	L66
	pnull
	pnull
	pnull
	var	0
	line	2127
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	98
	line	2127
	colm	71
	synt	any
	subsc
	int	50
	line	2127
	colm	81
	synt	any
	asgn
	unmark
lab L66
	mark	L67
	pnull
	pnull
	pnull
	var	0
	line	2128
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	99
	line	2128
	colm	71
	synt	any
	subsc
	int	52
	line	2128
	colm	81
	synt	any
	asgn
	unmark
lab L67
	mark	L68
	pnull
	pnull
	pnull
	var	0
	line	2129
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	100
	line	2129
	colm	71
	synt	any
	subsc
	int	54
	line	2129
	colm	82
	synt	any
	asgn
	unmark
lab L68
	mark	L69
	pnull
	pnull
	pnull
	var	0
	line	2130
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	101
	line	2130
	colm	71
	synt	any
	subsc
	int	56
	line	2130
	colm	85
	synt	any
	asgn
	unmark
lab L69
	mark	L70
	pnull
	pnull
	pnull
	var	0
	line	2131
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	102
	line	2131
	colm	71
	synt	any
	subsc
	int	58
	line	2131
	colm	83
	synt	any
	asgn
	unmark
lab L70
	mark	L71
	pnull
	pnull
	pnull
	var	0
	line	2132
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	103
	line	2132
	colm	71
	synt	any
	subsc
	int	60
	line	2132
	colm	85
	synt	any
	asgn
	unmark
lab L71
	mark	L72
	pnull
	pnull
	pnull
	var	0
	line	2133
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	104
	line	2133
	colm	71
	synt	any
	subsc
	int	62
	line	2133
	colm	80
	synt	any
	asgn
	unmark
lab L72
	mark	L73
	pnull
	pnull
	pnull
	var	0
	line	2134
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	105
	line	2134
	colm	71
	synt	any
	subsc
	int	64
	line	2134
	colm	82
	synt	any
	asgn
	unmark
lab L73
	mark	L74
	pnull
	pnull
	pnull
	var	0
	line	2135
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	106
	line	2135
	colm	71
	synt	any
	subsc
	int	66
	line	2135
	colm	83
	synt	any
	asgn
	unmark
lab L74
	mark	L75
	pnull
	pnull
	pnull
	var	0
	line	2136
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	107
	line	2136
	colm	71
	synt	any
	subsc
	int	68
	line	2136
	colm	86
	synt	any
	asgn
	unmark
lab L75
	mark	L76
	pnull
	pnull
	pnull
	var	0
	line	2137
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	108
	line	2137
	colm	71
	synt	any
	subsc
	int	70
	line	2137
	colm	85
	synt	any
	asgn
	unmark
lab L76
	pnull
	pnull
	pnull
	var	0
	line	2138
	colm	36
	synt	any
	field	__operator_overload_error_messages
	str	109
	line	2138
	colm	71
	synt	any
	subsc
	int	72
	line	2138
	colm	80
	synt	any
	asgn
	line	2053
	colm	9
	synt	endif
	unmark
lab L2
	einit	L1
lab L3
	line	2141
	colm	1
	synt	any
	pfail
	end
proc ClassObject__SuperClass
	local	0,001000,this_object
	local	1,000020,superclass_list
	local	2,000020,index
	local	3,000020,possible_method
	local	4,000020,object_oprec
	local	5,000020,field_name
	local	6,000020,fieldname_list
	local	7,000000,ClassObject__IsObject
	local	8,000000,oprec
	local	9,000000,put
	local	10,000000,fieldnames
	local	11,000000,type
	con	0,002000,1,1
	con	1,010000,9,160,162,157,143,145,144,165,162,145
	declend
	line	2153
	colm	12
	synt	any
	mark	L1
	line	2173
	colm	5
	synt	if
	mark0
	var	7
	var	0
	line	2173
	colm	29
	synt	any
	invoke	1
	unmark
	mark	L2
	pnull
	var	4
	var	8
	var	0
	line	2180
	colm	32
	synt	any
	invoke	1
	line	2180
	colm	22
	synt	any
	asgn
	unmark
lab L2
	mark	L3
	pnull
	var	1
	pnull
	line	2187
	colm	28
	synt	any
	llist	0
	line	2187
	colm	25
	synt	any
	asgn
	unmark
lab L3
	mark	L4
	pnull
	var	6
	pnull
	line	2188
	colm	27
	synt	any
	llist	0
	line	2188
	colm	24
	synt	any
	asgn
	unmark
lab L4
	mark	L5
	line	2195
	colm	9
	synt	every
	mark0
	var	9
	var	6
	var	10
	var	4
	line	2195
	colm	49
	synt	any
	invoke	1
	line	2195
	colm	20
	synt	any
	invoke	2
	pop
lab L6
	efail
lab L7
	line	2195
	colm	9
	synt	endevery
	unmark
lab L5
	mark	L8
	line	2208
	colm	9
	synt	every
	mark0
	pnull
	var	2
	pnull
	int	0
	pnull
	var	6
	line	2208
	colm	29
	synt	any
	size
	push1
	line	2208
	colm	26
	synt	any
	toby
	line	2208
	colm	21
	synt	any
	asgn
	pop
	mark0
	mark	L11
	pnull
	var	3
	pnull
	var	4
	var	2
	line	2209
	colm	44
	synt	any
	subsc
	line	2209
	colm	29
	synt	any
	asgn
	unmark
lab L11
	mark	L12
	pnull
	var	5
	pnull
	var	6
	var	2
	line	2210
	colm	41
	synt	any
	subsc
	line	2210
	colm	24
	synt	any
	asgn
	unmark
lab L12
	line	2211
	colm	13
	synt	if
	mark0
	pnull
	var	11
	var	3
	line	2211
	colm	22
	synt	any
	invoke	1
	str	1
	line	2211
	colm	40
	synt	any
	lexne
	unmark
	var	9
	var	1
	var	5
	line	2212
	colm	22
	synt	any
	invoke	2
	line	2211
	colm	13
	synt	endif
	unmark
lab L9
	efail
lab L10
	line	2208
	colm	9
	synt	endevery
	unmark
lab L8
	mark	L13
	var	1
	line	2215
	colm	9
	synt	any
	pret
lab L13
	synt	any
	pfail
	line	2173
	colm	5
	synt	endif
	unmark
lab L1
	pnull
	line	2217
	colm	1
	synt	any
	pfail
	end
proc ClassObject__HasMethod
	local	0,001000,val
	local	1,001000,methodname
	local	2,000020,tmpname
	local	3,000020,name_components
	local	4,000000,ClassObject__IsObject
	local	5,000000,ClassObject__ObjectProperties
	local	6,000000,ErrorSystem__ErrorSystem
	con	0,002000,1,2
	con	1,010000,9,160,162,157,143,145,144,165,162,145
	con	2,002000,1,1
	con	3,002000,1,3
	declend
	line	2223
	colm	12
	synt	any
	mark	L1
	line	2229
	colm	9
	synt	if
	mark0
	var	4
	var	0
	line	2229
	colm	33
	synt	any
	invoke	1
	unmark
	line	2230
	colm	13
	synt	every
	mark0
	pnull
	var	2
	var	5
	var	0
	line	2230
	colm	59
	synt	any
	invoke	1
	line	2230
	colm	27
	synt	any
	asgn
	pop
	mark0
	line	2231
	colm	17
	synt	if
	mark0
	pnull
	pnull
	var	2
	int	0
	line	2231
	colm	27
	synt	any
	subsc
	str	1
	line	2231
	colm	31
	synt	any
	lexeq
	unmark
	mark	L4
	pnull
	var	3
	pnull
	var	6
	line	2232
	colm	64
	synt	any
	field	CallingComponents
	pnull
	var	2
	int	2
	line	2232
	colm	90
	synt	any
	subsc
	line	2232
	colm	82
	synt	any
	invoke	1
	line	2232
	colm	37
	synt	any
	asgn
	unmark
lab L4
	line	2233
	colm	21
	synt	if
	mark0
	pnull
	pnull
	pnull
	var	3
	int	3
	line	2233
	colm	40
	synt	any
	subsc
	line	2233
	colm	24
	synt	any
	nonnull
	var	1
	line	2233
	colm	44
	synt	any
	lexeq
	unmark
	mark	L5
	var	1
	line	2234
	colm	25
	synt	any
	pret
lab L5
	synt	any
	pfail
	line	2233
	colm	21
	synt	endif
	line	2231
	colm	17
	synt	endif
	unmark
lab L2
	efail
lab L3
	line	2230
	colm	13
	synt	endevery
	line	2229
	colm	9
	synt	endif
	unmark
lab L1
	pnull
	line	2239
	colm	1
	synt	any
	pfail
	end
