DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦ed5b2a771⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0360       | `  |		.CONST	0x0360								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 8002       |    |		.CONST	0x8002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0048       | H  |		.CONST	0x0048								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001b       |    |		.CONST	0x001b								; Number of locals
000b			INIT_0008:
000b 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated
000d 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated
000f 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated
0011 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated
001d c212       |    |		Store	0x1,0x12
001e 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated
0020 c213       |    |		Store	0x1,0x13
0021 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated
0023 c214       |    |		Store	0x1,0x14
0024 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
0026 c215       |    |		Store	0x1,0x15
0027 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
0029 c216       |    |		Store	0x1,0x16
002a 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
002c c218       |    |		Store	0x1,0x18
002d 00bf       |    |		Action	Accept_Activation
002e 029d 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call
0030 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 029d 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call
0036 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0037 00c7       |    |		Action	Elaborate_Subprogram
0038 029d 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call
003a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0047 00c7       |    |		Action	Elaborate_Subprogram
0048			BODY_0008:
0048 00bc       |    |		Action	Signal_Activated
0049 00bb       |    |		Action	Signal_Completion
004a 0000 0000  |    |		.BLANK	0000[0x6]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 4800       |H   |		Short_Literal	0x0
0054 00db       |    |		Load_Top	At_Offset_3
0055 0092 0338  |   8|		Action	Push_String_Extended,0x338					; ">>"
0057 e001       |    |		Load	0x0,0x1
0058 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0059 7012       |p   |		Jump_Nonzero	0x6c
005a 4800       |H   |		Short_Literal	0x0
005b 00db       |    |		Load_Top	At_Offset_3
005c 0092 0339  |   9|		Action	Push_String_Extended,0x339					; "<<"
005e e001       |    |		Load	0x0,0x1
005f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0060 700b       |p   |		Jump_Nonzero	0x6c
0061 00db       |    |		Load_Top	At_Offset_3
0062 6824       |h$  |		Jump_Zero	0x87
0063 4800       |H   |		Short_Literal	0x0
0064 00ea       |    |		Load_Encached	Null_String_Cache
0065 4820       |H   |		Short_Literal	0x20
0066 e5ff       |    |		Load	0x2,-0x1
0067 e001       |    |		Load	0x0,0x1
0068 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0069 e001       |    |		Load	0x0,0x1
006a 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
006b 681b       |h   |		Jump_Zero	0x87
006c e5fc       |    |		Load	0x2,-0x4
006d 4801       |H   |		Short_Literal	0x1
006e 4802       |H   |		Short_Literal	0x2
006f e002       |    |		Load	0x0,0x2
0070 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0071 035b       | [  |		Declare_Type	Array,Constrained
0072 0337       | 7  |		Declare_Variable	Array
0073 e5ff       |    |		Load	0x2,-0x1
0074 e002       |    |		Load	0x0,0x2
0075 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0076 e002       |    |		Load	0x0,0x2
0077 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0078 0119       |    |		Execute	Any,Check_In_Formal_Type
0079 4801       |H   |		Short_Literal	0x1
007a 00da       |    |		Load_Top	At_Offset_2
007b 01d6       |    |		Execute	Vector,Field_Write
007c e5fd       |    |		Load	0x2,-0x3
007d e002       |    |		Load	0x0,0x2
007e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
007f e002       |    |		Load	0x0,0x2
0080 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0081 0119       |    |		Execute	Any,Check_In_Formal_Type
0082 4802       |H   |		Short_Literal	0x2
0083 00da       |    |		Load_Top	At_Offset_2
0084 01d6       |    |		Execute	Vector,Field_Write
0085 6002       |`   |		Indirect_Literal	Discrete,0x88,{0x00000000, 0x00008802}
0086 8219       |    |		Call	0x1,0x19
0087 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0088 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008802}
008c 0000 0000  |    |		.BLANK	0000[0x4]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 4800       |H   |		Short_Literal	0x0
0094 00ea       |    |		Load_Encached	Null_String_Cache
0095 4820       |H   |		Short_Literal	0x20
0096 e5ff       |    |		Load	0x2,-0x1
0097 e001       |    |		Load	0x0,0x1
0098 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0099 e001       |    |		Load	0x0,0x1
009a 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
009b 681b       |h   |		Jump_Zero	0xb7
009c e5fd       |    |		Load	0x2,-0x3
009d 4801       |H   |		Short_Literal	0x1
009e 4802       |H   |		Short_Literal	0x2
009f e002       |    |		Load	0x0,0x2
00a0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00a1 035b       | [  |		Declare_Type	Array,Constrained
00a2 0337       | 7  |		Declare_Variable	Array
00a3 e5ff       |    |		Load	0x2,-0x1
00a4 e002       |    |		Load	0x0,0x2
00a5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00a6 e002       |    |		Load	0x0,0x2
00a7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00a8 0119       |    |		Execute	Any,Check_In_Formal_Type
00a9 4801       |H   |		Short_Literal	0x1
00aa 00da       |    |		Load_Top	At_Offset_2
00ab 01d6       |    |		Execute	Vector,Field_Write
00ac e5fe       |    |		Load	0x2,-0x2
00ad e002       |    |		Load	0x0,0x2
00ae 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00af e002       |    |		Load	0x0,0x2
00b0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00b1 0119       |    |		Execute	Any,Check_In_Formal_Type
00b2 4802       |H   |		Short_Literal	0x2
00b3 00da       |    |		Load_Top	At_Offset_2
00b4 01d6       |    |		Execute	Vector,Field_Write
00b5 67d2       |g   |		Indirect_Literal	Discrete,0x88,{0x00000000, 0x00008802}
00b6 8219       |    |		Call	0x1,0x19
00b7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bd       |    |		.CONST	0x00bd								; Address of begin
00b9 00d9       |    |		.CONST	0x00d9								; Address of exception handler
00ba 0002       |    |		.CONST	0x0002								; Number of locals
00bb			INIT_00b8:
00bb 0092 033a  |   :|		Action	Push_String_Extended,0x33a					; "Rci"
00bd			BODY_00b8:
00bd 00d8       |    |		Load_Top	At_Offset_0
00be e003       |    |		Load	0x0,0x3
00bf 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00c0 7006       |p   |		Jump_Nonzero	0xc7
00c1 00db       |    |		Load_Top	At_Offset_3
00c2 e002       |    |		Load	0x0,0x2
00c3 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
00c4 601f       |`   |		Indirect_Literal	Discrete,0xe4,{0x00000000, 0x00008848}
00c5 8219       |    |		Call	0x1,0x19
00c6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00c7 821a       |    |		Call	0x1,0x1a
00c8 6801       |h   |		Jump_Zero	0xca
00c9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00ca e004       |    |		Load	0x0,0x4
00cb 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00cc 4801       |H   |		Short_Literal	0x1
00cd 00da       |    |		Load_Top	At_Offset_2
00ce e005       |    |		Load	0x0,0x5
00cf 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00d0 e005       |    |		Load	0x0,0x5
00d1 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00d2 7005       |p   |		Jump_Nonzero	0xd8
00d3 00db       |    |		Load_Top	At_Offset_3
00d4 e002       |    |		Load	0x0,0x2
00d5 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
00d6 6009       |`   |		Indirect_Literal	Discrete,0xe0,{0x00000000, 0x00008847}
00d7 8219       |    |		Call	0x1,0x19
00d8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00d9			TRAP_00b8:
00d9 4884       |H   |		Short_Literal	0x84
00da 010f       |    |		Execute	Exception,Equal
00db 6801       |h   |		Jump_Zero	0xdd
00dc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00dd 0100       |    |		Execute	Exception,Raise
00de 0000 0000  |    |		.XXX[0x2]
00e0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008847}
00e4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008848}
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f5       |    |		.CONST	0x00f5								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0002       |    |		.CONST	0x0002								; Number of locals
00eb			INIT_00e8:
00eb e006       |    |		Load	0x0,0x6
00ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00ed 02c7       |    |		Declare_Variable	Any
00ee e5fd       |    |		Load	0x2,-0x3
00ef 4801       |H   |		Short_Literal	0x1
00f0 e5fe       |    |		Load	0x2,-0x2
00f1 e5ff       |    |		Load	0x2,-0x1
00f2 e007       |    |		Load	0x0,0x7
00f3 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
00f4 a402       |    |		Store_Unchecked	0x2,0x2
00f5			BODY_00e8:
00f5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00f6 0000 0000  |    |		.XXX[0x2]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0104       |    |		.CONST	0x0104								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0002       |    |		.CONST	0x0002								; Number of locals
00fb			INIT_00f8:
00fb e006       |    |		Load	0x0,0x6
00fc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00fd 02c7       |    |		Declare_Variable	Any
00fe e5fe       |    |		Load	0x2,-0x2
00ff 4801       |H   |		Short_Literal	0x1
0100 e5ff       |    |		Load	0x2,-0x1
0101 e007       |    |		Load	0x0,0x7
0102 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0103 a402       |    |		Store_Unchecked	0x2,0x2
0104			BODY_00f8:
0104 e5fe       |    |		Load	0x2,-0x2
0105 00d9       |    |		Load_Top	At_Offset_1
0106 e007       |    |		Load	0x0,0x7
0107 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0108 681b       |h   |		Jump_Zero	0x124
0109 e5fe       |    |		Load	0x2,-0x2
010a 4801       |H   |		Short_Literal	0x1
010b 4802       |H   |		Short_Literal	0x2
010c e002       |    |		Load	0x0,0x2
010d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
010e 035b       | [  |		Declare_Type	Array,Constrained
010f 0337       | 7  |		Declare_Variable	Array
0110 00da       |    |		Load_Top	At_Offset_2
0111 e002       |    |		Load	0x0,0x2
0112 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0113 e002       |    |		Load	0x0,0x2
0114 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0115 0119       |    |		Execute	Any,Check_In_Formal_Type
0116 4801       |H   |		Short_Literal	0x1
0117 00da       |    |		Load_Top	At_Offset_2
0118 01d6       |    |		Execute	Vector,Field_Write
0119 e5ff       |    |		Load	0x2,-0x1
011a e002       |    |		Load	0x0,0x2
011b 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
011c e002       |    |		Load	0x0,0x2
011d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
011e 0119       |    |		Execute	Any,Check_In_Formal_Type
011f 4802       |H   |		Short_Literal	0x2
0120 00da       |    |		Load_Top	At_Offset_2
0121 01d6       |    |		Execute	Vector,Field_Write
0122 6005       |`   |		Indirect_Literal	Discrete,0x128,{0x00000000, 0x0000882e}
0123 8219       |    |		Call	0x1,0x19
0124 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0125 0000 0000  |    |		.XXX[0x3]
0127 0000       |    |
0128 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000882e}
012c 0000 0000  |    |		.BLANK	0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0138       | 8  |		.CONST	0x0138								; Address of begin
0131 0176       | v  |		.CONST	0x0176								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 e006       |    |		Load	0x0,0x6
0134 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0135 0322       | "  |		Declare_Variable	Record
0136 00d8       |    |		Load_Top	At_Offset_0
0137 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0138			BODY_0130:
0138 e5fe       |    |		Load	0x2,-0x2
0139 e5ff       |    |		Load	0x2,-0x1
013a e007       |    |		Load	0x0,0x7
013b 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
013c 00d9       |    |		Load_Top	At_Offset_1
013d 017d       | }  |		Execute	Record,Structure_Write
013e 00d8       |    |		Load_Top	At_Offset_0
013f e007       |    |		Load	0x0,0x7
0140 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
0141 701b       |p   |		Jump_Nonzero	0x15d
0142 e5fe       |    |		Load	0x2,-0x2
0143 4801       |H   |		Short_Literal	0x1
0144 4802       |H   |		Short_Literal	0x2
0145 e002       |    |		Load	0x0,0x2
0146 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0147 035b       | [  |		Declare_Type	Array,Constrained
0148 0337       | 7  |		Declare_Variable	Array
0149 00da       |    |		Load_Top	At_Offset_2
014a e007       |    |		Load	0x0,0x7
014b 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
014c e002       |    |		Load	0x0,0x2
014d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
014e 0119       |    |		Execute	Any,Check_In_Formal_Type
014f 4801       |H   |		Short_Literal	0x1
0150 00da       |    |		Load_Top	At_Offset_2
0151 01d6       |    |		Execute	Vector,Field_Write
0152 e5ff       |    |		Load	0x2,-0x1
0153 e002       |    |		Load	0x0,0x2
0154 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0155 e002       |    |		Load	0x0,0x2
0156 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0157 0119       |    |		Execute	Any,Check_In_Formal_Type
0158 4802       |H   |		Short_Literal	0x2
0159 00da       |    |		Load_Top	At_Offset_2
015a 01d6       |    |		Execute	Vector,Field_Write
015b 6028       |`(  |		Indirect_Literal	Discrete,0x184,{0x00000000, 0x0000882f}
015c 8219       |    |		Call	0x1,0x19
015d 00d8       |    |		Load_Top	At_Offset_0
015e e008       |    |		Load	0x0,0x8
015f 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0160 e007       |    |		Load	0x0,0x7
0161 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0162 6812       |h   |		Jump_Zero	0x175
0163 e5fe       |    |		Load	0x2,-0x2
0164 4801       |H   |		Short_Literal	0x1
0165 4801       |H   |		Short_Literal	0x1
0166 e002       |    |		Load	0x0,0x2
0167 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0168 035b       | [  |		Declare_Type	Array,Constrained
0169 0337       | 7  |		Declare_Variable	Array
016a 00da       |    |		Load_Top	At_Offset_2
016b e007       |    |		Load	0x0,0x7
016c 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
016d e002       |    |		Load	0x0,0x2
016e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
016f 0119       |    |		Execute	Any,Check_In_Formal_Type
0170 4801       |H   |		Short_Literal	0x1
0171 00da       |    |		Load_Top	At_Offset_2
0172 01d6       |    |		Execute	Vector,Field_Write
0173 600c       |`   |		Indirect_Literal	Discrete,0x180,{0x00000000, 0x00008891}
0174 8219       |    |		Call	0x1,0x19
0175 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0176			TRAP_0130:
0176 010e       |    |		Execute	Exception,Is_Constraint_Error
0177 6806       |h   |		Jump_Zero	0x17e
0178 e5fe       |    |		Load	0x2,-0x2
0179 e002       |    |		Load	0x0,0x2
017a 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
017b 6004       |`   |		Indirect_Literal	Discrete,0x180,{0x00000000, 0x00008891}
017c 8219       |    |		Call	0x1,0x19
017d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
017e 0100       |    |		Execute	Exception,Raise
017f 0000       |    |		.XXX[0x1]
0180 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008891}
0184 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000882f}
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0193       |    |		.CONST	0x0193								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0003       |    |		.CONST	0x0003								; Number of locals
018b			INIT_0188:
018b e006       |    |		Load	0x0,0x6
018c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
018d 02c7       |    |		Declare_Variable	Any
018e 00d8       |    |		Load_Top	At_Offset_0
018f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0190 e006       |    |		Load	0x0,0x6
0191 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0192 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0193			BODY_0188:
0193 e006       |    |		Load	0x0,0x6
0194 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0195 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0196 00da       |    |		Load_Top	At_Offset_2
0197 0120       |    |		Execute	Any,Is_Value
0198 6803       |h   |		Jump_Zero	0x19c
0199 e006       |    |		Load	0x0,0x6
019a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
019b 7801       |x   |		Jump	0x19d
019c 00da       |    |		Load_Top	At_Offset_2
019d 602e       |`.  |		Indirect_Literal	Discrete,0x1cc,{0x00000000, 0x00004000}
019e e009       |    |		Load	0x0,0x9
019f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01a0 e004       |    |		Load	0x0,0x4
01a1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01a2 e006       |    |		Load	0x0,0x6
01a3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01a4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01a5 e5ff       |    |		Load	0x2,-0x1
01a6 e006       |    |		Load	0x0,0x6
01a7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01a8 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
01a9 c402       |    |		Store	0x2,0x2
01aa 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01ab 00d8       |    |		Load_Top	At_Offset_0
01ac 6805       |h   |		Jump_Zero	0x1b2
01ad 00d9       |    |		Load_Top	At_Offset_1
01ae e006       |    |		Load	0x0,0x6
01af 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01b0 012e       | .  |		Execute	Any,Not_Equal
01b1 6812       |h   |		Jump_Zero	0x1c4
01b2 e5fe       |    |		Load	0x2,-0x2
01b3 4801       |H   |		Short_Literal	0x1
01b4 4801       |H   |		Short_Literal	0x1
01b5 e002       |    |		Load	0x0,0x2
01b6 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01b7 035b       | [  |		Declare_Type	Array,Constrained
01b8 0337       | 7  |		Declare_Variable	Array
01b9 00db       |    |		Load_Top	At_Offset_3
01ba e002       |    |		Load	0x0,0x2
01bb 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01bc e002       |    |		Load	0x0,0x2
01bd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01be 0119       |    |		Execute	Any,Check_In_Formal_Type
01bf 4801       |H   |		Short_Literal	0x1
01c0 00da       |    |		Load_Top	At_Offset_2
01c1 01d6       |    |		Execute	Vector,Field_Write
01c2 6005       |`   |		Indirect_Literal	Discrete,0x1c8,{0x00000000, 0x00008850}
01c3 8219       |    |		Call	0x1,0x19
01c4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01c5 0000 0000  |    |		.XXX[0x3]
01c7 0000       |    |
01c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008850}
01cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2
01d4 e007       |    |		Load	0x0,0x7
01d5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01d6 7013       |p   |		Jump_Nonzero	0x1ea
01d7 00db       |    |		Load_Top	At_Offset_3
01d8 4801       |H   |		Short_Literal	0x1
01d9 4801       |H   |		Short_Literal	0x1
01da e002       |    |		Load	0x0,0x2
01db 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01dc 035b       | [  |		Declare_Type	Array,Constrained
01dd 0337       | 7  |		Declare_Variable	Array
01de e5ff       |    |		Load	0x2,-0x1
01df e002       |    |		Load	0x0,0x2
01e0 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01e1 e002       |    |		Load	0x0,0x2
01e2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01e3 0119       |    |		Execute	Any,Check_In_Formal_Type
01e4 4801       |H   |		Short_Literal	0x1
01e5 00da       |    |		Load_Top	At_Offset_2
01e6 01d6       |    |		Execute	Vector,Field_Write
01e7 6020       |`   |		Indirect_Literal	Discrete,0x208,{0x00000000, 0x0000882d}
01e8 8219       |    |		Call	0x1,0x19
01e9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ea 00da       |    |		Load_Top	At_Offset_2
01eb e007       |    |		Load	0x0,0x7
01ec 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01ed 7012       |p   |		Jump_Nonzero	0x200
01ee 00db       |    |		Load_Top	At_Offset_3
01ef 4801       |H   |		Short_Literal	0x1
01f0 4801       |H   |		Short_Literal	0x1
01f1 e002       |    |		Load	0x0,0x2
01f2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01f3 035b       | [  |		Declare_Type	Array,Constrained
01f4 0337       | 7  |		Declare_Variable	Array
01f5 e5ff       |    |		Load	0x2,-0x1
01f6 e002       |    |		Load	0x0,0x2
01f7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01f8 e002       |    |		Load	0x0,0x2
01f9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01fa 0119       |    |		Execute	Any,Check_In_Formal_Type
01fb 4801       |H   |		Short_Literal	0x1
01fc 00da       |    |		Load_Top	At_Offset_2
01fd 01d6       |    |		Execute	Vector,Field_Write
01fe 6005       |`   |		Indirect_Literal	Discrete,0x204,{0x00000000, 0x00008830}
01ff 8219       |    |		Call	0x1,0x19
0200 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0201 0000 0000  |    |		.XXX[0x3]
0203 0000       |    |
0204 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008830}
0208 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000882d}
020c 0000 0000  |    |		.BLANK	0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 022d       | -  |		.CONST	0x022d								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0007       |    |		.CONST	0x0007								; Number of locals
0213			INIT_0210:
0213 e006       |    |		Load	0x0,0x6
0214 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0215 02c7       |    |		Declare_Variable	Any
0216 e5fd       |    |		Load	0x2,-0x3
0217 4800       |H   |		Short_Literal	0x0
0218 e5ff       |    |		Load	0x2,-0x1
0219 e007       |    |		Load	0x0,0x7
021a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
021b a402       |    |		Store_Unchecked	0x2,0x2
021c e006       |    |		Load	0x0,0x6
021d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
021e 02c7       |    |		Declare_Variable	Any
021f 00d8       |    |		Load_Top	At_Offset_0
0220 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0221 e006       |    |		Load	0x0,0x6
0222 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0223 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0224 02c7       |    |		Declare_Variable	Any
0225 00d8       |    |		Load_Top	At_Offset_0
0226 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0227 00e1       |    |		Load_Encached	Boolean_Cache
0228 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0229 e00a       |    |		Load	0x0,0xa
022a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
022b 029f 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Call
022d			BODY_0210:
022d e402       |    |		Load	0x2,0x2
022e e006       |    |		Load	0x0,0x6
022f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0230 6800       |h   |		Jump_Zero	0x231
0231 e5fd       |    |		Load	0x2,-0x3
0232 4800       |H   |		Short_Literal	0x0
0233 e402       |    |		Load	0x2,0x2
0234 e007       |    |		Load	0x0,0x7
0235 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0236 0092 033b  |   ;|		Action	Push_String_Extended,0x33b					; ".@'c(Comb_View)"
0238 01cc       |    |		Execute	Vector,Catenate
0239 e007       |    |		Load	0x0,0x7
023a 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
023b c404       |    |		Store	0x2,0x4
023c 00cf       |    |		Action	Mark_Auxiliary
023d 780d       |x   |		Jump	0x24b
023e e5fd       |    |		Load	0x2,-0x3
023f 4801       |H   |		Short_Literal	0x1
0240 e404       |    |		Load	0x2,0x4
0241 e007       |    |		Load	0x0,0x7
0242 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0243 c403       |    |		Store	0x2,0x3
0244 8407       |    |		Call	0x2,0x7
0245 e404       |    |		Load	0x2,0x4
0246 e006       |    |		Load	0x0,0x6
0247 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0248 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0249 c404       |    |		Store	0x2,0x4
024a 00c9       |    |		Action	Pop_Auxiliary_Loop
024b e404       |    |		Load	0x2,0x4
024c e006       |    |		Load	0x0,0x6
024d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
024e 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
024f 6fee       |o   |		Jump_Zero	0x23e
0250 00ce       |    |		Action	Pop_Auxiliary
0251 00da       |    |		Load_Top	At_Offset_2
0252 6804       |h   |		Jump_Zero	0x257
0253 4803       |H   |		Short_Literal	0x3
0254 00da       |    |		Load_Top	At_Offset_2
0255 e00a       |    |		Load	0x0,0xa
0256 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0257 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0264       | d  |		.CONST	0x0264								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0002       |    |		.CONST	0x0002								; Number of locals
025b			INIT_0258:
025b e006       |    |		Load	0x0,0x6
025c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
025d 02c7       |    |		Declare_Variable	Any
025e e5fd       |    |		Load	0x2,-0x3
025f e5fe       |    |		Load	0x2,-0x2
0260 e5ff       |    |		Load	0x2,-0x1
0261 e007       |    |		Load	0x0,0x7
0262 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0263 a402       |    |		Store_Unchecked	0x2,0x2
0264			BODY_0258:
0264 00d8       |    |		Load_Top	At_Offset_0
0265 e006       |    |		Load	0x0,0x6
0266 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0267 7016       |p   |		Jump_Nonzero	0x27e
0268 00d8       |    |		Load_Top	At_Offset_0
0269 e007       |    |		Load	0x0,0x7
026a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
026b 7012       |p   |		Jump_Nonzero	0x27e
026c e5fd       |    |		Load	0x2,-0x3
026d 4801       |H   |		Short_Literal	0x1
026e 4801       |H   |		Short_Literal	0x1
026f e002       |    |		Load	0x0,0x2
0270 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0271 035b       | [  |		Declare_Type	Array,Constrained
0272 0337       | 7  |		Declare_Variable	Array
0273 00da       |    |		Load_Top	At_Offset_2
0274 e002       |    |		Load	0x0,0x2
0275 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0276 e002       |    |		Load	0x0,0x2
0277 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0278 0119       |    |		Execute	Any,Check_In_Formal_Type
0279 4801       |H   |		Short_Literal	0x1
027a 00da       |    |		Load_Top	At_Offset_2
027b 01d6       |    |		Execute	Vector,Field_Write
027c 6003       |`   |		Indirect_Literal	Discrete,0x280,{0x00000000, 0x0000888f}
027d 8219       |    |		Call	0x1,0x19
027e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
027f 0000       |    |		.XXX[0x1]
0280 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000888f}
0284 0000 0000  |    |		.BLANK	0000[0x4]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028d       |    |		.CONST	0x028d								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0002       |    |		.CONST	0x0002								; Number of locals
028b			INIT_0288:
028b e00a       |    |		Load	0x0,0xa
028c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
028d			BODY_0288:
028d e5fe       |    |		Load	0x2,-0x2
028e e5ff       |    |		Load	0x2,-0x1
028f e00a       |    |		Load	0x0,0xa
0290 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0291 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0292 e5fd       |    |		Load	0x2,-0x3
0293 00d9       |    |		Load_Top	At_Offset_1
0294 e00a       |    |		Load	0x0,0xa
0295 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0296 4803       |H   |		Short_Literal	0x3
0297 00d9       |    |		Load_Top	At_Offset_1
0298 e00a       |    |		Load	0x0,0xa
0299 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
029a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
029b 0000 0000  |    |		.BLANK	0000[0x5]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a7       |    |		.CONST	0x02a7								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0002       |    |		.CONST	0x0002								; Number of locals
02a3			INIT_02a0:
02a3 e00b       |    |		Load	0x0,0xb
02a4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02a5 e00b       |    |		Load	0x0,0xb
02a6 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02a7			BODY_02a0:
02a7 4801       |H   |		Short_Literal	0x1
02a8 0092 033c  |   <|		Action	Push_String_Extended,0x33c					; "*system"
02aa 00da       |    |		Load_Top	At_Offset_2
02ab e001       |    |		Load	0x0,0x1
02ac 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
02ad 00ca       |    |		Action	Exit_Nullary_Function
02ae 0000 0000  |    |		.XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b8       |    |		.CONST	0x02b8								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0002       |    |		.CONST	0x0002								; Number of locals
02b3			INIT_02b0:
02b3 e006       |    |		Load	0x0,0x6
02b4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02b5 02c7       |    |		Declare_Variable	Any
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b8			BODY_02b0:
02b8 4801       |H   |		Short_Literal	0x1
02b9 0092 033d  |   =|		Action	Push_String_Extended,0x33d					; "<INHERIT_MODEL>"
02bb e5ff       |    |		Load	0x2,-0x1
02bc e001       |    |		Load	0x0,0x1
02bd 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
02be 6807       |h   |		Jump_Zero	0x2c6
02bf e5fd       |    |		Load	0x2,-0x3
02c0 4801       |H   |		Short_Literal	0x1
02c1 e5fe       |    |		Load	0x2,-0x2
02c2 e007       |    |		Load	0x0,0x7
02c3 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
02c4 c402       |    |		Store	0x2,0x2
02c5 7816       |x   |		Jump	0x2dc
02c6 4800       |H   |		Short_Literal	0x0
02c7 e5ff       |    |		Load	0x2,-0x1
02c8 4821       |H!  |		Short_Literal	0x21
02c9 e001       |    |		Load	0x0,0x1
02ca 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02cb 6807       |h   |		Jump_Zero	0x2d3
02cc e5fd       |    |		Load	0x2,-0x3
02cd 4801       |H   |		Short_Literal	0x1
02ce e5ff       |    |		Load	0x2,-0x1
02cf e007       |    |		Load	0x0,0x7
02d0 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02d1 c402       |    |		Store	0x2,0x2
02d2 7809       |x   |		Jump	0x2dc
02d3 e5fd       |    |		Load	0x2,-0x3
02d4 4801       |H   |		Short_Literal	0x1
02d5 0092 033e  |   >|		Action	Push_String_Extended,0x33e					; "!Model."
02d7 e5ff       |    |		Load	0x2,-0x1
02d8 01cc       |    |		Execute	Vector,Catenate
02d9 e007       |    |		Load	0x0,0x7
02da 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02db c402       |    |		Store	0x2,0x2
02dc e5fd       |    |		Load	0x2,-0x3
02dd 00d9       |    |		Load_Top	At_Offset_1
02de e007       |    |		Load	0x0,0x7
02df 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
02e0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02e1 0000 0000  |    |		.BLANK	0000[0x7]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f3       |    |		.CONST	0x02f3								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0002       |    |		.CONST	0x0002								; Number of locals
02eb			INIT_02e8:
02eb e5fd       |    |		Load	0x2,-0x3
02ec 00d8       |    |		Load_Top	At_Offset_0
02ed e403       |    |		Load	0x2,0x3
02ee e007       |    |		Load	0x0,0x7
02ef 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
02f0 e403       |    |		Load	0x2,0x3
02f1 e00c       |    |		Load	0x0,0xc
02f2 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02f3			BODY_02e8:
02f3 e403       |    |		Load	0x2,0x3
02f4 e5ff       |    |		Load	0x2,-0x1
02f5 012e       | .  |		Execute	Any,Not_Equal
02f6 683a       |h:  |		Jump_Zero	0x331
02f7 e5fd       |    |		Load	0x2,-0x3
02f8 e403       |    |		Load	0x2,0x3
02f9 e007       |    |		Load	0x0,0x7
02fa 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
02fb 7035       |p5  |		Jump_Nonzero	0x331
02fc e5fe       |    |		Load	0x2,-0x2
02fd 01db       |    |		Execute	Vector,Length
02fe 6832       |h2  |		Jump_Zero	0x331
02ff 4801       |H   |		Short_Literal	0x1
0300 00d9       |    |		Load_Top	At_Offset_1
0301 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0302 e5fe       |    |		Load	0x2,-0x2
0303 e001       |    |		Load	0x0,0x1
0304 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0305 682b       |h+  |		Jump_Zero	0x331
0306 4801       |H   |		Short_Literal	0x1
0307 a405       |    |		Store_Unchecked	0x2,0x5
0308 4801       |H   |		Short_Literal	0x1
0309 4803       |H   |		Short_Literal	0x3
030a e002       |    |		Load	0x0,0x2
030b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
030c 035b       | [  |		Declare_Type	Array,Constrained
030d 0337       | 7  |		Declare_Variable	Array
030e e5fe       |    |		Load	0x2,-0x2
030f e002       |    |		Load	0x0,0x2
0310 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0311 e002       |    |		Load	0x0,0x2
0312 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0313 0119       |    |		Execute	Any,Check_In_Formal_Type
0314 4801       |H   |		Short_Literal	0x1
0315 00da       |    |		Load_Top	At_Offset_2
0316 01d6       |    |		Execute	Vector,Field_Write
0317 e5ff       |    |		Load	0x2,-0x1
0318 e002       |    |		Load	0x0,0x2
0319 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
031a e002       |    |		Load	0x0,0x2
031b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
031c 0119       |    |		Execute	Any,Check_In_Formal_Type
031d 4802       |H   |		Short_Literal	0x2
031e 00da       |    |		Load_Top	At_Offset_2
031f 01d6       |    |		Execute	Vector,Field_Write
0320 e403       |    |		Load	0x2,0x3
0321 e002       |    |		Load	0x0,0x2
0322 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0323 e002       |    |		Load	0x0,0x2
0324 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0325 0119       |    |		Execute	Any,Check_In_Formal_Type
0326 4803       |H   |		Short_Literal	0x3
0327 00da       |    |		Load_Top	At_Offset_2
0328 01d6       |    |		Execute	Vector,Field_Write
0329 600a       |`   |		Indirect_Literal	Discrete,0x334,{0x00000000, 0x00008836}
032a e00a       |    |		Load	0x0,0xa
032b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
032c a406       |    |		Store_Unchecked	0x2,0x6
032d e5fd       |    |		Load	0x2,-0x3
032e e406       |    |		Load	0x2,0x6
032f e00a       |    |		Load	0x0,0xa
0330 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0331 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0332 0000 0000  |    |		.XXX[0x2]
0334 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008836}
0338 ; --------------------------------------------------------------------------------------
0338 ; STRING TABLE
0338 ; --------------------------------------------------------------------------------------
0338 0010       |    |		.STRTAB	0x0010->0x0340							; ">>"
0339 0010       |    |		.STRTAB	0x0010->0x0341							; "<<"
033a 0010       |    |		.STRTAB	0x0010->0x0342							; "Rci"
033b 0011       |    |		.STRTAB	0x0011->0x0343							; ".@'c(Comb_View)"
033c 001e       |    |		.STRTAB	0x001e->0x034b							; "*system"
033d 0023       | #  |		.STRTAB	0x0023->0x034e							; "<INHERIT_MODEL>"
033e 0030       | 0  |		.STRTAB	0x0030->0x0356							; "!Model."
033f 0035       | 5  |		.STREND 0x0035->0x0359
0340 3e3e 3c3c  |>><<|		.STRTAB_STRINGS
035a 0000 0000  |    |		.BLANK	0000[0x6]
0360 ; --------------------------------------------------------------------------------------
0360 ; Debug Table
0360 ; --------------------------------------------------------------------------------------
0360 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xcc94,0x0000,0x0001,0x0000
0366 0000 0000  |    |		.XXX[0x16]
0368 41b5 4000  |A @ |
036a 0202 c00f  |    |
036c 915f 500f  | _P |
036e 916f 5000  | oP |
0370 4264 4000  |Bd@ |
0372 0202 d000  |    |
0374 0000 000f  |    |
0376 9177 5800  | wX |
0378 43c1 7000  |C p |
037a 0202 e000  |    |
037c 0000 0000  |    |		.BLANK	0000[0x5]
0381 4800 0101  |H   |		.XXX[0x19]
0383 5007 c85d  |P  ]|
0385 1000 0000  |    |
0387 0007 c900  |    |
0389 cc03 e463  |   c|
038b 6400 0399  |d   |
038d 4100 7c8c  |A | |
038f 8c80 7c8d  |  | |
0391 3600 00bc  |6   |
0393 8600 3330  |  30|
0395 9e00 0000  |    |
0397 0000 f91c  |    |
0399 ec00       |    |
039a 0000 0000  |    |		.BLANK	0000[0x4]
039e 0472 aa02  | r  |		.XXX[0x11]
03a0 8000 ae82  |    |
03a2 0402 42c0  |  B |
03a4 0020 0f91  |    |
03a6 bbf0 0017  |    |
03a8 90c0 0666  |   f|
03aa 13c0 0000  |    |
03ac 0000 1f23  |   #|
03ae e320       |    |
03af 0000 0000  |    |		.BLANK	0000[0x4]
03b3 008e 5540  |  U@|		.XXX[0x16]
03b5 5000 15d0  |P   |
03b7 4080 4858  |@ HX|
03b9 0004 01f2  |    |
03bb 3bd9 0100  |;   |
03bd 00ae 8200  |    |
03bf 0000 001e  |    |
03c1 1802 6000  |  ` |
03c3 0000 0000  |    |
03c5 0000 0007  |    |
03c7 9e00 e800  |    |
03c9 0000 0000  |    |		.BLANK	0000[0x4]
03cd 0222 2230  | ""0|		.XXX[0x18]
03cf 0f91 d6d0  |    |
03d1 0000 0000  |    |
03d3 0000 0020  |    |
03d5 0000 0000  |    |
03d7 0000 0010  |    |
03d9 0047 2aa0  | G* |
03db 0000 0000  |    |
03dd 0000 0008  |    |
03df 0800 0574  |   t|
03e1 1000 0000  |    |
03e3 00f0 c013  |    |
03e5 0000 0000  |    |		.BLANK	0000[0x4]
03e9 003c f007  | <  |		.XXX[0x3]
03eb 4000       |@   |
03ec 0000 0000  |    |		.BLANK	0000[0x4]
03f0 1111 1180  |    |		.XXX[0x10]
03f2 7c8f cd00  ||   |
03f4 0000 0000  |    |
03f6 0000 0100  |    |
03f8 0000 0000  |    |
03fa 0000 0080  |    |
03fc 0239 5500  | 9U |
03fe 0000 0000  |    |