DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

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 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: ┃ 5

⟦9c38b6fad⟧

    Length: 7543 (0x1d77)
    Names: »5«

Derivation

└─⟦a7d1ea751⟧ Bits:30000550 8mm tape, Rational 1000, !users!projects 94_04_11
    └─ ⟦129cab021⟧ »DATA« 
        └─⟦this⟧ 
└─⟦2f6cfab89⟧ Bits:30000547 8mm tape, Rational 1000, !projects 94-01-04
    └─ ⟦d65440be7⟧ »DATA« 
        └─⟦this⟧ 

Hex Dump

0x0000…0020 00 00 00 02 01 00 00 00 71 02 00 00 00 08 00 08 00 03 1d c5 80 63 80 0e 00 06 00 0b 54 45 53 54   ┆        q            c      TEST┆
0x0020…0040 5f 50 41 52 53 45 52 00 08 00 0a 54 45 53 54 5f 46 49 52 53 54 00 03 00 04 54 45 53 54 00 07 00   ┆_PARSER    TEST_FIRST    TEST   ┆
0x0040…0060 05 46 49 52 53 54 00 01 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 00 04 00 06 50 41 52 53 45 52 00   ┆ FIRST    BINARY_TREE    PARSER ┆
0x0060…0080 02 00 09 54 45 53 54 5f 54 52 45 45 00 05 00 0a 50 41 52 53 45 5f 53 48 4f 57 00 00 00 00 72 50   ┆   TEST_TREE    PARSE_SHOW    rP┆
0x0080…00a0 52 49 4d 41 52 59 20 3d 3e 20 54 52 55 45 2c 20 53 55 42 53 59 53 54 45 4d 20 3d 3e 20 20 38 37   ┆RIMARY => TRUE, SUBSYSTEM =>  87┆
0x00a0…00c0 37 31 35 39 30 32 39 38 39 39 32 37 38 2c 20 50 52 49 4d 41 52 59 5f 4e 41 4d 45 20 3d 3e 20 21   ┆7159029899278, PRIMARY_NAME => !┆
0x00c0…00e0 55 53 45 52 53 2e 43 48 41 55 56 49 4e 45 2e 50 52 4f 4a 45 54 2c 20 50 52 49 4d 41 52 59 5f 4d   ┆USERS.CHAUVINE.PROJET, PRIMARY_M┆
0x00e0…0100 41 43 48 49 4e 45 20 3d 3e 20 61 6e 63 6f 6c 69 65 02 00 00 19 ec 00 0b 42 49 4e 41 52 59 5f 54   ┆ACHINE => ancolie       BINARY_T┆
0x0100…0120 52 45 45 02 00 00 00 1c 00 01 00 00 00 40 00 03 1d c5 80 63 80 0e 00 00 00 09 00 00 00 4c 00 14   ┆REE          @     c         L  ┆
0x0120…0140 42 49 4e 41 52 59 5f 54 52 45 45 2e 49 53 5f 45 4d 50 54 59 3d 7a 94 7e 90 23 00 04 54 52 45 45   ┆BINARY_TREE.IS_EMPTY=z ~ #  TREE┆
0x0140…0160 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 17 00 10 53 54 41 4e 44 41 52   ┆   BINARY_TREE.OBJECT    STANDAR┆
0x0160…0180 44 2e 42 4f 4f 4c 45 41 4e 00 00 00 00 2a 00 00 00 79 00 1f 42 49 4e 41 52 59 5f 54 52 45 45 2e   ┆D.BOOLEAN    *   y  BINARY_TREE.┆
0x0180…01a0 47 45 54 5f 55 4e 44 45 52 5f 4c 45 46 54 5f 54 52 45 45 3d 7b 94 7e 90 23 00 0b 4f 46 5f 54 48   ┆GET_UNDER_LEFT_TREE={ ~ #  OF_TH┆
0x01a0…01c0 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00   ┆E_TREE   BINARY_TREE.OBJECT   $ ┆
0x01c0…01e0 13 54 48 45 5f 55 4e 44 45 52 5f 4c 45 46 54 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52   ┆ THE_UNDER_LEFT_TREE   BINARY_TR┆
0x01e0…0200 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 3e 00 00 00 71 00 1f 42 49 4e 41 52 59 5f 54 52 45 45   ┆EE.OBJECT     >   q  BINARY_TREE┆
0x0200…0220 2e 47 45 54 5f 55 4e 44 45 52 5f 4c 45 46 54 5f 54 52 45 45 3d 7b 94 7e 90 23 00 0b 4f 46 5f 54   ┆.GET_UNDER_LEFT_TREE={ ~ #  OF_T┆
0x0220…0240 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24   ┆HE_TREE   BINARY_TREE.OBJECT   $┆
0x0240…0260 00 0b 49 4e 5f 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45   ┆  IN_THE_TREE   BINARY_TREE.OBJE┆
0x0260…0280 43 54 00 00 00 00 00 2c 00 00 00 65 00 14 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 58 43 48 41 4e   ┆CT     ,   e  BINARY_TREE.EXCHAN┆
0x0280…02a0 47 45 3d 7b 94 7e 90 23 00 06 41 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f   ┆GE={ ~ #  A_TREE   BINARY_TREE.O┆
0x02a0…02c0 42 4a 45 43 54 00 7f 90 24 00 0f 54 4f 5f 41 4e 4f 54 48 45 52 5f 54 52 45 45 17 00 12 42 49 4e   ┆BJECT   $  TO_ANOTHER_TREE   BIN┆
0x02c0…02e0 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 30 00 00 00 68 00 15 42 49 4e 41 52   ┆ARY_TREE.OBJECT     0   h  BINAR┆
0x02e0…0300 59 5f 54 52 45 45 2e 47 45 54 5f 56 41 4c 55 45 3d 7b 94 7e 90 23 00 0b 4f 46 5f 54 48 45 5f 54   ┆Y_TREE.GET_VALUE={ ~ #  OF_THE_T┆
0x0300…0320 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00 0e 49 4e   ┆REE   BINARY_TREE.OBJECT   $  IN┆
0x0320…0340 5f 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 10 53 54 41 4e 44 41 52 44 2e 49 4e 54 45 47 45 52 00   ┆_THE_ELEMENT   STANDARD.INTEGER ┆
0x0340…0360 00 00 00 00 23 00 00 00 76 00 1f 42 49 4e 41 52 59 5f 54 52 45 45 2e 47 45 54 5f 55 4e 44 45 52   ┆    #   v  BINARY_TREE.GET_UNDER┆
0x0360…0380 5f 4c 45 46 54 5f 54 52 45 45 3d 7b 94 7e 90 23 00 08 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e   ┆_LEFT_TREE={ ~ #  THE_TREE   BIN┆
0x0380…03a0 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00 13 54 48 45 5f 55 4e 44 45 52 5f 4c   ┆ARY_TREE.OBJECT   $  THE_UNDER_L┆
0x03a0…03c0 45 46 54 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00   ┆EFT_TREE   BINARY_TREE.OBJECT   ┆
0x03c0…03e0 00 00 17 00 00 00 2b 00 16 42 49 4e 41 52 59 5f 54 52 45 45 2e 55 4e 44 45 52 5f 54 52 45 45 3b   ┆      +  BINARY_TREE.UNDER_TREE;┆
0x03e0…0400 99 6e 31 00 04 4c 45 46 54 31 00 05 52 49 47 48 54 00 00 00 00 25 00 00 00 6b 00 15 42 49 4e 41   ┆ n1  LEFT1  RIGHT    %   k  BINA┆
0x0400…0420 52 59 5f 54 52 45 45 2e 47 45 54 5f 56 41 4c 55 45 3d 7b 94 7e 90 23 00 0b 4f 46 5f 54 48 45 5f   ┆RY_TREE.GET_VALUE={ ~ #  OF_THE_┆
0x0420…0440 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00 0e 49   ┆TREE   BINARY_TREE.OBJECT   $  I┆
0x0440…0460 4e 5f 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d   ┆N_THE_ELEMENT   BINARY_TREE.ELEM┆
0x0460…0480 45 4e 54 00 00 00 00 00 37 00 00 00 9f 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07   ┆ENT     7      BINARY_TREEA ;*  ┆
0x0480…04a0 45 4c 45 4d 45 4e 54 99 71 3d 33 00 01 3c 00 7a 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47   ┆ELEMENT q=3  < z ~ #  LEFT#  RIG┆
0x04a0…04c0 48 54 17 00 10 53 54 41 4e 44 41 52 44 2e 49 4e 54 45 47 45 52 00 17 00 10 53 54 41 4e 44 41 52   ┆HT   STANDARD.INTEGER    STANDAR┆
0x04c0…04e0 44 2e 42 4f 4f 4c 45 41 4e 34 3d 2c 00 0d 50 52 49 4e 54 5f 45 4c 45 4d 45 4e 54 00 7b 94 7e 90   ┆D.BOOLEAN4=,  PRINT_ELEMENT { ~ ┆
0x04e0…0500 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45   ┆#  THE_ELEMENT   BINARY_TREE.ELE┆
0x0500…0520 4d 45 4e 54 00 17 00 03 50 55 54 7c 00 00 00 06 00 00 00 53 00 11 42 49 4e 41 52 59 5f 54 52 45   ┆MENT    PUT|       S  BINARY_TRE┆
0x0520…0540 45 2e 42 55 49 4c 44 3d 7a 94 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e   ┆E.BUILD=z ~ #  THE_ELEMENT   BIN┆
0x0540…0560 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e   ┆ARY_TREE.ELEMENT    BINARY_TREE.┆
0x0560…0580 4f 42 4a 45 43 54 00 00 00 00 3a 00 00 00 a5 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2f   ┆OBJECT    :      BINARY_TREEA ;/┆
0x0580…05a0 00 07 45 4c 45 4d 45 4e 54 99 67 3d 33 00 01 3c 00 7a 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52   ┆  ELEMENT g=3  < z ~ #  LEFT#  R┆
0x05a0…05c0 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 17 00 10 53 54   ┆IGHT   BINARY_TREE.ELEMENT    ST┆
0x05c0…05e0 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 3d 2c 00 0d 50 52 49 4e 54 5f 45 4c 45 4d 45 4e 54   ┆ANDARD.BOOLEAN4=,  PRINT_ELEMENT┆
0x05e0…0600 00 7b 94 7e 90 23 00 0a 54 48 45 5f 53 54 52 49 4e 47 17 00 0f 53 54 41 4e 44 41 52 44 2e 53 54   ┆ { ~ #  THE_STRING   STANDARD.ST┆
0x0600…0620 52 49 4e 47 00 17 00 0b 54 45 58 54 5f 49 4f 2e 50 55 54 7c 00 00 00 38 00 00 00 a2 00 0b 42 49   ┆RING    TEXT_IO.PUT|   8      BI┆
0x0620…0640 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45 4e 54 99 71 3d 33 00 01 3c 00 7a 94   ┆NARY_TREEA ;*  ELEMENT q=3  < z ┆
0x0640…0660 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 10 53 54 41 4e 44 41 52 44 2e 49 4e 54   ┆~ #  LEFT#  RIGHT   STANDARD.INT┆
0x0660…0680 45 47 45 52 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 3d 2c 00 0d 50 52 49   ┆EGER    STANDARD.BOOLEAN4=,  PRI┆
0x0680…06a0 4e 54 5f 45 4c 45 4d 45 4e 54 00 7b 94 7e 90 23 00 0a 54 48 45 5f 53 54 52 49 4e 47 17 00 0f 53   ┆NT_ELEMENT { ~ #  THE_STRING   S┆
0x06a0…06c0 54 41 4e 44 41 52 44 2e 53 54 52 49 4e 47 00 17 00 0b 54 45 58 54 5f 49 4f 2e 50 55 54 7c 00 00   ┆TANDARD.STRING    TEXT_IO.PUT|  ┆
0x06c0…06e0 00 07 00 00 00 59 00 1f 42 49 4e 41 52 59 5f 54 52 45 45 2e 47 45 54 5f 55 4e 44 45 52 5f 4c 45   ┆     Y  BINARY_TREE.GET_UNDER_LE┆
0x06e0…0700 46 54 5f 54 52 45 45 3d 7a 94 7e 90 23 00 04 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45   ┆FT_TREE=z ~ #  TREE   BINARY_TRE┆
0x0700…0720 45 2e 4f 42 4a 45 43 54 00 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00   ┆E.OBJECT    BINARY_TREE.OBJECT  ┆
0x0720…0740 00 00 02 00 00 00 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 3b 99 70 00 00   ┆         BINARY_TREE.OBJECT; p  ┆
0x0740…0760 00 14 00 00 00 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 3b 99 71 00 00 00   ┆        BINARY_TREE.OBJECT; q   ┆
0x0760…0780 31 00 00 00 73 00 10 42 49 4e 41 52 59 5f 54 52 45 45 2e 46 49 4e 44 3d 7a 94 7e 90 23 00 0b 54   ┆1   s  BINARY_TREE.FIND=z ~ #  T┆
0x0780…07a0 48 45 5f 45 4c 45 4d 45 4e 54 17 00 10 53 54 41 4e 44 41 52 44 2e 49 4e 54 45 47 45 52 00 7e 90   ┆HE_ELEMENT   STANDARD.INTEGER ~ ┆
0x07a0…07c0 23 00 0b 49 4e 5f 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a   ┆#  IN_THE_TREE   BINARY_TREE.OBJ┆
0x07c0…07e0 45 43 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 00 00 00 00 39 00 00 00 a5   ┆ECT    STANDARD.BOOLEAN    9    ┆
0x07e0…0800 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45 4e 54 99 71 3d 33 00 01   ┆  BINARY_TREEA ;*  ELEMENT q=3  ┆
0x0800…0820 3c 00 7a 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f 54   ┆< z ~ #  LEFT#  RIGHT   BINARY_T┆
0x0820…0840 52 45 45 2e 45 4c 45 4d 45 4e 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34   ┆REE.ELEMENT    STANDARD.BOOLEAN4┆
0x0840…0860 3d 2c 00 0d 50 52 49 4e 54 5f 45 4c 45 4d 45 4e 54 00 7b 94 7e 90 23 00 0a 54 48 45 5f 53 54 52   ┆=,  PRINT_ELEMENT { ~ #  THE_STR┆
0x0860…0880 49 4e 47 17 00 0f 53 54 41 4e 44 41 52 44 2e 53 54 52 49 4e 47 00 17 00 0b 54 45 58 54 5f 49 4f   ┆ING   STANDARD.STRING    TEXT_IO┆
0x0880…08a0 2e 50 55 54 7c 00 00 00 12 00 00 00 a5 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2b 00 07   ┆.PUT|          BINARY_TREEA ;+  ┆
0x08a0…08c0 45 4c 45 4d 45 4e 54 99 70 3d 33 00 01 3c 00 7a 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47   ┆ELEMENT p=3  < z ~ #  LEFT#  RIG┆
0x08c0…08e0 48 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 17 00 10 53 54 41 4e   ┆HT   BINARY_TREE.ELEMENT    STAN┆
0x08e0…0900 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 3d 33 00 01 3d 00 7a 94 7e 90 23 00 04 4c 45 46 54 23 00   ┆DARD.BOOLEAN4=3  = z ~ #  LEFT# ┆
0x0900…0920 05 52 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 17 00 10   ┆ RIGHT   BINARY_TREE.ELEMENT    ┆
0x0920…0940 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 7c 00 00 00 0e 00 00 00 a5 00 0b 42 49 4e 41   ┆STANDARD.BOOLEAN4|          BINA┆
0x0940…0960 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45 4e 54 99 71 3d 33 00 01 3c 00 7a 94 7e 90   ┆RY_TREEA ;*  ELEMENT q=3  < z ~ ┆
0x0960…0980 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c   ┆#  LEFT#  RIGHT   BINARY_TREE.EL┆
0x0980…09a0 45 4d 45 4e 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 3d 33 00 01 3d 00   ┆EMENT    STANDARD.BOOLEAN4=3  = ┆
0x09a0…09c0 7a 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45   ┆z ~ #  LEFT#  RIGHT   BINARY_TRE┆
0x09c0…09e0 45 2e 45 4c 45 4d 45 4e 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 7c 00   ┆E.ELEMENT    STANDARD.BOOLEAN4| ┆
0x09e0…0a00 00 00 35 00 00 00 51 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3d 33 00 01 3c 00 7a 94 7e 90   ┆  5   Q  BINARY_TREEA =3  < z ~ ┆
0x0a00…0a20 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 10 53 54 41 4e 44 41 52 44 2e 49 4e 54 45 47   ┆#  LEFT#  RIGHT   STANDARD.INTEG┆
0x0a20…0a40 45 52 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 7c 00 00 00 29 00 00 00 3c   ┆ER    STANDARD.BOOLEAN4|   )   <┆
0x0a40…0a60 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 44 49 53 50 4c 41 59 3d 7b 94 7e 90 23 00 08 54 48 45   ┆  BINARY_TREE.DISPLAY={ ~ #  THE┆
0x0a60…0a80 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 28   ┆_TREE   BINARY_TREE.OBJECT     (┆
0x0a80…0aa0 00 00 00 76 00 10 42 49 4e 41 52 59 5f 54 52 45 45 2e 46 49 4e 44 3d 7a 94 7e 90 23 00 0b 54 48   ┆   v  BINARY_TREE.FIND=z ~ #  TH┆
0x0aa0…0ac0 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00   ┆E_ELEMENT   BINARY_TREE.ELEMENT ┆
0x0ac0…0ae0 7e 90 23 00 0b 49 4e 5f 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f   ┆~ #  IN_THE_TREE   BINARY_TREE.O┆
0x0ae0…0b00 42 4a 45 43 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 00 00 00 00 2f 00 00   ┆BJECT    STANDARD.BOOLEAN    /  ┆
0x0b00…0b20 00 62 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 49 4e 53 45 52 54 3d 7b 94 7e 90 23 00 0b 54 48   ┆ b  BINARY_TREE.INSERT={ ~ #  TH┆
0x0b20…0b40 45 5f 45 4c 45 4d 45 4e 54 17 00 10 53 54 41 4e 44 41 52 44 2e 49 4e 54 45 47 45 52 00 7f 90 24   ┆E_ELEMENT   STANDARD.INTEGER   $┆
0x0b40…0b60 00 0b 49 4e 5f 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45   ┆  IN_THE_TREE   BINARY_TREE.OBJE┆
0x0b60…0b80 43 54 00 00 00 00 00 05 00 00 00 6c 00 15 42 49 4e 41 52 59 5f 54 52 45 45 2e 44 55 50 4c 49 43   ┆CT         l  BINARY_TREE.DUPLIC┆
0x0b80…0ba0 41 54 45 3d 7b 94 7e 90 23 00 0b 53 4f 55 52 43 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f   ┆ATE={ ~ #  SOURCE_TREE   BINARY_┆
0x0ba0…0bc0 54 52 45 45 2e 4f 42 4a 45 43 54 00 7e 90 23 00 10 44 45 53 54 49 4e 41 54 49 4f 4e 5f 54 52 45   ┆TREE.OBJECT ~ #  DESTINATION_TRE┆
0x0bc0…0be0 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 13 00 00 00 6c   ┆E   BINARY_TREE.OBJECT         l┆
0x0be0…0c00 00 15 42 49 4e 41 52 59 5f 54 52 45 45 2e 44 55 50 4c 49 43 41 54 45 3d 7b 94 7e 90 23 00 0b 53   ┆  BINARY_TREE.DUPLICATE={ ~ #  S┆
0x0c00…0c20 4f 55 52 43 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00   ┆OURCE_TREE   BINARY_TREE.OBJECT ┆
0x0c20…0c40 7f 90 24 00 10 44 45 53 54 49 4e 41 54 49 4f 4e 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54   ┆  $  DESTINATION_TREE   BINARY_T┆
0x0c40…0c60 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 27 00 00 00 65 00 12 42 49 4e 41 52 59 5f 54 52 45   ┆REE.OBJECT     '   e  BINARY_TRE┆
0x0c60…0c80 45 2e 49 4e 53 45 52 54 3d 7b 94 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49   ┆E.INSERT={ ~ #  THE_ELEMENT   BI┆
0x0c80…0ca0 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 7f 90 24 00 0b 49 4e 5f 54 48 45 5f 54 52   ┆NARY_TREE.ELEMENT   $  IN_THE_TR┆
0x0ca0…0cc0 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 26 00 00 00   ┆EE   BINARY_TREE.OBJECT     &   ┆
0x0cc0…0ce0 61 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45 4e 54 99 71 3d 33 00   ┆a  BINARY_TREEA ;*  ELEMENT q=3 ┆
0x0ce0…0d00 01 3c 00 7a 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f   ┆ < z ~ #  LEFT#  RIGHT   BINARY_┆
0x0d00…0d20 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e   ┆TREE.ELEMENT    STANDARD.BOOLEAN┆
0x0d20…0d40 34 7c 00 00 00 2b 00 00 00 7b 00 20 42 49 4e 41 52 59 5f 54 52 45 45 2e 47 45 54 5f 55 4e 44 45   ┆4|   +   {  BINARY_TREE.GET_UNDE┆
0x0d40…0d60 52 5f 52 49 47 48 54 5f 54 52 45 45 3d 7b 94 7e 90 23 00 0b 4f 46 5f 54 48 45 5f 54 52 45 45 17   ┆R_RIGHT_TREE={ ~ #  OF_THE_TREE ┆
0x0d60…0d80 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00 14 54 48 45 5f 55 4e   ┆  BINARY_TREE.OBJECT   $  THE_UN┆
0x0d80…0da0 44 45 52 5f 52 49 47 48 54 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a   ┆DER_RIGHT_TREE   BINARY_TREE.OBJ┆
0x0da0…0dc0 45 43 54 00 00 00 00 00 20 00 00 00 85 00 1a 42 49 4e 41 52 59 5f 54 52 45 45 2e 47 45 54 5f 55   ┆ECT            BINARY_TREE.GET_U┆
0x0dc0…0de0 4e 44 45 52 5f 54 52 45 45 3d 7a 94 7e 90 23 00 08 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41   ┆NDER_TREE=z ~ #  THE_TREE   BINA┆
0x0de0…0e00 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7e 90 23 00 0e 54 48 45 5f 55 4e 44 45 52 5f 54 52   ┆RY_TREE.OBJECT ~ #  THE_UNDER_TR┆
0x0e00…0e20 45 45 17 00 16 42 49 4e 41 52 59 5f 54 52 45 45 2e 55 4e 44 45 52 5f 54 52 45 45 00 17 00 12 42   ┆EE   BINARY_TREE.UNDER_TREE    B┆
0x0e20…0e40 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 03 00 00 00 2e 00 16 42 49 4e 41   ┆INARY_TREE.OBJECT        .  BINA┆
0x0e40…0e60 52 59 5f 54 52 45 45 2e 45 4d 50 54 59 5f 54 52 45 45 02 17 00 12 42 49 4e 41 52 59 5f 54 52 45   ┆RY_TREE.EMPTY_TREE    BINARY_TRE┆
0x0e60…0e80 45 2e 4f 42 4a 45 43 54 00 00 00 2d 00 00 00 10 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 7c   ┆E.OBJECT   -      BINARY_TREEA |┆
0x0e80…0ea0 00 00 00 36 00 00 00 9a 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45   ┆   6      BINARY_TREEA ;*  ELEME┆
0x0ea0…0ec0 4e 54 99 71 3d 33 00 01 3c 00 7a 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 10   ┆NT q=3  < z ~ #  LEFT#  RIGHT   ┆
0x0ec0…0ee0 53 54 41 4e 44 41 52 44 2e 49 4e 54 45 47 45 52 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f   ┆STANDARD.INTEGER    STANDARD.BOO┆
0x0ee0…0f00 4c 45 41 4e 34 3d 2c 00 0d 50 52 49 4e 54 5f 45 4c 45 4d 45 4e 54 00 7b 94 7e 90 23 00 0b 54 48   ┆LEAN4=,  PRINT_ELEMENT { ~ #  TH┆
0x0f00…0f20 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00   ┆E_ELEMENT   BINARY_TREE.ELEMENT ┆
0x0f20…0f40 35 7c 00 00 00 24 00 00 00 78 00 20 42 49 4e 41 52 59 5f 54 52 45 45 2e 47 45 54 5f 55 4e 44 45   ┆5|   $   x  BINARY_TREE.GET_UNDE┆
0x0f40…0f60 52 5f 52 49 47 48 54 5f 54 52 45 45 3d 7b 94 7e 90 23 00 08 54 48 45 5f 54 52 45 45 17 00 12 42   ┆R_RIGHT_TREE={ ~ #  THE_TREE   B┆
0x0f60…0f80 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00 14 54 48 45 5f 55 4e 44 45 52   ┆INARY_TREE.OBJECT   $  THE_UNDER┆
0x0f80…0fa0 5f 52 49 47 48 54 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54   ┆_RIGHT_TREE   BINARY_TREE.OBJECT┆
0x0fa0…0fc0 00 00 00 00 00 40 00 00 00 74 00 15 42 49 4e 41 52 59 5f 54 52 45 45 2e 44 55 50 4c 49 43 41 54   ┆     @   t  BINARY_TREE.DUPLICAT┆
0x0fc0…0fe0 45 3d 7b 94 7e 90 23 00 0f 54 48 45 5f 53 4f 55 52 43 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52   ┆E={ ~ #  THE_SOURCE_TREE   BINAR┆
0x0fe0…1000 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7d 90 25 00 14 54 48 45 5f 44 45 53 54 49 4e 41 54 49   ┆Y_TREE.OBJECT } %  THE_DESTINATI┆
0x1000…1020 4f 4e 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00   ┆ON_TREE   BINARY_TREE.OBJECT    ┆
0x1020…1040 00 19 00 00 00 74 00 15 42 49 4e 41 52 59 5f 54 52 45 45 2e 44 55 50 4c 49 43 41 54 45 3d 7b 94   ┆     t  BINARY_TREE.DUPLICATE={ ┆
0x1040…1060 7e 90 23 00 0f 54 48 45 5f 53 4f 55 52 43 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52   ┆~ #  THE_SOURCE_TREE   BINARY_TR┆
0x1060…1080 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00 14 54 48 45 5f 44 45 53 54 49 4e 41 54 49 4f 4e 5f 54   ┆EE.OBJECT   $  THE_DESTINATION_T┆
0x1080…10a0 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 16 00 00   ┆REE   BINARY_TREE.OBJECT        ┆
0x10a0…10c0 00 1d 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2b 00 07 45 4c 45 4d 45 4e 54 99 70 7c 00   ┆    BINARY_TREEA ;+  ELEMENT p| ┆
0x10c0…10e0 00 00 01 00 00 00 1d 00 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45 4e   ┆         BINARY_TREEA ;*  ELEMEN┆
0x10e0…1100 54 99 71 7c 00 00 00 04 00 00 00 3b 00 16 42 49 4e 41 52 59 5f 54 52 45 45 2e 49 4e 49 54 49 41   ┆T q|       ;  BINARY_TREE.INITIA┆
0x1100…1120 4c 49 5a 45 3d 7b 94 7f 90 24 00 04 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f   ┆LIZE={   $  TREE   BINARY_TREE.O┆
0x1120…1140 42 4a 45 43 54 00 00 00 00 00 32 00 00 00 41 00 18 42 49 4e 41 52 59 5f 54 52 45 45 2e 50 41 52   ┆BJECT     2   A  BINARY_TREE.PAR┆
0x1140…1160 43 4f 55 52 53 5f 47 52 44 3d 7b 94 7e 90 23 00 08 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41   ┆COURS_GRD={ ~ #  THE_TREE   BINA┆
0x1160…1180 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 34 00 00 00 90 00 10 42 49 4e 41 52 59   ┆RY_TREE.OBJECT     4      BINARY┆
0x1180…11a0 5f 54 52 45 45 2e 4e 4f 44 45 3b 99 72 39 90 1c 00 05 56 41 4c 55 45 66 17 00 10 53 54 41 4e 44   ┆_TREE.NODE; r9    VALUEf   STAND┆
0x11a0…11c0 41 52 44 2e 49 4e 54 45 47 45 52 00 00 39 90 1c 00 0f 55 4e 44 45 52 5f 4c 45 46 54 5f 54 52 45   ┆ARD.INTEGER  9    UNDER_LEFT_TRE┆
0x11c0…11e0 45 66 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 39 90 1c 00 10 55 4e   ┆Ef   BINARY_TREE.OBJECT  9    UN┆
0x11e0…1200 44 45 52 5f 52 49 47 48 54 5f 54 52 45 45 66 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42   ┆DER_RIGHT_TREEf   BINARY_TREE.OB┆
0x1200…1220 4a 45 43 54 00 00 00 00 00 00 00 2e 00 00 00 61 00 11 42 49 4e 41 52 59 5f 54 52 45 45 2e 42 55   ┆JECT       .   a  BINARY_TREE.BU┆
0x1220…1240 49 4c 44 3d 7b 94 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 10 53 54 41 4e 44 41 52   ┆ILD={ ~ #  THE_ELEMENT   STANDAR┆
0x1240…1260 44 2e 49 4e 54 45 47 45 52 00 7f 90 24 00 0b 49 4e 5f 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e   ┆D.INTEGER   $  IN_THE_TREE   BIN┆
0x1260…1280 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 11 00 00 00 50 00 15 42 49 4e 41 52   ┆ARY_TREE.OBJECT         P  BINAR┆
0x1280…12a0 59 5f 54 52 45 45 2e 47 45 54 5f 56 41 4c 55 45 3d 7a 94 7e 90 23 00 04 54 52 45 45 17 00 12 42   ┆Y_TREE.GET_VALUE=z ~ #  TREE   B┆
0x12a0…12c0 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45   ┆INARY_TREE.OBJECT    BINARY_TREE┆
0x12c0…12e0 2e 45 4c 45 4d 45 4e 54 00 00 00 00 21 00 00 00 64 00 11 42 49 4e 41 52 59 5f 54 52 45 45 2e 42   ┆.ELEMENT    !   d  BINARY_TREE.B┆
0x12e0…1300 55 49 4c 44 3d 7b 94 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e 41 52 59   ┆UILD={ ~ #  THE_ELEMENT   BINARY┆
0x1300…1320 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 7f 90 24 00 0b 49 4e 5f 54 48 45 5f 54 52 45 45 17 00   ┆_TREE.ELEMENT   $  IN_THE_TREE  ┆
0x1320…1340 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00 1c 00 00 00 50 00 11 42   ┆ BINARY_TREE.OBJECT         P  B┆
0x1340…1360 49 4e 41 52 59 5f 54 52 45 45 2e 56 41 4c 55 45 3d 7a 94 7e 90 23 00 08 54 48 45 5f 54 52 45 45   ┆INARY_TREE.VALUE=z ~ #  THE_TREE┆
0x1360…1380 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 17 00 13 42 49 4e 41 52 59 5f   ┆   BINARY_TREE.OBJECT    BINARY_┆
0x1380…13a0 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 00 00 00 1b 00 00 00 50 00 14 42 49 4e 41 52 59 5f 54 52   ┆TREE.ELEMENT        P  BINARY_TR┆
0x13a0…13c0 45 45 2e 49 53 5f 45 4d 50 54 59 3d 7a 94 7e 90 23 00 08 54 48 45 5f 54 52 45 45 17 00 12 42 49   ┆EE.IS_EMPTY=z ~ #  THE_TREE   BI┆
0x13c0…13e0 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f   ┆NARY_TREE.OBJECT    STANDARD.BOO┆
0x13e0…1400 4c 45 41 4e 00 00 00 00 0b 00 00 00 93 00 10 42 49 4e 41 52 59 5f 54 52 45 45 2e 4e 4f 44 45 3b   ┆LEAN           BINARY_TREE.NODE;┆
0x1400…1420 99 72 39 90 1c 00 05 56 41 4c 55 45 66 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d   ┆ r9    VALUEf   BINARY_TREE.ELEM┆
0x1420…1440 45 4e 54 00 00 39 90 1c 00 0f 55 4e 44 45 52 5f 4c 45 46 54 5f 54 52 45 45 66 17 00 12 42 49 4e   ┆ENT  9    UNDER_LEFT_TREEf   BIN┆
0x1440…1460 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 39 90 1c 00 10 55 4e 44 45 52 5f 52 49 47 48   ┆ARY_TREE.OBJECT  9    UNDER_RIGH┆
0x1460…1480 54 5f 54 52 45 45 66 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00   ┆T_TREEf   BINARY_TREE.OBJECT    ┆
0x1480…14a0 00 00 00 1d 00 00 00 18 00 14 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 56 45 52 46 4c 4f 57 37 00   ┆          BINARY_TREE.OVERFLOW7 ┆
0x14a0…14c0 00 00 00 18 00 00 00 3e 00 15 42 49 4e 41 52 59 5f 54 52 45 45 2e 43 4c 45 41 52 5f 4f 55 54 3d   ┆       >  BINARY_TREE.CLEAR_OUT=┆
0x14c0…14e0 7b 94 7f 90 24 00 08 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42   ┆{   $  THE_TREE   BINARY_TREE.OB┆
0x14e0…1500 4a 45 43 54 00 00 00 00 00 33 00 00 00 3d 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 44 49 53 50   ┆JECT     3   =  BINARY_TREE.DISP┆
0x1500…1520 4c 41 59 3d 7b 94 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 10 53 54 41 4e 44 41 52   ┆LAY={ ~ #  THE_ELEMENT   STANDAR┆
0x1520…1540 44 2e 49 4e 54 45 47 45 52 00 00 00 00 00 1a 00 00 00 75 00 16 42 49 4e 41 52 59 5f 54 52 45 45   ┆D.INTEGER         u  BINARY_TREE┆
0x1540…1560 2e 55 4e 44 45 52 5f 54 52 45 45 3d 7a 94 7e 90 23 00 08 54 48 45 5f 54 52 45 45 17 00 12 42 49   ┆.UNDER_TREE=z ~ #  THE_TREE   BI┆
0x1560…1580 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7e 90 23 00 0e 54 48 45 5f 55 4e 44 45 52 5f   ┆NARY_TREE.OBJECT ~ #  THE_UNDER_┆
0x1580…15a0 54 52 45 45 17 00 0a 55 4e 44 45 52 5f 54 52 45 45 00 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45   ┆TREE   UNDER_TREE    BINARY_TREE┆
0x15a0…15c0 2e 4f 42 4a 45 43 54 00 00 00 00 1f 00 00 00 31 00 16 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4d   ┆.OBJECT        1  BINARY_TREE.EM┆
0x15c0…15e0 50 54 59 5f 54 52 45 45 38 66 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00   ┆PTY_TREE8f   BINARY_TREE.OBJECT ┆
0x15e0…1600 07 00 00 00 0c 00 00 00 2e 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 3b 99 6b   ┆        .  BINARY_TREE.OBJECT; k┆
0x1600…1620 66 17 00 10 42 49 4e 41 52 59 5f 54 52 45 45 2e 4e 4f 44 45 00 00 00 00 00 00 22 00 00 00 64 00   ┆f   BINARY_TREE.NODE      "   d ┆
0x1620…1640 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 49 4e 53 45 52 54 3d 7b 94 7e 90 23 00 0b 54 48 45 5f 45   ┆ BINARY_TREE.INSERT={ ~ #  THE_E┆
0x1640…1660 4c 45 4d 45 4e 54 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00   ┆LEMENT   BINARY_TREE.OBJECT   $ ┆
0x1660…1680 0b 49 4e 5f 54 48 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43   ┆ IN_THE_TREE   BINARY_TREE.OBJEC┆
0x1680…16a0 54 00 00 00 00 00 3f 00 00 00 72 00 20 42 49 4e 41 52 59 5f 54 52 45 45 2e 47 45 54 5f 55 4e 44   ┆T     ?   r  BINARY_TREE.GET_UND┆
0x16a0…16c0 45 52 5f 52 49 47 48 54 5f 54 52 45 45 3d 7b 94 7e 90 23 00 0b 4f 46 5f 54 48 45 5f 54 52 45 45   ┆ER_RIGHT_TREE={ ~ #  OF_THE_TREE┆
0x16c0…16e0 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7f 90 24 00 0b 49 4e 5f 54 48   ┆   BINARY_TREE.OBJECT   $  IN_TH┆
0x16e0…1700 45 5f 54 52 45 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 00 00 00 00   ┆E_TREE   BINARY_TREE.OBJECT     ┆
0x1700…1720 0d 00 00 00 32 00 16 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4d 50 54 59 5f 54 52 45 45 38 66 17   ┆    2  BINARY_TREE.EMPTY_TREE8f ┆
0x1720…1740 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 09 07 00 00 00 3c 00 00 00 96 00   ┆  BINARY_TREE.OBJECT      <     ┆
0x1740…1760 0b 42 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45 4e 54 99 71 3d 2c 00 06 48   ┆ BINARY_TREEA ;*  ELEMENT q=,  H┆
0x1760…1780 41 4e 44 4c 45 00 7b 94 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e 41 52   ┆ANDLE { ~ #  THE_ELEMENT   BINAR┆
0x1780…17a0 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 34 3d 33 00 01 3c 00 7a 94 7e 90 23 00 04 4c 45 46   ┆Y_TREE.ELEMENT 4=3  < z ~ #  LEF┆
0x17a0…17c0 54 23 00 05 52 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00   ┆T#  RIGHT   BINARY_TREE.ELEMENT ┆
0x17c0…17e0 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 7c 00 00 00 3b 00 00 00 96 00 0b 42   ┆   STANDARD.BOOLEAN4|   ;      B┆
0x17e0…1800 49 4e 41 52 59 5f 54 52 45 45 41 8f 3b 2a 00 07 45 4c 45 4d 45 4e 54 99 71 3d 33 00 01 3c 00 7a   ┆INARY_TREEA ;*  ELEMENT q=3  < z┆
0x1800…1820 94 7e 90 23 00 04 4c 45 46 54 23 00 05 52 49 47 48 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45   ┆ ~ #  LEFT#  RIGHT   BINARY_TREE┆
0x1820…1840 2e 45 4c 45 4d 45 4e 54 00 17 00 10 53 54 41 4e 44 41 52 44 2e 42 4f 4f 4c 45 41 4e 34 3d 2c 00   ┆.ELEMENT    STANDARD.BOOLEAN4=, ┆
0x1840…1860 06 48 41 4e 44 4c 45 00 7b 94 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e 54 17 00 13 42 49 4e   ┆ HANDLE { ~ #  THE_ELEMENT   BIN┆
0x1860…1880 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 34 7c 00 00 00 15 00 00 00 5e 00 12 42 49 4e   ┆ARY_TREE.ELEMENT 4|       ^  BIN┆
0x1880…18a0 41 52 59 5f 54 52 45 45 2e 49 4e 53 45 52 54 3d 7b 94 7e 90 23 00 04 54 52 45 45 17 00 12 42 49   ┆ARY_TREE.INSERT={ ~ #  TREE   BI┆
0x18a0…18c0 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7e 90 23 00 0b 54 48 45 5f 45 4c 45 4d 45 4e   ┆NARY_TREE.OBJECT ~ #  THE_ELEMEN┆
0x18c0…18e0 54 17 00 13 42 49 4e 41 52 59 5f 54 52 45 45 2e 45 4c 45 4d 45 4e 54 00 00 00 00 00 0f 00 00 00   ┆T   BINARY_TREE.ELEMENT         ┆
0x18e0…1900 5e 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 49 4e 53 45 52 54 3d 7b 94 7f 90 24 00 04 54 52 45   ┆^  BINARY_TREE.INSERT={   $  TRE┆
0x1900…1920 45 17 00 12 42 49 4e 41 52 59 5f 54 52 45 45 2e 4f 42 4a 45 43 54 00 7e 90 23 00 0b 54 48 45 5f   ┆E   BINARY_TREE.OBJECT ~ #  THE_┆
[…truncated at 200 lines…]