001 *LBL0 21 00 002 STO0 35 00 003 / -24 004 FRC 16 44 005 RCL0 36 00 006 * -35 007 RTN 24 008 *LBLA 21 11 009 1 01 010 9 09 011 0 00 012 0 00 013 - -45 014 STOE 35 15 015 1 01 016 9 09 017 GSB0 23 00 018 STOA 35 11 019 7 07 020 * -35 021 1 01 022 + -55 023 1 01 024 9 09 025 / -24 026 INT 16 34 027 RCLA 36 11 028 1 01 029 1 01 030 * -35 031 X<>Y -41 032 - -45 033 4 04 034 + -55 035 2 02 036 9 09 037 GSB0 23 00 038 STOB 35 12 039 RCLE 36 15 040 4 04 041 / -24 042 INT 16 34 043 STOC 35 13 044 RCLE 36 15 045 + -55 046 3 03 047 1 01 048 + -55 049 RCLB 36 12 050 - -45 051 7 07 052 GSB0 23 00 053 2 02 054 5 05 055 X<>Y -41 056 - -45 057 RCLB 36 12 058 - -45 059 X<0? 16-45 060 GTO1 22 01 061 R/S 51 062 RTN 24 063 *LBL1 21 01 064 1 01 065 CHS -22 066 R/S 51 067 3 03 068 1 01 069 + -55 070 R/S 51 071 RTN 24 072 R/S 51 073 R/S 51