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

⟦dd472d78c⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦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 0278       | x  |		.CONST	0x0278								; 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 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0222       | "  |		.CONST	0x0222								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000d       |    |		.CONST	0x000d								; Number of locals
000b			INIT_0008:
000b e002       |    |		Load	0x0,0x2
000c 0322       | "  |		Declare_Variable	Record
000d 0092 0260  |   `|		Action	Push_String_Extended,0x260					; "icosahedron"
000f e003       |    |		Load	0x0,0x3
0010 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0011 00d9       |    |		Load_Top	At_Offset_1
0012 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0013 0092 0261  |   a|		Action	Push_String_Extended,0x261					; "ico"
0015 e003       |    |		Load	0x0,0x3
0016 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0017 00d9       |    |		Load_Top	At_Offset_1
0018 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0019 0092 0262  |   b|		Action	Push_String_Extended,0x262					; "dodecahedron"
001b e003       |    |		Load	0x0,0x3
001c 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
001d 00d9       |    |		Load_Top	At_Offset_1
001e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
001f 480c       |H   |		Short_Literal	0xc
0020 00d9       |    |		Load_Top	At_Offset_1
0021 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0022 481e       |H   |		Short_Literal	0x1e
0023 00d9       |    |		Load_Top	At_Offset_1
0024 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0025 4814       |H   |		Short_Literal	0x14
0026 00d9       |    |		Load_Top	At_Offset_1
0027 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0028 4800       |H   |		Short_Literal	0x0
0029 480b       |H   |		Short_Literal	0xb
002a e004       |    |		Load	0x0,0x4
002b 0334       | 4  |		Declare_Variable	Array,With_Constraint
002c e005       |    |		Load	0x0,0x5
002d 0322       | "  |		Declare_Variable	Record
002e 5a2d       |Z-  |		Indirect_Literal	Float,0x25c,0.0
002f 00d9       |    |		Load_Top	At_Offset_1
0030 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0031 5a2a       |Z*  |		Indirect_Literal	Float,0x25c,0.0
0032 00d9       |    |		Load_Top	At_Offset_1
0033 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0034 5a23       |Z#  |		Indirect_Literal	Float,0x258,-0.9510565
0035 00d9       |    |		Load_Top	At_Offset_1
0036 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0037 4800       |H   |		Short_Literal	0x0
0038 00da       |    |		Load_Top	At_Offset_2
0039 01d6       |    |		Execute	Vector,Field_Write
003a e005       |    |		Load	0x0,0x5
003b 0322       | "  |		Declare_Variable	Record
003c 5a1f       |Z   |		Indirect_Literal	Float,0x25c,0.0
003d 00d9       |    |		Load_Top	At_Offset_1
003e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
003f 5a14       |Z   |		Indirect_Literal	Float,0x254,0.8506507999999999
0040 00d9       |    |		Load_Top	At_Offset_1
0041 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0042 5a0d       |Z   |		Indirect_Literal	Float,0x250,-0.42532537
0043 00d9       |    |		Load_Top	At_Offset_1
0044 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0045 4801       |H   |		Short_Literal	0x1
0046 00da       |    |		Load_Top	At_Offset_2
0047 01d6       |    |		Execute	Vector,Field_Write
0048 e005       |    |		Load	0x0,0x5
0049 0322       | "  |		Declare_Variable	Record
004a 5a01       |Z   |		Indirect_Literal	Float,0x24c,0.80901698
004b 00d9       |    |		Load_Top	At_Offset_1
004c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
004d 59fa       |Y   |		Indirect_Literal	Float,0x248,0.26286556
004e 00d9       |    |		Load_Top	At_Offset_1
004f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0050 59ff       |Y   |		Indirect_Literal	Float,0x250,-0.42532537
0051 00d9       |    |		Load_Top	At_Offset_1
0052 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0053 4802       |H   |		Short_Literal	0x2
0054 00da       |    |		Load_Top	At_Offset_2
0055 01d6       |    |		Execute	Vector,Field_Write
0056 e005       |    |		Load	0x0,0x5
0057 0322       | "  |		Declare_Variable	Record
0058 59eb       |Y   |		Indirect_Literal	Float,0x244,0.5
0059 00d9       |    |		Load_Top	At_Offset_1
005a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
005b 59e4       |Y   |		Indirect_Literal	Float,0x240,-0.68819095
005c 00d9       |    |		Load_Top	At_Offset_1
005d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
005e 59f1       |Y   |		Indirect_Literal	Float,0x250,-0.42532537
005f 00d9       |    |		Load_Top	At_Offset_1
0060 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0061 4803       |H   |		Short_Literal	0x3
0062 00da       |    |		Load_Top	At_Offset_2
0063 01d6       |    |		Execute	Vector,Field_Write
0064 e005       |    |		Load	0x0,0x5
0065 0322       | "  |		Declare_Variable	Record
0066 59d5       |Y   |		Indirect_Literal	Float,0x23c,-0.5
0067 00d9       |    |		Load_Top	At_Offset_1
0068 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0069 59d6       |Y   |		Indirect_Literal	Float,0x240,-0.68819095
006a 00d9       |    |		Load_Top	At_Offset_1
006b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
006c 59e3       |Y   |		Indirect_Literal	Float,0x250,-0.42532537
006d 00d9       |    |		Load_Top	At_Offset_1
006e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
006f 4804       |H   |		Short_Literal	0x4
0070 00da       |    |		Load_Top	At_Offset_2
0071 01d6       |    |		Execute	Vector,Field_Write
0072 e005       |    |		Load	0x0,0x5
0073 0322       | "  |		Declare_Variable	Record
0074 59c3       |Y   |		Indirect_Literal	Float,0x238,-0.80901698
0075 00d9       |    |		Load_Top	At_Offset_1
0076 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0077 59d0       |Y   |		Indirect_Literal	Float,0x248,0.26286556
0078 00d9       |    |		Load_Top	At_Offset_1
0079 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
007a 59d5       |Y   |		Indirect_Literal	Float,0x250,-0.42532537
007b 00d9       |    |		Load_Top	At_Offset_1
007c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
007d 4805       |H   |		Short_Literal	0x5
007e 00da       |    |		Load_Top	At_Offset_2
007f 01d6       |    |		Execute	Vector,Field_Write
0080 e005       |    |		Load	0x0,0x5
0081 0322       | "  |		Declare_Variable	Record
0082 59c1       |Y   |		Indirect_Literal	Float,0x244,0.5
0083 00d9       |    |		Load_Top	At_Offset_1
0084 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0085 59ae       |Y   |		Indirect_Literal	Float,0x234,0.68819095
0086 00d9       |    |		Load_Top	At_Offset_1
0087 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0088 59a7       |Y   |		Indirect_Literal	Float,0x230,0.42532537
0089 00d9       |    |		Load_Top	At_Offset_1
008a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
008b 4806       |H   |		Short_Literal	0x6
008c 00da       |    |		Load_Top	At_Offset_2
008d 01d6       |    |		Execute	Vector,Field_Write
008e e005       |    |		Load	0x0,0x5
008f 0322       | "  |		Declare_Variable	Record
0090 59bb       |Y   |		Indirect_Literal	Float,0x24c,0.80901698
0091 00d9       |    |		Load_Top	At_Offset_1
0092 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0093 5998       |Y   |		Indirect_Literal	Float,0x22c,-0.26286556
0094 00d9       |    |		Load_Top	At_Offset_1
0095 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0096 5999       |Y   |		Indirect_Literal	Float,0x230,0.42532537
0097 00d9       |    |		Load_Top	At_Offset_1
0098 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0099 4807       |H   |		Short_Literal	0x7
009a 00da       |    |		Load_Top	At_Offset_2
009b 01d6       |    |		Execute	Vector,Field_Write
009c e005       |    |		Load	0x0,0x5
009d 0322       | "  |		Declare_Variable	Record
009e 59bd       |Y   |		Indirect_Literal	Float,0x25c,0.0
009f 00d9       |    |		Load_Top	At_Offset_1
00a0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00a1 5986       |Y   |		Indirect_Literal	Float,0x228,-0.8506507999999999
00a2 00d9       |    |		Load_Top	At_Offset_1
00a3 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00a4 598b       |Y   |		Indirect_Literal	Float,0x230,0.42532537
00a5 00d9       |    |		Load_Top	At_Offset_1
00a6 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00a7 4808       |H   |		Short_Literal	0x8
00a8 00da       |    |		Load_Top	At_Offset_2
00a9 01d6       |    |		Execute	Vector,Field_Write
00aa e005       |    |		Load	0x0,0x5
00ab 0322       | "  |		Declare_Variable	Record
00ac 598b       |Y   |		Indirect_Literal	Float,0x238,-0.80901698
00ad 00d9       |    |		Load_Top	At_Offset_1
00ae 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00af 597c       |Y|  |		Indirect_Literal	Float,0x22c,-0.26286556
00b0 00d9       |    |		Load_Top	At_Offset_1
00b1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00b2 597d       |Y}  |		Indirect_Literal	Float,0x230,0.42532537
00b3 00d9       |    |		Load_Top	At_Offset_1
00b4 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00b5 4809       |H   |		Short_Literal	0x9
00b6 00da       |    |		Load_Top	At_Offset_2
00b7 01d6       |    |		Execute	Vector,Field_Write
00b8 e005       |    |		Load	0x0,0x5
00b9 0322       | "  |		Declare_Variable	Record
00ba 5981       |Y   |		Indirect_Literal	Float,0x23c,-0.5
00bb 00d9       |    |		Load_Top	At_Offset_1
00bc 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00bd 5976       |Yv  |		Indirect_Literal	Float,0x234,0.68819095
00be 00d9       |    |		Load_Top	At_Offset_1
00bf 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00c0 596f       |Yo  |		Indirect_Literal	Float,0x230,0.42532537
00c1 00d9       |    |		Load_Top	At_Offset_1
00c2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00c3 480a       |H   |		Short_Literal	0xa
00c4 00da       |    |		Load_Top	At_Offset_2
00c5 01d6       |    |		Execute	Vector,Field_Write
00c6 e005       |    |		Load	0x0,0x5
00c7 0322       | "  |		Declare_Variable	Record
00c8 5993       |Y   |		Indirect_Literal	Float,0x25c,0.0
00c9 00d9       |    |		Load_Top	At_Offset_1
00ca 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00cb 5990       |Y   |		Indirect_Literal	Float,0x25c,0.0
00cc 00d9       |    |		Load_Top	At_Offset_1
00cd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00ce 5955       |YU  |		Indirect_Literal	Float,0x224,0.9510565
00cf 00d9       |    |		Load_Top	At_Offset_1
00d0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00d1 480b       |H   |		Short_Literal	0xb
00d2 00da       |    |		Load_Top	At_Offset_2
00d3 01d6       |    |		Execute	Vector,Field_Write
00d4 e006       |    |		Load	0x0,0x6
00d5 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00d6 00d9       |    |		Load_Top	At_Offset_1
00d7 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
00d8 4800       |H   |		Short_Literal	0x0
00d9 484f       |HO  |		Short_Literal	0x4f
00da e007       |    |		Load	0x0,0x7
00db 0334       | 4  |		Declare_Variable	Array,With_Constraint
00dc 4803       |H   |		Short_Literal	0x3
00dd 4800       |H   |		Short_Literal	0x0
00de 00da       |    |		Load_Top	At_Offset_2
00df 01d6       |    |		Execute	Vector,Field_Write
00e0 4800       |H   |		Short_Literal	0x0
00e1 4801       |H   |		Short_Literal	0x1
00e2 00da       |    |		Load_Top	At_Offset_2
00e3 01d6       |    |		Execute	Vector,Field_Write
00e4 4802       |H   |		Short_Literal	0x2
00e5 4802       |H   |		Short_Literal	0x2
00e6 00da       |    |		Load_Top	At_Offset_2
00e7 01d6       |    |		Execute	Vector,Field_Write
00e8 4801       |H   |		Short_Literal	0x1
00e9 4803       |H   |		Short_Literal	0x3
00ea 00da       |    |		Load_Top	At_Offset_2
00eb 01d6       |    |		Execute	Vector,Field_Write
00ec 4803       |H   |		Short_Literal	0x3
00ed 4804       |H   |		Short_Literal	0x4
00ee 00da       |    |		Load_Top	At_Offset_2
00ef 01d6       |    |		Execute	Vector,Field_Write
00f0 4800       |H   |		Short_Literal	0x0
00f1 4805       |H   |		Short_Literal	0x5
00f2 00da       |    |		Load_Top	At_Offset_2
00f3 01d6       |    |		Execute	Vector,Field_Write
00f4 4803       |H   |		Short_Literal	0x3
00f5 4806       |H   |		Short_Literal	0x6
00f6 00da       |    |		Load_Top	At_Offset_2
00f7 01d6       |    |		Execute	Vector,Field_Write
00f8 4802       |H   |		Short_Literal	0x2
00f9 4807       |H   |		Short_Literal	0x7
00fa 00da       |    |		Load_Top	At_Offset_2
00fb 01d6       |    |		Execute	Vector,Field_Write
00fc 4803       |H   |		Short_Literal	0x3
00fd 4808       |H   |		Short_Literal	0x8
00fe 00da       |    |		Load_Top	At_Offset_2
00ff 01d6       |    |		Execute	Vector,Field_Write
0100 4800       |H   |		Short_Literal	0x0
0101 4809       |H   |		Short_Literal	0x9
0102 00da       |    |		Load_Top	At_Offset_2
0103 01d6       |    |		Execute	Vector,Field_Write
0104 4804       |H   |		Short_Literal	0x4
0105 480a       |H   |		Short_Literal	0xa
0106 00da       |    |		Load_Top	At_Offset_2
0107 01d6       |    |		Execute	Vector,Field_Write
0108 4803       |H   |		Short_Literal	0x3
0109 480b       |H   |		Short_Literal	0xb
010a 00da       |    |		Load_Top	At_Offset_2
010b 01d6       |    |		Execute	Vector,Field_Write
010c 4803       |H   |		Short_Literal	0x3
010d 480c       |H   |		Short_Literal	0xc
010e 00da       |    |		Load_Top	At_Offset_2
010f 01d6       |    |		Execute	Vector,Field_Write
0110 4800       |H   |		Short_Literal	0x0
0111 480d       |H   |		Short_Literal	0xd
0112 00da       |    |		Load_Top	At_Offset_2
0113 01d6       |    |		Execute	Vector,Field_Write
0114 4805       |H   |		Short_Literal	0x5
0115 480e       |H   |		Short_Literal	0xe
0116 00da       |    |		Load_Top	At_Offset_2
0117 01d6       |    |		Execute	Vector,Field_Write
0118 4804       |H   |		Short_Literal	0x4
0119 480f       |H   |		Short_Literal	0xf
011a 00da       |    |		Load_Top	At_Offset_2
011b 01d6       |    |		Execute	Vector,Field_Write
011c 4803       |H   |		Short_Literal	0x3
011d 4810       |H   |		Short_Literal	0x10
011e 00da       |    |		Load_Top	At_Offset_2
011f 01d6       |    |		Execute	Vector,Field_Write
0120 4800       |H   |		Short_Literal	0x0
0121 4811       |H   |		Short_Literal	0x11
0122 00da       |    |		Load_Top	At_Offset_2
0123 01d6       |    |		Execute	Vector,Field_Write
0124 4801       |H   |		Short_Literal	0x1
0125 4812       |H   |		Short_Literal	0x12
0126 00da       |    |		Load_Top	At_Offset_2
0127 01d6       |    |		Execute	Vector,Field_Write
0128 4805       |H   |		Short_Literal	0x5
0129 4813       |H   |		Short_Literal	0x13
012a 00da       |    |		Load_Top	At_Offset_2
012b 01d6       |    |		Execute	Vector,Field_Write
012c 4803       |H   |		Short_Literal	0x3
012d 4814       |H   |		Short_Literal	0x14
012e 00da       |    |		Load_Top	At_Offset_2
012f 01d6       |    |		Execute	Vector,Field_Write
0130 4801       |H   |		Short_Literal	0x1
0131 4815       |H   |		Short_Literal	0x15
0132 00da       |    |		Load_Top	At_Offset_2
0133 01d6       |    |		Execute	Vector,Field_Write
0134 4806       |H   |		Short_Literal	0x6
0135 4816       |H   |		Short_Literal	0x16
0136 00da       |    |		Load_Top	At_Offset_2
0137 01d6       |    |		Execute	Vector,Field_Write
0138 480a       |H   |		Short_Literal	0xa
0139 4817       |H   |		Short_Literal	0x17
013a 00da       |    |		Load_Top	At_Offset_2
013b 01d6       |    |		Execute	Vector,Field_Write
013c 4803       |H   |		Short_Literal	0x3
013d 4818       |H   |		Short_Literal	0x18
013e 00da       |    |		Load_Top	At_Offset_2
013f 01d6       |    |		Execute	Vector,Field_Write
0140 4801       |H   |		Short_Literal	0x1
0141 4819       |H   |		Short_Literal	0x19
0142 00da       |    |		Load_Top	At_Offset_2
0143 01d6       |    |		Execute	Vector,Field_Write
0144 4802       |H   |		Short_Literal	0x2
0145 481a       |H   |		Short_Literal	0x1a
0146 00da       |    |		Load_Top	At_Offset_2
0147 01d6       |    |		Execute	Vector,Field_Write
0148 4806       |H   |		Short_Literal	0x6
0149 481b       |H   |		Short_Literal	0x1b
014a 00da       |    |		Load_Top	At_Offset_2
014b 01d6       |    |		Execute	Vector,Field_Write
014c 4803       |H   |		Short_Literal	0x3
014d 481c       |H   |		Short_Literal	0x1c
014e 00da       |    |		Load_Top	At_Offset_2
014f 01d6       |    |		Execute	Vector,Field_Write
0150 4802       |H   |		Short_Literal	0x2
0151 481d       |H   |		Short_Literal	0x1d
0152 00da       |    |		Load_Top	At_Offset_2
0153 01d6       |    |		Execute	Vector,Field_Write
0154 4807       |H   |		Short_Literal	0x7
0155 481e       |H   |		Short_Literal	0x1e
0156 00da       |    |		Load_Top	At_Offset_2
0157 01d6       |    |		Execute	Vector,Field_Write
0158 4806       |H   |		Short_Literal	0x6
0159 481f       |H   |		Short_Literal	0x1f
015a 00da       |    |		Load_Top	At_Offset_2
015b 01d6       |    |		Execute	Vector,Field_Write
015c 4803       |H   |		Short_Literal	0x3
015d 4820       |H   |		Short_Literal	0x20
015e 00da       |    |		Load_Top	At_Offset_2
015f 01d6       |    |		Execute	Vector,Field_Write
0160 4802       |H   |		Short_Literal	0x2
0161 4821       |H!  |		Short_Literal	0x21
0162 00da       |    |		Load_Top	At_Offset_2
0163 01d6       |    |		Execute	Vector,Field_Write
0164 4803       |H   |		Short_Literal	0x3
0165 4822       |H"  |		Short_Literal	0x22
0166 00da       |    |		Load_Top	At_Offset_2
0167 01d6       |    |		Execute	Vector,Field_Write
0168 4807       |H   |		Short_Literal	0x7
0169 4823       |H#  |		Short_Literal	0x23
016a 00da       |    |		Load_Top	At_Offset_2
016b 01d6       |    |		Execute	Vector,Field_Write
016c 4803       |H   |		Short_Literal	0x3
016d 4824       |H$  |		Short_Literal	0x24
016e 00da       |    |		Load_Top	At_Offset_2
016f 01d6       |    |		Execute	Vector,Field_Write
0170 4803       |H   |		Short_Literal	0x3
0171 4825       |H%  |		Short_Literal	0x25
0172 00da       |    |		Load_Top	At_Offset_2
0173 01d6       |    |		Execute	Vector,Field_Write
0174 4808       |H   |		Short_Literal	0x8
0175 4826       |H&  |		Short_Literal	0x26
0176 00da       |    |		Load_Top	At_Offset_2
0177 01d6       |    |		Execute	Vector,Field_Write
0178 4807       |H   |		Short_Literal	0x7
0179 4827       |H'  |		Short_Literal	0x27
017a 00da       |    |		Load_Top	At_Offset_2
017b 01d6       |    |		Execute	Vector,Field_Write
017c 4803       |H   |		Short_Literal	0x3
017d 4828       |H(  |		Short_Literal	0x28
017e 00da       |    |		Load_Top	At_Offset_2
017f 01d6       |    |		Execute	Vector,Field_Write
0180 4803       |H   |		Short_Literal	0x3
0181 4829       |H)  |		Short_Literal	0x29
0182 00da       |    |		Load_Top	At_Offset_2
0183 01d6       |    |		Execute	Vector,Field_Write
0184 4804       |H   |		Short_Literal	0x4
0185 482a       |H*  |		Short_Literal	0x2a
0186 00da       |    |		Load_Top	At_Offset_2
0187 01d6       |    |		Execute	Vector,Field_Write
0188 4808       |H   |		Short_Literal	0x8
0189 482b       |H+  |		Short_Literal	0x2b
018a 00da       |    |		Load_Top	At_Offset_2
018b 01d6       |    |		Execute	Vector,Field_Write
018c 4803       |H   |		Short_Literal	0x3
018d 482c       |H,  |		Short_Literal	0x2c
018e 00da       |    |		Load_Top	At_Offset_2
018f 01d6       |    |		Execute	Vector,Field_Write
0190 4804       |H   |		Short_Literal	0x4
0191 482d       |H-  |		Short_Literal	0x2d
0192 00da       |    |		Load_Top	At_Offset_2
0193 01d6       |    |		Execute	Vector,Field_Write
0194 4809       |H   |		Short_Literal	0x9
0195 482e       |H.  |		Short_Literal	0x2e
0196 00da       |    |		Load_Top	At_Offset_2
0197 01d6       |    |		Execute	Vector,Field_Write
0198 4808       |H   |		Short_Literal	0x8
0199 482f       |H/  |		Short_Literal	0x2f
019a 00da       |    |		Load_Top	At_Offset_2
019b 01d6       |    |		Execute	Vector,Field_Write
019c 4803       |H   |		Short_Literal	0x3
019d 4830       |H0  |		Short_Literal	0x30
019e 00da       |    |		Load_Top	At_Offset_2
019f 01d6       |    |		Execute	Vector,Field_Write
01a0 4804       |H   |		Short_Literal	0x4
01a1 4831       |H1  |		Short_Literal	0x31
01a2 00da       |    |		Load_Top	At_Offset_2
01a3 01d6       |    |		Execute	Vector,Field_Write
01a4 4805       |H   |		Short_Literal	0x5
01a5 4832       |H2  |		Short_Literal	0x32
01a6 00da       |    |		Load_Top	At_Offset_2
01a7 01d6       |    |		Execute	Vector,Field_Write
01a8 4809       |H   |		Short_Literal	0x9
01a9 4833       |H3  |		Short_Literal	0x33
01aa 00da       |    |		Load_Top	At_Offset_2
01ab 01d6       |    |		Execute	Vector,Field_Write
01ac 4803       |H   |		Short_Literal	0x3
01ad 4834       |H4  |		Short_Literal	0x34
01ae 00da       |    |		Load_Top	At_Offset_2
01af 01d6       |    |		Execute	Vector,Field_Write
01b0 4805       |H   |		Short_Literal	0x5
01b1 4835       |H5  |		Short_Literal	0x35
01b2 00da       |    |		Load_Top	At_Offset_2
01b3 01d6       |    |		Execute	Vector,Field_Write
01b4 480a       |H   |		Short_Literal	0xa
01b5 4836       |H6  |		Short_Literal	0x36
01b6 00da       |    |		Load_Top	At_Offset_2
01b7 01d6       |    |		Execute	Vector,Field_Write
01b8 4809       |H   |		Short_Literal	0x9
01b9 4837       |H7  |		Short_Literal	0x37
01ba 00da       |    |		Load_Top	At_Offset_2
01bb 01d6       |    |		Execute	Vector,Field_Write
01bc 4803       |H   |		Short_Literal	0x3
01bd 4838       |H8  |		Short_Literal	0x38
01be 00da       |    |		Load_Top	At_Offset_2
01bf 01d6       |    |		Execute	Vector,Field_Write
01c0 4805       |H   |		Short_Literal	0x5
01c1 4839       |H9  |		Short_Literal	0x39
01c2 00da       |    |		Load_Top	At_Offset_2
01c3 01d6       |    |		Execute	Vector,Field_Write
01c4 4801       |H   |		Short_Literal	0x1
01c5 483a       |H:  |		Short_Literal	0x3a
01c6 00da       |    |		Load_Top	At_Offset_2
01c7 01d6       |    |		Execute	Vector,Field_Write
01c8 480a       |H   |		Short_Literal	0xa
01c9 483b       |H;  |		Short_Literal	0x3b
01ca 00da       |    |		Load_Top	At_Offset_2
01cb 01d6       |    |		Execute	Vector,Field_Write
01cc 4803       |H   |		Short_Literal	0x3
01cd 483c       |H<  |		Short_Literal	0x3c
01ce 00da       |    |		Load_Top	At_Offset_2
01cf 01d6       |    |		Execute	Vector,Field_Write
01d0 480a       |H   |		Short_Literal	0xa
01d1 483d       |H=  |		Short_Literal	0x3d
01d2 00da       |    |		Load_Top	At_Offset_2
01d3 01d6       |    |		Execute	Vector,Field_Write
01d4 4806       |H   |		Short_Literal	0x6
01d5 483e       |H>  |		Short_Literal	0x3e
01d6 00da       |    |		Load_Top	At_Offset_2
01d7 01d6       |    |		Execute	Vector,Field_Write
01d8 480b       |H   |		Short_Literal	0xb
01d9 483f       |H?  |		Short_Literal	0x3f
01da 00da       |    |		Load_Top	At_Offset_2
01db 01d6       |    |		Execute	Vector,Field_Write
01dc 4803       |H   |		Short_Literal	0x3
01dd 4840       |H@  |		Short_Literal	0x40
01de 00da       |    |		Load_Top	At_Offset_2
01df 01d6       |    |		Execute	Vector,Field_Write
01e0 4806       |H   |		Short_Literal	0x6
01e1 4841       |HA  |		Short_Literal	0x41
01e2 00da       |    |		Load_Top	At_Offset_2
01e3 01d6       |    |		Execute	Vector,Field_Write
01e4 4807       |H   |		Short_Literal	0x7
01e5 4842       |HB  |		Short_Literal	0x42
01e6 00da       |    |		Load_Top	At_Offset_2
01e7 01d6       |    |		Execute	Vector,Field_Write
01e8 480b       |H   |		Short_Literal	0xb
01e9 4843       |HC  |		Short_Literal	0x43
01ea 00da       |    |		Load_Top	At_Offset_2
01eb 01d6       |    |		Execute	Vector,Field_Write
01ec 4803       |H   |		Short_Literal	0x3
01ed 4844       |HD  |		Short_Literal	0x44
01ee 00da       |    |		Load_Top	At_Offset_2
01ef 01d6       |    |		Execute	Vector,Field_Write
01f0 4807       |H   |		Short_Literal	0x7
01f1 4845       |HE  |		Short_Literal	0x45
01f2 00da       |    |		Load_Top	At_Offset_2
01f3 01d6       |    |		Execute	Vector,Field_Write
01f4 4808       |H   |		Short_Literal	0x8
01f5 4846       |HF  |		Short_Literal	0x46
01f6 00da       |    |		Load_Top	At_Offset_2
01f7 01d6       |    |		Execute	Vector,Field_Write
01f8 480b       |H   |		Short_Literal	0xb
01f9 4847       |HG  |		Short_Literal	0x47
01fa 00da       |    |		Load_Top	At_Offset_2
01fb 01d6       |    |		Execute	Vector,Field_Write
01fc 4803       |H   |		Short_Literal	0x3
01fd 4848       |HH  |		Short_Literal	0x48
01fe 00da       |    |		Load_Top	At_Offset_2
01ff 01d6       |    |		Execute	Vector,Field_Write
0200 4808       |H   |		Short_Literal	0x8
0201 4849       |HI  |		Short_Literal	0x49
0202 00da       |    |		Load_Top	At_Offset_2
0203 01d6       |    |		Execute	Vector,Field_Write
0204 4809       |H   |		Short_Literal	0x9
0205 484a       |HJ  |		Short_Literal	0x4a
0206 00da       |    |		Load_Top	At_Offset_2
0207 01d6       |    |		Execute	Vector,Field_Write
0208 480b       |H   |		Short_Literal	0xb
0209 484b       |HK  |		Short_Literal	0x4b
020a 00da       |    |		Load_Top	At_Offset_2
020b 01d6       |    |		Execute	Vector,Field_Write
020c 4803       |H   |		Short_Literal	0x3
020d 484c       |HL  |		Short_Literal	0x4c
020e 00da       |    |		Load_Top	At_Offset_2
020f 01d6       |    |		Execute	Vector,Field_Write
0210 4809       |H   |		Short_Literal	0x9
0211 484d       |HM  |		Short_Literal	0x4d
0212 00da       |    |		Load_Top	At_Offset_2
0213 01d6       |    |		Execute	Vector,Field_Write
0214 480a       |H   |		Short_Literal	0xa
0215 484e       |HN  |		Short_Literal	0x4e
0216 00da       |    |		Load_Top	At_Offset_2
0217 01d6       |    |		Execute	Vector,Field_Write
0218 480b       |H   |		Short_Literal	0xb
0219 484f       |HO  |		Short_Literal	0x4f
021a 00da       |    |		Load_Top	At_Offset_2
021b 01d6       |    |		Execute	Vector,Field_Write
021c e008       |    |		Load	0x0,0x8
021d 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
021e 00d9       |    |		Load_Top	At_Offset_1
021f 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0220 0129       | )  |		Execute	Any,Make_Visible
0221 00bf       |    |		Action	Accept_Activation
0222			BODY_0008:
0222 00bc       |    |		Action	Signal_Activated
0223 00bb       |    |		Action	Signal_Completion
0224 3fee 6f0e  |? o |		.DBL	0.9510565
0226 0a84 be40  |   @|
0228 bfeb 3888  |  8 |		.DBL	-0.8506507999999999
022a 06ca 1e9c  |    |
022c bfd0 d2ca  |    |		.DBL	-0.26286556
022e 11dc 7663  |  vc|
0230 3fdb 3887  |? 8 |		.DBL	0.42532537
0232 e693 c849  |   I|
0234 3fe6 05a9  |?   |		.DBL	0.68819095
0236 06f4 e6c7  |    |
0238 bfe9 e377  |   w|		.DBL	-0.80901698
023a 93e0 4728  |  G(|
023c bfe0 0000  |    |		.DBL	-0.5
023e 0000 0000  |    |
0240 bfe6 05a9  |    |		.DBL	-0.68819095
0242 06f4 e6c7  |    |
0244 3fe0 0000  |?   |		.DBL	0.5
0246 0000 0000  |    |
0248 3fd0 d2ca  |?   |		.DBL	0.26286556
024a 11dc 7663  |  vc|
024c 3fe9 e377  |?  w|		.DBL	0.80901698
024e 93e0 4728  |  G(|
0250 bfdb 3887  |  8 |		.DBL	-0.42532537
0252 e693 c849  |   I|
0254 3feb 3888  |? 8 |		.DBL	0.8506507999999999
0256 06ca 1e9c  |    |
0258 bfee 6f0e  |  o |		.DBL	-0.9510565
025a 0a84 be40  |   @|
025c 0000 0000  |    |		.DBL	0.0
025e 0000 0000  |    |
0260 ; --------------------------------------------------------------------------------------
0260 ; STRING TABLE
0260 ; --------------------------------------------------------------------------------------
0260 0008       |    |		.STRTAB	0x0008->0x0264							; "icosahedron"
0261 0011       |    |		.STRTAB	0x0011->0x0269							; "ico"
0262 0012       |    |		.STRTAB	0x0012->0x026b							; "dodecahedron"
0263 001c       |    |		.STREND 0x001c->0x0271
0264 6963 6f73  |icos|		.STRTAB_STRINGS
0271 0000 0000  |    |		.BLANK	0000[0x7]
0278 ; --------------------------------------------------------------------------------------
0278 ; Debug Table
0278 ; --------------------------------------------------------------------------------------
0278 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x6825,0x0000,0x0001,0x0001
027e 000b 0282  |    |		.DBG4T	0x000b,0x0282,0x8000,0x0000
0282 ; --------------------------------------------------------------------------------------
0282 ; Debug chain
0282 ; --------------------------------------------------------------------------------------
0282 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0284 000b       |    |		.DBGLNO	0x000b
0285 0000 0000  |    |		.BLANK	0000[0x17b]