1 files changed, 4690 insertions, 0 deletions
diff --git a/arc/.traces/read-illegal-file b/arc/.traces/read-illegal-file
new file mode 100644
index 00000000..3d0e48b3
--- /dev/null
+++ b/arc/.traces/read-illegal-file
@@ -0,0 +1,4690 @@
+===: main
+c{0: 0 (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity))) -- nil
+c{0: 1 (((stdin channel-address)) <- ((init-channel)) ((1 literal))) -- nil
+c{0: 2 (((dummy terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal))) -- nil
+c{0: 3 (((r integer) (routine)) <- ((fork-helper)) ((read-file fn)) ((nil literal) (globals)) ((2000 literal) (limit)) ((stdin channel-address)) ((dummy terminal-address))) -- nil
+c{0: 4 (((c character)) <- ((copy)) ((i literal))) -- nil
+c{0: 5 (((x tagged-value)) <- ((save-type)) ((c character))) -- nil
+c{0: 6 (((stdin channel-address) (deref)) <- ((write)) ((stdin channel-address)) ((x tagged-value))) -- nil
+c{0: 7 (((sleep)) ((until-routine-done literal)) ((r integer) (routine))) -- nil
+c{1: 0 ✓ (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity)))
+c{1: 1 ✓ (((stdin channel-address)) <- ((init-channel)) ((1 literal)))
+c{1: 2 ✓ (((dummy terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal)))
+c{1: 3 ✓ (((r integer) (routine)) <- ((fork-helper)) ((read-file fn)) ((nil literal) (globals)) ((2000 literal) (limit)) ((stdin channel-address)) ((dummy terminal-address)))
+c{1: 4 ✓ (((c character)) <- ((copy)) ((i literal)))
+c{1: 5 ✓ (((x tagged-value)) <- ((save-type)) ((c character)))
+c{1: 6 ✓ (((stdin channel-address) (deref)) <- ((write)) ((stdin channel-address)) ((x tagged-value)))
+c{1: 7 ✓ (((sleep)) ((until-routine-done literal)) ((r integer) (routine)))
+cn0: convert-names in main
+cn0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity))) nil nil
+cn0: checking arg ((space literal))
+cn0: checking arg ((30 literal) (capacity))
+cn0: checking oarg ((default-space space-address))
+maybe-add: ((default-space space-address))
+cn0: (((stdin channel-address)) <- ((init-channel)) ((1 literal))) nil nil
+cn0: checking arg ((1 literal))
+cn0: checking oarg ((stdin channel-address))
+maybe-add: ((stdin channel-address))
+cn0: location for oarg ((stdin channel-address)): 1
+cn0: (((dummy terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal))) ((stdin 1)) nil
+cn0: checking arg ((20 literal))
+cn0: checking arg ((10 literal))
+cn0: checking oarg ((dummy terminal-address))
+maybe-add: ((dummy terminal-address))
+cn0: location for oarg ((dummy terminal-address)): 2
+cn0: (((r integer) (routine)) <- ((fork-helper)) ((read-file fn)) ((nil literal) (globals)) ((2000 literal) (limit)) ((stdin channel-address)) ((dummy terminal-address))) ((dummy 2) (stdin 1)) nil
+cn0: checking arg ((read-file fn))
+cn0: checking arg ((nil literal) (globals))
+cn0: checking arg ((2000 literal) (limit))
+cn0: checking arg ((stdin channel-address))
+maybe-add: ((stdin channel-address))
+cn0: checking arg ((dummy terminal-address))
+maybe-add: ((dummy terminal-address))
+cn0: checking oarg ((r integer) (routine))
+maybe-add: ((r integer) (routine))
+cn0: location for oarg ((r integer) (routine)): 3
+cn0: (((c character)) <- ((copy)) ((i literal))) ((dummy 2) (r 3) (stdin 1)) nil
+cn0: checking arg ((i literal))
+cn0: checking oarg ((c character))
+maybe-add: ((c character))
+cn0: location for oarg ((c character)): 4
+cn0: (((x tagged-value)) <- ((save-type)) ((c character))) ((c 4) (dummy 2) (r 3) (stdin 1)) nil
+cn0: checking arg ((c character))
+maybe-add: ((c character))
+cn0: checking oarg ((x tagged-value))
+maybe-add: ((x tagged-value))
+cn0: location for oarg ((x tagged-value)): 5
+cn0: (((stdin channel-address) (deref)) <- ((write)) ((stdin channel-address)) ((x tagged-value))) ((c 4) (dummy 2) (r 3) (stdin 1) (x 5)) nil
+cn0: checking arg ((stdin channel-address))
+maybe-add: ((stdin channel-address))
+cn0: checking arg ((x tagged-value))
+maybe-add: ((x tagged-value))
+cn0: checking oarg ((stdin channel-address) (deref))
+maybe-add: ((stdin channel-address) (deref))
+cn0: (((sleep)) ((until-routine-done literal)) ((r integer) (routine))) ((c 4) (dummy 2) (r 3) (stdin 1) (x 5)) nil
+cn0: checking arg ((until-routine-done literal))
+cn0: checking arg ((r integer) (routine))
+maybe-add: ((r integer) (routine))
+cn1: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity)))
+cn1: (((1 channel-address)) <- ((init-channel)) ((1 literal)))
+cn1: (((2 terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal)))
+cn1: (((3 integer) (routine)) <- ((fork-helper)) ((read-file fn)) ((nil literal) (globals)) ((2000 literal) (limit)) ((1 channel-address)) ((2 terminal-address)))
+cn1: (((4 character)) <- ((copy)) ((i literal)))
+cn1: (((5 tagged-value)) <- ((save-type)) ((4 character)))
+cn1: (((1 channel-address) (deref)) <- ((write)) ((1 channel-address)) ((5 tagged-value)))
+cn1: (((sleep)) ((until-routine-done literal)) ((3 integer) (routine)))
+schedule: main
+run: main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity)))
+run: main 0: 1000 => ((default-space space-address))
+run: main 1: (((1 channel-address)) <- ((init-channel)) ((1 literal)))
+run: init-channel/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: init-channel/main 0: 1031 => ((default-space space-address))
+run: init-channel/main 1: (((1 channel-address)) <- ((new)) ((channel literal)))
+run: init-channel/main 1: 1062 => ((1 channel-address))
+mem: ((1 channel-address)): 1033 <= 1062
+run: init-channel/main 2: (((2 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
+run: init-channel/main 2: 1062 => ((2 integer-address))
+mem: ((2 integer-address)): 1034 <= 1062
+run: init-channel/main 3: (((2 integer-address) (deref)) <- ((copy)) ((0 literal)))
+run: init-channel/main 3: 0 => ((2 integer-address) (deref))
+mem: ((2 integer-address) (deref)): 1062 <= 0
+run: init-channel/main 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
+run: init-channel/main 4: 1063 => ((3 integer-address))
+mem: ((3 integer-address)): 1035 <= 1063
+run: init-channel/main 5: (((3 integer-address) (deref)) <- ((copy)) ((0 literal)))
+run: init-channel/main 5: 0 => ((3 integer-address) (deref))
+mem: ((3 integer-address) (deref)): 1063 <= 0
+run: init-channel/main 6: (((4 integer)) <- ((next-input)))
+arg: nil 0 (1)
+run: init-channel/main 6: 1 => ((4 integer))
+mem: ((4 integer)): 1036 <= 1
+run: init-channel/main 7: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 1
+run: init-channel/main 7: 2 => ((4 integer))
+mem: ((4 integer)): 1036 <= 2
+run: init-channel/main 8: (((5 tagged-value-array-address-address)) <- ((get-address)) ((1 channel-address) (deref)) ((2 offset)))
+run: init-channel/main 8: 1064 => ((5 tagged-value-array-address-address))
+mem: ((5 tagged-value-array-address-address)): 1037 <= 1064
+run: init-channel/main 9: (((5 tagged-value-array-address-address) (deref)) <- ((new)) ((tagged-value-array literal)) ((4 integer)))
+mem: ((4 integer)) => 2
+run: init-channel/main 9: 1065 => ((5 tagged-value-array-address-address) (deref))
+mem: ((5 tagged-value-array-address-address) (deref)): 1064 <= 1065
+run: init-channel/main 10: (((reply)) ((1 channel-address)))
+mem: ((1 channel-address)) => 1062
+run: main 1: 1062 => ((1 channel-address))
+mem: ((1 channel-address)): 1002 <= 1062
+run: main 2: (((2 terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal)))
+run: init-fake-terminal/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity)))
+run: init-fake-terminal/main 0: 1070 => ((default-space space-address))
+run: init-fake-terminal/main 1: (((1 terminal-address)) <- ((new)) ((terminal literal)))
+run: init-fake-terminal/main 1: 1101 => ((1 terminal-address))
+mem: ((1 terminal-address)): 1072 <= 1101
+run: init-fake-terminal/main 2: (((2 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((1 offset)))
+run: init-fake-terminal/main 2: 1102 => ((2 integer-address))
+mem: ((2 integer-address)): 1073 <= 1102
+run: init-fake-terminal/main 3: (((2 integer-address) (deref)) <- ((next-input)))
+arg: nil 0 (20 10)
+run: init-fake-terminal/main 3: 20 => ((2 integer-address) (deref))
+mem: ((2 integer-address) (deref)): 1102 <= 20
+run: init-fake-terminal/main 4: (((3 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((0 offset)))
+run: init-fake-terminal/main 4: 1101 => ((3 integer-address))
+mem: ((3 integer-address)): 1074 <= 1101
+run: init-fake-terminal/main 5: (((3 integer-address) (deref)) <- ((next-input)))
+arg: nil 1 (20 10)
+run: init-fake-terminal/main 5: 10 => ((3 integer-address) (deref))
+mem: ((3 integer-address) (deref)): 1101 <= 10
+run: init-fake-terminal/main 6: (((4 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((2 offset)))
+run: init-fake-terminal/main 6: 1103 => ((4 integer-address))
+mem: ((4 integer-address)): 1075 <= 1103
+run: init-fake-terminal/main 7: (((4 integer-address) (deref)) <- ((copy)) ((0 literal)))
+run: init-fake-terminal/main 7: 0 => ((4 integer-address) (deref))
+mem: ((4 integer-address) (deref)): 1103 <= 0
+run: init-fake-terminal/main 8: (((5 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((3 offset)))
+run: init-fake-terminal/main 8: 1104 => ((5 integer-address))
+mem: ((5 integer-address)): 1076 <= 1104
+run: init-fake-terminal/main 9: (((5 integer-address) (deref)) <- ((copy)) ((0 literal)))
+run: init-fake-terminal/main 9: 0 => ((5 integer-address) (deref))
+mem: ((5 integer-address) (deref)): 1104 <= 0
+run: init-fake-terminal/main 10: (((6 integer)) <- ((multiply)) ((2 integer-address) (deref)) ((3 integer-address) (deref)))
+mem: ((2 integer-address) (deref)) => 20
+mem: ((3 integer-address) (deref)) => 10
+run: init-fake-terminal/main 10: 200 => ((6 integer))
+mem: ((6 integer)): 1077 <= 200
+run: init-fake-terminal/main 11: (((7 string-address-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((4 offset)))
+run: init-fake-terminal/main 11: 1105 => ((7 string-address-address))
+mem: ((7 string-address-address)): 1078 <= 1105
+run: init-fake-terminal/main 12: (((7 string-address-address) (deref)) <- ((new)) ((string literal)) ((6 integer)))
+mem: ((6 integer)) => 200
+run: init-fake-terminal/main 12: 1106 => ((7 string-address-address) (deref))
+mem: ((7 string-address-address) (deref)): 1105 <= 1106
+run: init-fake-terminal/main 13: (((clear-screen)) ((1 terminal-address)))
+mem: ((1 terminal-address)) => 1101
+run: clear-screen/init-fake-terminal/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: clear-screen/init-fake-terminal/main 0: 1307 => ((default-space space-address))
+run: clear-screen/init-fake-terminal/main 1: (((1 terminal-address)) <- ((next-input)))
+arg: nil 0 (1101)
+run: clear-screen/init-fake-terminal/main 1: 1101 => ((1 terminal-address))
+mem: ((1 terminal-address)): 1309 <= 1101
+run: clear-screen/init-fake-terminal/main 2: (((jump-unless)) ((1 terminal-address)) ((10 offset)))
+mem: ((1 terminal-address)) => 1101
+run: clear-screen/init-fake-terminal/main 3: (((2 string-address)) <- ((get)) ((1 terminal-address) (deref)) ((4 offset)))
+mem: ((1105 string-address) (raw)) => 1106
+run: clear-screen/init-fake-terminal/main 3: 1106 => ((2 string-address))
+mem: ((2 string-address)): 1310 <= 1106
+run: clear-screen/init-fake-terminal/main 4: (((3 integer)) <- ((length)) ((2 string-address) (deref)))
+array-len: ((2 string-address) (deref))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 4: 200 => ((3 integer))
+mem: ((3 integer)): 1311 <= 200
+run: clear-screen/init-fake-terminal/main 5: (((4 integer)) <- ((copy)) ((0 literal)))
+run: clear-screen/init-fake-terminal/main 5: 0 => ((4 integer))
+mem: ((4 integer)): 1312 <= 0
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 0
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 0
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1107 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1107
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1107 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 0
+run: clear-screen/init-fake-terminal/main 10: 1 => ((4 integer))
+mem: ((4 integer)): 1312 <= 1
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 1
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 1
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1108 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1108
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1108 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 1
+run: clear-screen/init-fake-terminal/main 10: 2 => ((4 integer))
+mem: ((4 integer)): 1312 <= 2
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 2
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 2
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1109 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1109
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1109 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 2
+run: clear-screen/init-fake-terminal/main 10: 3 => ((4 integer))
+mem: ((4 integer)): 1312 <= 3
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 3
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 3
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1110 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1110
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1110 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 3
+run: clear-screen/init-fake-terminal/main 10: 4 => ((4 integer))
+mem: ((4 integer)): 1312 <= 4
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 4
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 4
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1111 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1111
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1111 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 4
+run: clear-screen/init-fake-terminal/main 10: 5 => ((4 integer))
+mem: ((4 integer)): 1312 <= 5
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 5
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 5
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1112 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1112
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1112 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 5
+run: clear-screen/init-fake-terminal/main 10: 6 => ((4 integer))
+mem: ((4 integer)): 1312 <= 6
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 6
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 6
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1113 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1113
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1113 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 6
+run: clear-screen/init-fake-terminal/main 10: 7 => ((4 integer))
+mem: ((4 integer)): 1312 <= 7
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 7
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 7
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1114 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1114
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1114 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 7
+run: clear-screen/init-fake-terminal/main 10: 8 => ((4 integer))
+mem: ((4 integer)): 1312 <= 8
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 8
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 8
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1115 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1115
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1115 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 8
+run: clear-screen/init-fake-terminal/main 10: 9 => ((4 integer))
+mem: ((4 integer)): 1312 <= 9
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 9
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 9
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1116 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1116
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1116 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 9
+run: clear-screen/init-fake-terminal/main 10: 10 => ((4 integer))
+mem: ((4 integer)): 1312 <= 10
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 10
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 10
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1117 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1117
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1117 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 10
+run: clear-screen/init-fake-terminal/main 10: 11 => ((4 integer))
+mem: ((4 integer)): 1312 <= 11
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 11
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 11
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1118 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1118
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1118 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 11
+run: clear-screen/init-fake-terminal/main 10: 12 => ((4 integer))
+mem: ((4 integer)): 1312 <= 12
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 12
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 12
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1119 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1119
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1119 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 12
+run: clear-screen/init-fake-terminal/main 10: 13 => ((4 integer))
+mem: ((4 integer)): 1312 <= 13
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 13
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 13
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1120 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1120
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1120 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 13
+run: clear-screen/init-fake-terminal/main 10: 14 => ((4 integer))
+mem: ((4 integer)): 1312 <= 14
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 14
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 14
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1121 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1121
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1121 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 14
+run: clear-screen/init-fake-terminal/main 10: 15 => ((4 integer))
+mem: ((4 integer)): 1312 <= 15
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 15
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 15
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1122 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1122
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1122 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 15
+run: clear-screen/init-fake-terminal/main 10: 16 => ((4 integer))
+mem: ((4 integer)): 1312 <= 16
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 16
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 16
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1123 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1123
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1123 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 16
+run: clear-screen/init-fake-terminal/main 10: 17 => ((4 integer))
+mem: ((4 integer)): 1312 <= 17
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 17
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 17
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1124 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1124
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1124 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 17
+run: clear-screen/init-fake-terminal/main 10: 18 => ((4 integer))
+mem: ((4 integer)): 1312 <= 18
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 18
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 18
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1125 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1125
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1125 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 18
+run: clear-screen/init-fake-terminal/main 10: 19 => ((4 integer))
+mem: ((4 integer)): 1312 <= 19
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 19
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 19
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1126 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1126
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1126 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 19
+run: clear-screen/init-fake-terminal/main 10: 20 => ((4 integer))
+mem: ((4 integer)): 1312 <= 20
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 20
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 20
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1127 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1127
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1127 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 20
+run: clear-screen/init-fake-terminal/main 10: 21 => ((4 integer))
+mem: ((4 integer)): 1312 <= 21
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 21
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 21
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1128 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1128
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1128 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 21
+run: clear-screen/init-fake-terminal/main 10: 22 => ((4 integer))
+mem: ((4 integer)): 1312 <= 22
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 22
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 22
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1129 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1129
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1129 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 22
+run: clear-screen/init-fake-terminal/main 10: 23 => ((4 integer))
+mem: ((4 integer)): 1312 <= 23
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 23
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 23
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1130 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1130
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1130 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 23
+run: clear-screen/init-fake-terminal/main 10: 24 => ((4 integer))
+mem: ((4 integer)): 1312 <= 24
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 24
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 24
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1131 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1131
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1131 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 24
+run: clear-screen/init-fake-terminal/main 10: 25 => ((4 integer))
+mem: ((4 integer)): 1312 <= 25
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 25
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 25
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1132 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1132
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1132 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 25
+run: clear-screen/init-fake-terminal/main 10: 26 => ((4 integer))
+mem: ((4 integer)): 1312 <= 26
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 26
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 26
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1133 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1133
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1133 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 26
+run: clear-screen/init-fake-terminal/main 10: 27 => ((4 integer))
+mem: ((4 integer)): 1312 <= 27
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 27
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 27
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1134 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1134
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1134 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 27
+run: clear-screen/init-fake-terminal/main 10: 28 => ((4 integer))
+mem: ((4 integer)): 1312 <= 28
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 28
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 28
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1135 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1135
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1135 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 28
+run: clear-screen/init-fake-terminal/main 10: 29 => ((4 integer))
+mem: ((4 integer)): 1312 <= 29
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 29
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 29
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1136 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1136
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1136 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 29
+run: clear-screen/init-fake-terminal/main 10: 30 => ((4 integer))
+mem: ((4 integer)): 1312 <= 30
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 30
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 30
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1137 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1137
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1137 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 30
+run: clear-screen/init-fake-terminal/main 10: 31 => ((4 integer))
+mem: ((4 integer)): 1312 <= 31
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 31
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 31
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1138 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1138
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1138 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 31
+run: clear-screen/init-fake-terminal/main 10: 32 => ((4 integer))
+mem: ((4 integer)): 1312 <= 32
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 32
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 32
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1139 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1139
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1139 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 32
+run: clear-screen/init-fake-terminal/main 10: 33 => ((4 integer))
+mem: ((4 integer)): 1312 <= 33
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 33
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 33
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1140 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1140
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1140 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 33
+run: clear-screen/init-fake-terminal/main 10: 34 => ((4 integer))
+mem: ((4 integer)): 1312 <= 34
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 34
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 34
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1141 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1141
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1141 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 34
+run: clear-screen/init-fake-terminal/main 10: 35 => ((4 integer))
+mem: ((4 integer)): 1312 <= 35
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 35
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 35
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1142 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1142
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1142 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 35
+run: clear-screen/init-fake-terminal/main 10: 36 => ((4 integer))
+mem: ((4 integer)): 1312 <= 36
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 36
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 36
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1143 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1143
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1143 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 36
+run: clear-screen/init-fake-terminal/main 10: 37 => ((4 integer))
+mem: ((4 integer)): 1312 <= 37
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 37
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 37
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1144 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1144
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1144 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 37
+run: clear-screen/init-fake-terminal/main 10: 38 => ((4 integer))
+mem: ((4 integer)): 1312 <= 38
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 38
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 38
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1145 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1145
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1145 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 38
+run: clear-screen/init-fake-terminal/main 10: 39 => ((4 integer))
+mem: ((4 integer)): 1312 <= 39
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 39
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 39
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1146 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1146
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1146 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 39
+run: clear-screen/init-fake-terminal/main 10: 40 => ((4 integer))
+mem: ((4 integer)): 1312 <= 40
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 40
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 40
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1147 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1147
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1147 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 40
+run: clear-screen/init-fake-terminal/main 10: 41 => ((4 integer))
+mem: ((4 integer)): 1312 <= 41
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 41
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 41
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1148 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1148
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1148 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 41
+run: clear-screen/init-fake-terminal/main 10: 42 => ((4 integer))
+mem: ((4 integer)): 1312 <= 42
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 42
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 42
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1149 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1149
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1149 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 42
+run: clear-screen/init-fake-terminal/main 10: 43 => ((4 integer))
+mem: ((4 integer)): 1312 <= 43
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 43
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 43
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1150 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1150
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1150 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 43
+run: clear-screen/init-fake-terminal/main 10: 44 => ((4 integer))
+mem: ((4 integer)): 1312 <= 44
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 44
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 44
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1151 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1151
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1151 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 44
+run: clear-screen/init-fake-terminal/main 10: 45 => ((4 integer))
+mem: ((4 integer)): 1312 <= 45
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 45
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 45
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1152 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1152
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1152 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 45
+run: clear-screen/init-fake-terminal/main 10: 46 => ((4 integer))
+mem: ((4 integer)): 1312 <= 46
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 46
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 46
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1153 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1153
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1153 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 46
+run: clear-screen/init-fake-terminal/main 10: 47 => ((4 integer))
+mem: ((4 integer)): 1312 <= 47
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 47
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 47
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1154 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1154
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1154 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 47
+run: clear-screen/init-fake-terminal/main 10: 48 => ((4 integer))
+mem: ((4 integer)): 1312 <= 48
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 48
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 48
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1155 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1155
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1155 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 48
+run: clear-screen/init-fake-terminal/main 10: 49 => ((4 integer))
+mem: ((4 integer)): 1312 <= 49
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 49
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 49
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1156 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1156
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1156 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 49
+run: clear-screen/init-fake-terminal/main 10: 50 => ((4 integer))
+mem: ((4 integer)): 1312 <= 50
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 50
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 50
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1157 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1157
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1157 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 50
+run: clear-screen/init-fake-terminal/main 10: 51 => ((4 integer))
+mem: ((4 integer)): 1312 <= 51
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 51
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 51
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1158 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1158
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1158 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 51
+run: clear-screen/init-fake-terminal/main 10: 52 => ((4 integer))
+mem: ((4 integer)): 1312 <= 52
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 52
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 52
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1159 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1159
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1159 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 52
+run: clear-screen/init-fake-terminal/main 10: 53 => ((4 integer))
+mem: ((4 integer)): 1312 <= 53
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 53
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 53
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1160 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1160
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1160 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 53
+run: clear-screen/init-fake-terminal/main 10: 54 => ((4 integer))
+mem: ((4 integer)): 1312 <= 54
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 54
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 54
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1161 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1161
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1161 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 54
+run: clear-screen/init-fake-terminal/main 10: 55 => ((4 integer))
+mem: ((4 integer)): 1312 <= 55
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 55
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 55
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1162 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1162
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1162 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 55
+run: clear-screen/init-fake-terminal/main 10: 56 => ((4 integer))
+mem: ((4 integer)): 1312 <= 56
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 56
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 56
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1163 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1163
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1163 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 56
+run: clear-screen/init-fake-terminal/main 10: 57 => ((4 integer))
+mem: ((4 integer)): 1312 <= 57
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 57
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 57
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1164 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1164
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1164 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 57
+run: clear-screen/init-fake-terminal/main 10: 58 => ((4 integer))
+mem: ((4 integer)): 1312 <= 58
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 58
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 58
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1165 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1165
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1165 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 58
+run: clear-screen/init-fake-terminal/main 10: 59 => ((4 integer))
+mem: ((4 integer)): 1312 <= 59
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 59
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 59
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1166 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1166
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1166 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 59
+run: clear-screen/init-fake-terminal/main 10: 60 => ((4 integer))
+mem: ((4 integer)): 1312 <= 60
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 60
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 60
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1167 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1167
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1167 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 60
+run: clear-screen/init-fake-terminal/main 10: 61 => ((4 integer))
+mem: ((4 integer)): 1312 <= 61
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 61
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 61
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1168 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1168
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1168 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 61
+run: clear-screen/init-fake-terminal/main 10: 62 => ((4 integer))
+mem: ((4 integer)): 1312 <= 62
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 62
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 62
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1169 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1169
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1169 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 62
+run: clear-screen/init-fake-terminal/main 10: 63 => ((4 integer))
+mem: ((4 integer)): 1312 <= 63
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 63
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 63
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1170 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1170
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1170 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 63
+run: clear-screen/init-fake-terminal/main 10: 64 => ((4 integer))
+mem: ((4 integer)): 1312 <= 64
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 64
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 64
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1171 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1171
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1171 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 64
+run: clear-screen/init-fake-terminal/main 10: 65 => ((4 integer))
+mem: ((4 integer)): 1312 <= 65
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 65
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 65
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1172 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1172
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1172 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 65
+run: clear-screen/init-fake-terminal/main 10: 66 => ((4 integer))
+mem: ((4 integer)): 1312 <= 66
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 66
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 66
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1173 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1173
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1173 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 66
+run: clear-screen/init-fake-terminal/main 10: 67 => ((4 integer))
+mem: ((4 integer)): 1312 <= 67
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 67
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 67
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1174 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1174
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1174 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 67
+run: clear-screen/init-fake-terminal/main 10: 68 => ((4 integer))
+mem: ((4 integer)): 1312 <= 68
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 68
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 68
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1175 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1175
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1175 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 68
+run: clear-screen/init-fake-terminal/main 10: 69 => ((4 integer))
+mem: ((4 integer)): 1312 <= 69
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 69
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 69
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1176 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1176
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1176 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 69
+run: clear-screen/init-fake-terminal/main 10: 70 => ((4 integer))
+mem: ((4 integer)): 1312 <= 70
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 70
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 70
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1177 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1177
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1177 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 70
+run: clear-screen/init-fake-terminal/main 10: 71 => ((4 integer))
+mem: ((4 integer)): 1312 <= 71
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 71
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 71
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1178 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1178
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1178 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 71
+run: clear-screen/init-fake-terminal/main 10: 72 => ((4 integer))
+mem: ((4 integer)): 1312 <= 72
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 72
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 72
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1179 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1179
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1179 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 72
+run: clear-screen/init-fake-terminal/main 10: 73 => ((4 integer))
+mem: ((4 integer)): 1312 <= 73
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 73
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 73
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1180 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1180
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1180 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 73
+run: clear-screen/init-fake-terminal/main 10: 74 => ((4 integer))
+mem: ((4 integer)): 1312 <= 74
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 74
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 74
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1181 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1181
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1181 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 74
+run: clear-screen/init-fake-terminal/main 10: 75 => ((4 integer))
+mem: ((4 integer)): 1312 <= 75
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 75
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 75
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1182 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1182
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1182 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 75
+run: clear-screen/init-fake-terminal/main 10: 76 => ((4 integer))
+mem: ((4 integer)): 1312 <= 76
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 76
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 76
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1183 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1183
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1183 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 76
+run: clear-screen/init-fake-terminal/main 10: 77 => ((4 integer))
+mem: ((4 integer)): 1312 <= 77
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 77
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 77
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1184 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1184
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1184 <= #\space
+schedule: scheduling clear-screen/init-fake-terminal/main for further processing
+schedule: clear-screen/init-fake-terminal/main
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 77
+run: clear-screen/init-fake-terminal/main 10: 78 => ((4 integer))
+mem: ((4 integer)): 1312 <= 78
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 78
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 78
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1185 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1185
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1185 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 78
+run: clear-screen/init-fake-terminal/main 10: 79 => ((4 integer))
+mem: ((4 integer)): 1312 <= 79
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 79
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 79
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1186 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1186
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1186 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 79
+run: clear-screen/init-fake-terminal/main 10: 80 => ((4 integer))
+mem: ((4 integer)): 1312 <= 80
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 80
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 80
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1187 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1187
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1187 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 80
+run: clear-screen/init-fake-terminal/main 10: 81 => ((4 integer))
+mem: ((4 integer)): 1312 <= 81
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 81
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 81
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1188 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1188
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1188 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 81
+run: clear-screen/init-fake-terminal/main 10: 82 => ((4 integer))
+mem: ((4 integer)): 1312 <= 82
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 82
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 82
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1189 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1189
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1189 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 82
+run: clear-screen/init-fake-terminal/main 10: 83 => ((4 integer))
+mem: ((4 integer)): 1312 <= 83
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 83
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 83
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1190 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1190
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1190 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 83
+run: clear-screen/init-fake-terminal/main 10: 84 => ((4 integer))
+mem: ((4 integer)): 1312 <= 84
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 84
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 84
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1191 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1191
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1191 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 84
+run: clear-screen/init-fake-terminal/main 10: 85 => ((4 integer))
+mem: ((4 integer)): 1312 <= 85
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 85
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 85
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1192 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1192
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1192 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 85
+run: clear-screen/init-fake-terminal/main 10: 86 => ((4 integer))
+mem: ((4 integer)): 1312 <= 86
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 86
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 86
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1193 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1193
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1193 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 86
+run: clear-screen/init-fake-terminal/main 10: 87 => ((4 integer))
+mem: ((4 integer)): 1312 <= 87
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 87
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 87
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1194 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1194
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1194 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 87
+run: clear-screen/init-fake-terminal/main 10: 88 => ((4 integer))
+mem: ((4 integer)): 1312 <= 88
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 88
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 88
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1195 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1195
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1195 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 88
+run: clear-screen/init-fake-terminal/main 10: 89 => ((4 integer))
+mem: ((4 integer)): 1312 <= 89
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 89
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 89
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1196 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1196
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1196 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 89
+run: clear-screen/init-fake-terminal/main 10: 90 => ((4 integer))
+mem: ((4 integer)): 1312 <= 90
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 90
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 90
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1197 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1197
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1197 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 90
+run: clear-screen/init-fake-terminal/main 10: 91 => ((4 integer))
+mem: ((4 integer)): 1312 <= 91
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 91
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 91
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1198 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1198
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1198 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 91
+run: clear-screen/init-fake-terminal/main 10: 92 => ((4 integer))
+mem: ((4 integer)): 1312 <= 92
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 92
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 92
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1199 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1199
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1199 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 92
+run: clear-screen/init-fake-terminal/main 10: 93 => ((4 integer))
+mem: ((4 integer)): 1312 <= 93
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 93
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 93
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1200 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1200
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1200 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 93
+run: clear-screen/init-fake-terminal/main 10: 94 => ((4 integer))
+mem: ((4 integer)): 1312 <= 94
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 94
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 94
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1201 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1201
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1201 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 94
+run: clear-screen/init-fake-terminal/main 10: 95 => ((4 integer))
+mem: ((4 integer)): 1312 <= 95
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 95
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 95
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1202 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1202
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1202 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 95
+run: clear-screen/init-fake-terminal/main 10: 96 => ((4 integer))
+mem: ((4 integer)): 1312 <= 96
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 96
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 96
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1203 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1203
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1203 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 96
+run: clear-screen/init-fake-terminal/main 10: 97 => ((4 integer))
+mem: ((4 integer)): 1312 <= 97
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 97
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 97
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1204 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1204
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1204 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 97
+run: clear-screen/init-fake-terminal/main 10: 98 => ((4 integer))
+mem: ((4 integer)): 1312 <= 98
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 98
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 98
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1205 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1205
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1205 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 98
+run: clear-screen/init-fake-terminal/main 10: 99 => ((4 integer))
+mem: ((4 integer)): 1312 <= 99
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 99
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 99
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1206 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1206
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1206 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 99
+run: clear-screen/init-fake-terminal/main 10: 100 => ((4 integer))
+mem: ((4 integer)): 1312 <= 100
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 100
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 100
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1207 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1207
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1207 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 100
+run: clear-screen/init-fake-terminal/main 10: 101 => ((4 integer))
+mem: ((4 integer)): 1312 <= 101
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 101
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 101
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1208 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1208
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1208 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 101
+run: clear-screen/init-fake-terminal/main 10: 102 => ((4 integer))
+mem: ((4 integer)): 1312 <= 102
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 102
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 102
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1209 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1209
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1209 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 102
+run: clear-screen/init-fake-terminal/main 10: 103 => ((4 integer))
+mem: ((4 integer)): 1312 <= 103
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 103
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 103
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1210 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1210
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1210 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 103
+run: clear-screen/init-fake-terminal/main 10: 104 => ((4 integer))
+mem: ((4 integer)): 1312 <= 104
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 104
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 104
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1211 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1211
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1211 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 104
+run: clear-screen/init-fake-terminal/main 10: 105 => ((4 integer))
+mem: ((4 integer)): 1312 <= 105
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 105
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 105
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1212 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1212
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1212 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 105
+run: clear-screen/init-fake-terminal/main 10: 106 => ((4 integer))
+mem: ((4 integer)): 1312 <= 106
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 106
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 106
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1213 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1213
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1213 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 106
+run: clear-screen/init-fake-terminal/main 10: 107 => ((4 integer))
+mem: ((4 integer)): 1312 <= 107
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 107
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 107
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1214 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1214
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1214 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 107
+run: clear-screen/init-fake-terminal/main 10: 108 => ((4 integer))
+mem: ((4 integer)): 1312 <= 108
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 108
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 108
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1215 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1215
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1215 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 108
+run: clear-screen/init-fake-terminal/main 10: 109 => ((4 integer))
+mem: ((4 integer)): 1312 <= 109
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 109
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 109
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1216 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1216
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1216 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 109
+run: clear-screen/init-fake-terminal/main 10: 110 => ((4 integer))
+mem: ((4 integer)): 1312 <= 110
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 110
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 110
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1217 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1217
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1217 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 110
+run: clear-screen/init-fake-terminal/main 10: 111 => ((4 integer))
+mem: ((4 integer)): 1312 <= 111
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 111
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 111
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1218 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1218
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1218 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 111
+run: clear-screen/init-fake-terminal/main 10: 112 => ((4 integer))
+mem: ((4 integer)): 1312 <= 112
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 112
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 112
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1219 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1219
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1219 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 112
+run: clear-screen/init-fake-terminal/main 10: 113 => ((4 integer))
+mem: ((4 integer)): 1312 <= 113
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 113
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 113
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1220 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1220
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1220 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 113
+run: clear-screen/init-fake-terminal/main 10: 114 => ((4 integer))
+mem: ((4 integer)): 1312 <= 114
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 114
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 114
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1221 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1221
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1221 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 114
+run: clear-screen/init-fake-terminal/main 10: 115 => ((4 integer))
+mem: ((4 integer)): 1312 <= 115
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 115
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 115
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1222 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1222
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1222 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 115
+run: clear-screen/init-fake-terminal/main 10: 116 => ((4 integer))
+mem: ((4 integer)): 1312 <= 116
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 116
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 116
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1223 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1223
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1223 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 116
+run: clear-screen/init-fake-terminal/main 10: 117 => ((4 integer))
+mem: ((4 integer)): 1312 <= 117
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 117
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 117
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1224 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1224
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1224 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 117
+run: clear-screen/init-fake-terminal/main 10: 118 => ((4 integer))
+mem: ((4 integer)): 1312 <= 118
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 118
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 118
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1225 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1225
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1225 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 118
+run: clear-screen/init-fake-terminal/main 10: 119 => ((4 integer))
+mem: ((4 integer)): 1312 <= 119
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 119
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 119
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1226 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1226
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1226 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 119
+run: clear-screen/init-fake-terminal/main 10: 120 => ((4 integer))
+mem: ((4 integer)): 1312 <= 120
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 120
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 120
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1227 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1227
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1227 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 120
+run: clear-screen/init-fake-terminal/main 10: 121 => ((4 integer))
+mem: ((4 integer)): 1312 <= 121
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 121
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 121
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1228 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1228
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1228 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 121
+run: clear-screen/init-fake-terminal/main 10: 122 => ((4 integer))
+mem: ((4 integer)): 1312 <= 122
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 122
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 122
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1229 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1229
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1229 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 122
+run: clear-screen/init-fake-terminal/main 10: 123 => ((4 integer))
+mem: ((4 integer)): 1312 <= 123
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 123
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 123
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1230 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1230
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1230 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 123
+run: clear-screen/init-fake-terminal/main 10: 124 => ((4 integer))
+mem: ((4 integer)): 1312 <= 124
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 124
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 124
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1231 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1231
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1231 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 124
+run: clear-screen/init-fake-terminal/main 10: 125 => ((4 integer))
+mem: ((4 integer)): 1312 <= 125
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 125
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 125
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1232 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1232
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1232 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 125
+run: clear-screen/init-fake-terminal/main 10: 126 => ((4 integer))
+mem: ((4 integer)): 1312 <= 126
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 126
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 126
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1233 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1233
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1233 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 126
+run: clear-screen/init-fake-terminal/main 10: 127 => ((4 integer))
+mem: ((4 integer)): 1312 <= 127
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 127
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 127
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1234 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1234
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1234 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 127
+run: clear-screen/init-fake-terminal/main 10: 128 => ((4 integer))
+mem: ((4 integer)): 1312 <= 128
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 128
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 128
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1235 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1235
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1235 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 128
+run: clear-screen/init-fake-terminal/main 10: 129 => ((4 integer))
+mem: ((4 integer)): 1312 <= 129
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 129
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 129
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1236 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1236
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1236 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 129
+run: clear-screen/init-fake-terminal/main 10: 130 => ((4 integer))
+mem: ((4 integer)): 1312 <= 130
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 130
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 130
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1237 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1237
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1237 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 130
+run: clear-screen/init-fake-terminal/main 10: 131 => ((4 integer))
+mem: ((4 integer)): 1312 <= 131
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 131
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 131
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1238 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1238
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1238 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 131
+run: clear-screen/init-fake-terminal/main 10: 132 => ((4 integer))
+mem: ((4 integer)): 1312 <= 132
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 132
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 132
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1239 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1239
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1239 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 132
+run: clear-screen/init-fake-terminal/main 10: 133 => ((4 integer))
+mem: ((4 integer)): 1312 <= 133
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 133
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 133
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1240 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1240
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1240 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 133
+run: clear-screen/init-fake-terminal/main 10: 134 => ((4 integer))
+mem: ((4 integer)): 1312 <= 134
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 134
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 134
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1241 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1241
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1241 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 134
+run: clear-screen/init-fake-terminal/main 10: 135 => ((4 integer))
+mem: ((4 integer)): 1312 <= 135
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 135
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 135
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1242 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1242
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1242 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 135
+run: clear-screen/init-fake-terminal/main 10: 136 => ((4 integer))
+mem: ((4 integer)): 1312 <= 136
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 136
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 136
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1243 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1243
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1243 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 136
+run: clear-screen/init-fake-terminal/main 10: 137 => ((4 integer))
+mem: ((4 integer)): 1312 <= 137
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 137
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 137
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1244 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1244
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1244 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 137
+run: clear-screen/init-fake-terminal/main 10: 138 => ((4 integer))
+mem: ((4 integer)): 1312 <= 138
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 138
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 138
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1245 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1245
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1245 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 138
+run: clear-screen/init-fake-terminal/main 10: 139 => ((4 integer))
+mem: ((4 integer)): 1312 <= 139
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 139
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 139
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1246 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1246
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1246 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 139
+run: clear-screen/init-fake-terminal/main 10: 140 => ((4 integer))
+mem: ((4 integer)): 1312 <= 140
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 140
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 140
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1247 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1247
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1247 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 140
+run: clear-screen/init-fake-terminal/main 10: 141 => ((4 integer))
+mem: ((4 integer)): 1312 <= 141
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 141
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 141
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1248 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1248
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1248 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 141
+run: clear-screen/init-fake-terminal/main 10: 142 => ((4 integer))
+mem: ((4 integer)): 1312 <= 142
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 142
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 142
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1249 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1249
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1249 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 142
+run: clear-screen/init-fake-terminal/main 10: 143 => ((4 integer))
+mem: ((4 integer)): 1312 <= 143
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 143
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 143
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1250 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1250
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1250 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 143
+run: clear-screen/init-fake-terminal/main 10: 144 => ((4 integer))
+mem: ((4 integer)): 1312 <= 144
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 144
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 144
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1251 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1251
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1251 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 144
+run: clear-screen/init-fake-terminal/main 10: 145 => ((4 integer))
+mem: ((4 integer)): 1312 <= 145
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 145
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 145
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1252 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1252
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1252 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 145
+run: clear-screen/init-fake-terminal/main 10: 146 => ((4 integer))
+mem: ((4 integer)): 1312 <= 146
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 146
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 146
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1253 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1253
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1253 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 146
+run: clear-screen/init-fake-terminal/main 10: 147 => ((4 integer))
+mem: ((4 integer)): 1312 <= 147
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 147
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 147
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1254 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1254
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1254 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 147
+run: clear-screen/init-fake-terminal/main 10: 148 => ((4 integer))
+mem: ((4 integer)): 1312 <= 148
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 148
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 148
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1255 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1255
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1255 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 148
+run: clear-screen/init-fake-terminal/main 10: 149 => ((4 integer))
+mem: ((4 integer)): 1312 <= 149
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 149
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 149
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1256 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1256
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1256 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 149
+run: clear-screen/init-fake-terminal/main 10: 150 => ((4 integer))
+mem: ((4 integer)): 1312 <= 150
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 150
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 150
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1257 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1257
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1257 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 150
+run: clear-screen/init-fake-terminal/main 10: 151 => ((4 integer))
+mem: ((4 integer)): 1312 <= 151
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 151
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 151
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1258 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1258
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1258 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 151
+run: clear-screen/init-fake-terminal/main 10: 152 => ((4 integer))
+mem: ((4 integer)): 1312 <= 152
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 152
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 152
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1259 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1259
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1259 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 152
+run: clear-screen/init-fake-terminal/main 10: 153 => ((4 integer))
+mem: ((4 integer)): 1312 <= 153
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 153
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 153
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1260 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1260
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1260 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 153
+run: clear-screen/init-fake-terminal/main 10: 154 => ((4 integer))
+mem: ((4 integer)): 1312 <= 154
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 154
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 154
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1261 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1261
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1261 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 154
+run: clear-screen/init-fake-terminal/main 10: 155 => ((4 integer))
+mem: ((4 integer)): 1312 <= 155
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 155
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 155
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1262 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1262
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1262 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 155
+run: clear-screen/init-fake-terminal/main 10: 156 => ((4 integer))
+mem: ((4 integer)): 1312 <= 156
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 156
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 156
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1263 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1263
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1263 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 156
+run: clear-screen/init-fake-terminal/main 10: 157 => ((4 integer))
+mem: ((4 integer)): 1312 <= 157
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 157
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 157
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1264 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1264
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1264 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 157
+run: clear-screen/init-fake-terminal/main 10: 158 => ((4 integer))
+mem: ((4 integer)): 1312 <= 158
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 158
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 158
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1265 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1265
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1265 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 158
+run: clear-screen/init-fake-terminal/main 10: 159 => ((4 integer))
+mem: ((4 integer)): 1312 <= 159
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 159
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 159
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1266 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1266
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1266 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 159
+run: clear-screen/init-fake-terminal/main 10: 160 => ((4 integer))
+mem: ((4 integer)): 1312 <= 160
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 160
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 160
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1267 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1267
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1267 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 160
+run: clear-screen/init-fake-terminal/main 10: 161 => ((4 integer))
+mem: ((4 integer)): 1312 <= 161
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+schedule: scheduling clear-screen/init-fake-terminal/main for further processing
+schedule: clear-screen/init-fake-terminal/main
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 161
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 161
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1268 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1268
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1268 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 161
+run: clear-screen/init-fake-terminal/main 10: 162 => ((4 integer))
+mem: ((4 integer)): 1312 <= 162
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 162
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 162
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1269 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1269
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1269 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 162
+run: clear-screen/init-fake-terminal/main 10: 163 => ((4 integer))
+mem: ((4 integer)): 1312 <= 163
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 163
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 163
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1270 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1270
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1270 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 163
+run: clear-screen/init-fake-terminal/main 10: 164 => ((4 integer))
+mem: ((4 integer)): 1312 <= 164
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 164
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 164
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1271 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1271
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1271 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 164
+run: clear-screen/init-fake-terminal/main 10: 165 => ((4 integer))
+mem: ((4 integer)): 1312 <= 165
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 165
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 165
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1272 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1272
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1272 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 165
+run: clear-screen/init-fake-terminal/main 10: 166 => ((4 integer))
+mem: ((4 integer)): 1312 <= 166
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 166
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 166
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1273 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1273
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1273 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 166
+run: clear-screen/init-fake-terminal/main 10: 167 => ((4 integer))
+mem: ((4 integer)): 1312 <= 167
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 167
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 167
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1274 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1274
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1274 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 167
+run: clear-screen/init-fake-terminal/main 10: 168 => ((4 integer))
+mem: ((4 integer)): 1312 <= 168
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 168
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 168
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1275 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1275
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1275 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 168
+run: clear-screen/init-fake-terminal/main 10: 169 => ((4 integer))
+mem: ((4 integer)): 1312 <= 169
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 169
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 169
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1276 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1276
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1276 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 169
+run: clear-screen/init-fake-terminal/main 10: 170 => ((4 integer))
+mem: ((4 integer)): 1312 <= 170
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 170
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 170
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1277 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1277
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1277 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 170
+run: clear-screen/init-fake-terminal/main 10: 171 => ((4 integer))
+mem: ((4 integer)): 1312 <= 171
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 171
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 171
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1278 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1278
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1278 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 171
+run: clear-screen/init-fake-terminal/main 10: 172 => ((4 integer))
+mem: ((4 integer)): 1312 <= 172
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 172
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 172
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1279 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1279
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1279 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 172
+run: clear-screen/init-fake-terminal/main 10: 173 => ((4 integer))
+mem: ((4 integer)): 1312 <= 173
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 173
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 173
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1280 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1280
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1280 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 173
+run: clear-screen/init-fake-terminal/main 10: 174 => ((4 integer))
+mem: ((4 integer)): 1312 <= 174
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 174
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 174
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1281 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1281
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1281 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 174
+run: clear-screen/init-fake-terminal/main 10: 175 => ((4 integer))
+mem: ((4 integer)): 1312 <= 175
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 175
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 175
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1282 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1282
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1282 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 175
+run: clear-screen/init-fake-terminal/main 10: 176 => ((4 integer))
+mem: ((4 integer)): 1312 <= 176
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 176
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 176
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1283 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1283
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1283 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 176
+run: clear-screen/init-fake-terminal/main 10: 177 => ((4 integer))
+mem: ((4 integer)): 1312 <= 177
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 177
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 177
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1284 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1284
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1284 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 177
+run: clear-screen/init-fake-terminal/main 10: 178 => ((4 integer))
+mem: ((4 integer)): 1312 <= 178
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 178
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 178
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1285 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1285
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1285 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 178
+run: clear-screen/init-fake-terminal/main 10: 179 => ((4 integer))
+mem: ((4 integer)): 1312 <= 179
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 179
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 179
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1286 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1286
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1286 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 179
+run: clear-screen/init-fake-terminal/main 10: 180 => ((4 integer))
+mem: ((4 integer)): 1312 <= 180
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 180
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 180
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1287 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1287
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1287 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 180
+run: clear-screen/init-fake-terminal/main 10: 181 => ((4 integer))
+mem: ((4 integer)): 1312 <= 181
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 181
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 181
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1288 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1288
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1288 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 181
+run: clear-screen/init-fake-terminal/main 10: 182 => ((4 integer))
+mem: ((4 integer)): 1312 <= 182
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 182
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 182
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1289 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1289
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1289 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 182
+run: clear-screen/init-fake-terminal/main 10: 183 => ((4 integer))
+mem: ((4 integer)): 1312 <= 183
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 183
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 183
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1290 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1290
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1290 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 183
+run: clear-screen/init-fake-terminal/main 10: 184 => ((4 integer))
+mem: ((4 integer)): 1312 <= 184
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 184
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 184
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1291 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1291
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1291 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 184
+run: clear-screen/init-fake-terminal/main 10: 185 => ((4 integer))
+mem: ((4 integer)): 1312 <= 185
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 185
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 185
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1292 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1292
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1292 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 185
+run: clear-screen/init-fake-terminal/main 10: 186 => ((4 integer))
+mem: ((4 integer)): 1312 <= 186
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 186
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 186
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1293 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1293
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1293 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 186
+run: clear-screen/init-fake-terminal/main 10: 187 => ((4 integer))
+mem: ((4 integer)): 1312 <= 187
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 187
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 187
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1294 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1294
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1294 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 187
+run: clear-screen/init-fake-terminal/main 10: 188 => ((4 integer))
+mem: ((4 integer)): 1312 <= 188
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 188
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 188
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1295 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1295
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1295 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 188
+run: clear-screen/init-fake-terminal/main 10: 189 => ((4 integer))
+mem: ((4 integer)): 1312 <= 189
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 189
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 189
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1296 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1296
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1296 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 189
+run: clear-screen/init-fake-terminal/main 10: 190 => ((4 integer))
+mem: ((4 integer)): 1312 <= 190
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 190
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 190
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1297 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1297
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1297 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 190
+run: clear-screen/init-fake-terminal/main 10: 191 => ((4 integer))
+mem: ((4 integer)): 1312 <= 191
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 191
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 191
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1298 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1298
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1298 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 191
+run: clear-screen/init-fake-terminal/main 10: 192 => ((4 integer))
+mem: ((4 integer)): 1312 <= 192
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 192
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 192
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1299 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1299
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1299 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 192
+run: clear-screen/init-fake-terminal/main 10: 193 => ((4 integer))
+mem: ((4 integer)): 1312 <= 193
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 193
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 193
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1300 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1300
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1300 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 193
+run: clear-screen/init-fake-terminal/main 10: 194 => ((4 integer))
+mem: ((4 integer)): 1312 <= 194
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 194
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 194
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1301 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1301
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1301 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 194
+run: clear-screen/init-fake-terminal/main 10: 195 => ((4 integer))
+mem: ((4 integer)): 1312 <= 195
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 195
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 195
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1302 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1302
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1302 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 195
+run: clear-screen/init-fake-terminal/main 10: 196 => ((4 integer))
+mem: ((4 integer)): 1312 <= 196
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 196
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 196
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1303 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1303
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1303 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 196
+run: clear-screen/init-fake-terminal/main 10: 197 => ((4 integer))
+mem: ((4 integer)): 1312 <= 197
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 197
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 197
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1304 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1304
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1304 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 197
+run: clear-screen/init-fake-terminal/main 10: 198 => ((4 integer))
+mem: ((4 integer)): 1312 <= 198
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 198
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 198
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1305 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1305
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1305 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 198
+run: clear-screen/init-fake-terminal/main 10: 199 => ((4 integer))
+mem: ((4 integer)): 1312 <= 199
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 199
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
+mem: ((5 boolean)): 1313 <= nil
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => nil
+run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
+mem: ((4 integer)) => 199
+array-len: ((1106 string) (raw))
+mem: ((1106 integer) (raw)) => 200
+run: clear-screen/init-fake-terminal/main 8: 1306 => ((1 byte-address))
+mem: ((1 byte-address)): 1309 <= 1306
+run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
+run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
+mem: ((1 byte-address) (deref)): 1306 <= #\space
+run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 199
+run: clear-screen/init-fake-terminal/main 10: 200 => ((4 integer))
+mem: ((4 integer)): 1312 <= 200
+run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
+run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
+mem: ((4 integer)) => 200
+mem: ((3 integer)) => 200
+run: clear-screen/init-fake-terminal/main 6: t => ((5 boolean))
+mem: ((5 boolean)): 1313 <= t
+run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
+mem: ((5 boolean)) => t
+run: clear-screen/init-fake-terminal/main 12: (((reply)))
+run: init-fake-terminal/main 14: (((reply)) ((1 terminal-address)))
+mem: ((1 terminal-address)) => 1101
+run: main 2: 1101 => ((2 terminal-address))
+mem: ((2 terminal-address)): 1003 <= 1101
+run: main 3: (((3 integer) (routine)) <- ((fork-helper)) ((read-file fn)) ((nil literal) (globals)) ((2000 literal) (limit)) ((1 channel-address)) ((2 terminal-address)))
+mem: ((1 channel-address)) => 1062
+mem: ((2 terminal-address)) => 1101
+run: main 3: 3 => ((3 integer) (routine))
+mem: ((3 integer) (routine)): 1004 <= 3
+run: main 4: (((4 character)) <- ((copy)) ((i literal)))
+run: main 4: #\i => ((4 character))
+mem: ((4 character)): 1005 <= #\i
+run: main 5: (((5 tagged-value)) <- ((save-type)) ((4 character)))
+mem: ((4 character)) => i
+run: main 5: #(tagged record (character #\i)) => ((5 tagged-value))
+mem: ((5 tagged-value)): 1006 <= character
+mem: ((5 tagged-value)): 1007 <= #\i
+run: main 6: (((1 channel-address) (deref)) <- ((write)) ((1 channel-address)) ((5 tagged-value)))
+mem: ((1 channel-address)) => 1062
+mem: ((5 tagged-value)) => #(tagged record (character i . nil))
+run: write/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: write/main 0: 1338 => ((default-space space-address))
+run: write/main 1: (((1 channel-address)) <- ((next-input)))
+arg: nil 0 (1062 #(tagged record (character #\i . nil)))
+run: write/main 1: 1062 => ((1 channel-address))
+mem: ((1 channel-address)): 1340 <= 1062
+run: write/main 2: (((2 tagged-value)) <- ((next-input)))
+arg: nil 1 (1062 #(tagged record (character #\i . nil)))
+run: write/main 2: #(tagged record (character #\i . nil)) => ((2 tagged-value))
+mem: ((2 tagged-value)): 1341 <= character
+mem: ((2 tagged-value)): 1342 <= #\i
+run: write/main 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
+mem: ((1 channel-address) (deref)) => #(tagged record (0 0 1065 . nil))
+run: full?/write/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: full?/write/main 0: 1369 => ((default-space space-address))
+run: full?/write/main 1: (((1 channel)) <- ((next-input)))
+arg: nil 0 (#(tagged record (0 0 1065 . nil)))
+run: full?/write/main 1: #(tagged record (0 0 1065 . nil)) => ((1 channel))
+mem: ((1 channel)): 1371 <= 0
+mem: ((1 channel)): 1372 <= 0
+mem: ((1 channel)): 1373 <= 1065
+run: full?/write/main 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
+mem: ((1372 integer) (raw)) => 0
+run: full?/write/main 2: 0 => ((4 integer))
+mem: ((4 integer)): 1374 <= 0
+run: full?/write/main 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
+mem: ((4 integer)) => 0
+run: full?/write/main 3: 1 => ((4 integer))
+mem: ((4 integer)): 1374 <= 1
+run: full?/write/main 4: (((5 integer)) <- ((capacity)) ((1 channel)))
+mem: ((1 channel)) => #(tagged record (0 0 1065 . nil))
+run: capacity/full?/write/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: capacity/full?/write/main 0: 1400 => ((default-space space-address))
+run: capacity/full?/write/main 1: (((1 channel)) <- ((next-input)))
+arg: nil 0 (#(tagged record (0 0 1065 . nil)))
+run: capacity/full?/write/main 1: #(tagged record (0 0 1065 . nil)) => ((1 channel))
+mem: ((1 channel)): 1402 <= 0
+mem: ((1 channel)): 1403 <= 0
+mem: ((1 channel)): 1404 <= 1065
+run: capacity/full?/write/main 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
+mem: ((1404 tagged-value-array-address) (raw)) => 1065
+run: capacity/full?/write/main 2: 1065 => ((4 tagged-value-array-address))
+mem: ((4 tagged-value-array-address)): 1405 <= 1065
+run: capacity/full?/write/main 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
+array-len: ((4 tagged-value-array-address) (deref))
+mem: ((1065 integer) (raw)) => 2
+run: capacity/full?/write/main 3: 2 => ((5 integer))
+mem: ((5 integer)): 1406 <= 2
+run: capacity/full?/write/main 4: (((reply)) ((5 integer)))
+mem: ((5 integer)) => 2
+run: full?/write/main 4: 2 => ((5 integer))
+mem: ((5 integer)): 1375 <= 2
+run: full?/write/main 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
+mem: ((4 integer)) => 1
+mem: ((5 integer)) => 2
+run: full?/write/main 5: t => ((6 boolean))
+mem: ((6 boolean)): 1376 <= t
+run: full?/write/main 6: (((jump-if)) ((6 boolean)) ((1 offset)))
+mem: ((6 boolean)) => t
+run: full?/write/main 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
+mem: ((1371 integer) (raw)) => 0
+run: full?/write/main 8: 0 => ((7 integer))
+mem: ((7 integer)): 1377 <= 0
+run: full?/write/main 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
+mem: ((7 integer)) => 0
+mem: ((4 integer)) => 1
+run: full?/write/main 9: nil => ((8 boolean))
+mem: ((8 boolean)): 1378 <= nil
+run: full?/write/main 10: (((reply)) ((8 boolean)))
+mem: ((8 boolean)) => nil
+run: write/main 3: nil => ((4 boolean))
+mem: ((4 boolean)): 1343 <= nil
+run: write/main 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
+mem: ((4 boolean)) => nil
+run: write/main 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
+mem: ((1064 tagged-value-array-address) (raw)) => 1065
+run: write/main 7: 1065 => ((6 tagged-value-array-address))
+mem: ((6 tagged-value-array-address)): 1345 <= 1065
+run: write/main 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
+run: write/main 8: 1063 => ((7 integer-address))
+mem: ((7 integer-address)): 1346 <= 1063
+run: write/main 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
+mem: ((7 integer-address) (deref)) => 0
+array-len: ((1065 tagged-value-array) (raw))
+mem: ((1065 integer) (raw)) => 2
+run: write/main 9: 1066 => ((8 tagged-value-address))
+mem: ((8 tagged-value-address)): 1347 <= 1066
+run: write/main 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
+mem: ((2 tagged-value)) => #(tagged record (character i . nil))
+run: write/main 10: #(tagged record (character #\i . nil)) => ((8 tagged-value-address) (deref))
+mem: ((8 tagged-value-address) (deref)): 1066 <= character
+mem: ((8 tagged-value-address) (deref)): 1067 <= #\i
+run: write/main 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
+mem: ((7 integer-address) (deref)) => 0
+run: write/main 11: 1 => ((7 integer-address) (deref))
+mem: ((7 integer-address) (deref)): 1063 <= 1
+run: write/main 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
+array-len: ((6 tagged-value-array-address) (deref))
+mem: ((1065 integer) (raw)) => 2
+run: write/main 12: 2 => ((9 integer))
+mem: ((9 integer)): 1348 <= 2
+run: write/main 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
+mem: ((7 integer-address) (deref)) => 1
+mem: ((9 integer)) => 2
+run: write/main 13: t => ((10 boolean))
+mem: ((10 boolean)): 1349 <= t
+run: write/main 14: (((jump-if)) ((10 boolean)) ((1 offset)))
+mem: ((10 boolean)) => t
+run: write/main 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
+mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 1 1065 . nil))
+run: main 6: #(tagged record (0 1 1065 . nil)) => ((1 channel-address) (deref))
+mem: ((1 channel-address) (deref)): 1062 <= 0
+mem: ((1 channel-address) (deref)): 1063 <= 1
+mem: ((1 channel-address) (deref)): 1064 <= 1065
+run: main 7: (((sleep)) ((until-routine-done literal)) ((3 integer) (routine)))
+mem: ((3 integer) (routine)) => 3
+schedule: pushing main to sleep queue
+schedule: read-file
+run: read-file 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: read-file 0: 101000 => ((default-space space-address))
+run: read-file 1: (((1 channel-address)) <- ((next-input)))
+arg: nil 0 (1062 1101)
+run: read-file 1: 1062 => ((1 channel-address))
+mem: ((1 channel-address)): 101002 <= 1062
+run: read-file 2: (((2 tagged-value)) ((1 channel-address) (deref)) <- ((read)) ((1 channel-address)))
+mem: ((1 channel-address)) => 1062
+run: read/read-file 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: read/read-file 0: 101031 => ((default-space space-address))
+run: read/read-file 1: (((1 channel-address)) <- ((next-input)))
+arg: nil 0 (1062)
+run: read/read-file 1: 1062 => ((1 channel-address))
+mem: ((1 channel-address)): 101033 <= 1062
+run: read/read-file 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
+mem: ((1 channel-address) (deref)) => #(tagged record (0 1 1065 . nil))
+run: empty?/read/read-file 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: empty?/read/read-file 0: 101062 => ((default-space space-address))
+run: empty?/read/read-file 1: (((1 channel)) <- ((next-input)))
+arg: nil 0 (#(tagged record (0 1 1065 . nil)))
+run: empty?/read/read-file 1: #(tagged record (0 1 1065 . nil)) => ((1 channel))
+mem: ((1 channel)): 101064 <= 0
+mem: ((1 channel)): 101065 <= 1
+mem: ((1 channel)): 101066 <= 1065
+run: empty?/read/read-file 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
+mem: ((101064 integer) (raw)) => 0
+run: empty?/read/read-file 2: 0 => ((4 integer))
+mem: ((4 integer)): 101067 <= 0
+run: empty?/read/read-file 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
+mem: ((101065 integer) (raw)) => 1
+run: empty?/read/read-file 3: 1 => ((5 integer))
+mem: ((5 integer)): 101068 <= 1
+run: empty?/read/read-file 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
+mem: ((4 integer)) => 0
+mem: ((5 integer)) => 1
+run: empty?/read/read-file 4: nil => ((6 boolean))
+mem: ((6 boolean)): 101069 <= nil
+run: empty?/read/read-file 5: (((reply)) ((6 boolean)))
+mem: ((6 boolean)) => nil
+run: read/read-file 2: nil => ((2 boolean))
+mem: ((2 boolean)): 101034 <= nil
+run: read/read-file 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
+mem: ((2 boolean)) => nil
+run: read/read-file 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
+run: read/read-file 6: 1062 => ((4 integer-address))
+mem: ((4 integer-address)): 101036 <= 1062
+run: read/read-file 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
+mem: ((1064 tagged-value-array-address) (raw)) => 1065
+run: read/read-file 7: 1065 => ((5 tagged-value-array-address))
+mem: ((5 tagged-value-array-address)): 101037 <= 1065
+run: read/read-file 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
+mem: ((4 integer-address) (deref)) => 0
+array-len: ((1065 tagged-value-array) (raw))
+mem: ((1065 integer) (raw)) => 2
+mem: ((1066 tagged-value) (raw)) => #(tagged record (character i . nil))
+run: read/read-file 8: #(tagged record (character #\i . nil)) => ((6 tagged-value))
+mem: ((6 tagged-value)): 101038 <= character
+mem: ((6 tagged-value)): 101039 <= #\i
+run: read/read-file 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
+mem: ((4 integer-address) (deref)) => 0
+run: read/read-file 9: 1 => ((4 integer-address) (deref))
+mem: ((4 integer-address) (deref)): 1062 <= 1
+run: read/read-file 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
+array-len: ((5 tagged-value-array-address) (deref))
+mem: ((1065 integer) (raw)) => 2
+run: read/read-file 10: 2 => ((8 integer))
+mem: ((8 integer)): 101040 <= 2
+run: read/read-file 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
+mem: ((4 integer-address) (deref)) => 1
+mem: ((8 integer)) => 2
+run: read/read-file 11: t => ((9 boolean))
+mem: ((9 boolean)): 101041 <= t
+run: read/read-file 12: (((jump-if)) ((9 boolean)) ((1 offset)))
+mem: ((9 boolean)) => t
+run: read/read-file 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
+mem: ((6 tagged-value)) => #(tagged record (character i . nil))
+mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 1 1065 . nil))
+run: read-file 2: #(tagged record (character #\i . nil)) => ((2 tagged-value))
+mem: ((2 tagged-value)): 101003 <= character
+mem: ((2 tagged-value)): 101004 <= #\i
+run: read-file 2: #(tagged record (1 1 1065 . nil)) => ((1 channel-address) (deref))
+mem: ((1 channel-address) (deref)): 1062 <= 1
+mem: ((1 channel-address) (deref)): 1063 <= 1
+mem: ((1 channel-address) (deref)): 1064 <= 1065
+run: read-file 3: (((4 character)) <- ((copy)) ((a literal)))
+run: read-file 3: #\a => ((4 character))
+mem: ((4 character)): 101005 <= #\a
+run: read-file 4: (((5 integer)) <- ((character-to-integer)) ((4 character)))
+mem: ((4 character)) => a
+run: read-file 4: 97 => ((5 integer))
+mem: ((5 integer)): 101006 <= 97
+run: read-file 5: (((6 character)) <- ((maybe-coerce)) ((2 tagged-value)) ((character literal)))
+mem: ((2 tagged-value)) => #(tagged record (character i . nil))
+run: maybe-coerce/read-file 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
+run: maybe-coerce/read-file 0: 101093 => ((default-space space-address))
+run: maybe-coerce/read-file 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
+run: maybe-coerce/read-file 1: 101124 => ((1 tagged-value-address))
+mem: ((1 tagged-value-address)): 101095 <= 101124
+run: maybe-coerce/read-file 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
+arg: nil 0 (#(tagged record (character #\i . nil)) character)
+run: maybe-coerce/read-file 2: #(tagged record (character #\i . nil)) => ((1 tagged-value-address) (deref))
+mem: ((1 tagged-value-address) (deref)): 101124 <= character
+mem: ((1 tagged-value-address) (deref)): 101125 <= #\i
+run: maybe-coerce/read-file 3: (((2 type)) <- ((next-input)))
+arg: nil 1 (#(tagged record (character #\i . nil)) character)
+run: maybe-coerce/read-file 3: character => ((2 type))
+mem: ((2 type)): 101096 <= character
+run: maybe-coerce/read-file 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
+mem: ((101124 type) (raw)) => character
+run: maybe-coerce/read-file 4: character => ((3 type))
+mem: ((3 type)): 101097 <= character
+run: maybe-coerce/read-file 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
+mem: ((3 type)) => character
+mem: ((2 type)) => character
+run: maybe-coerce/read-file 5: t => ((4 boolean))
+mem: ((4 boolean)): 101098 <= t
+run: maybe-coerce/read-file 6: (((jump-if)) ((4 boolean)) ((1 offset)))
+mem: ((4 boolean)) => t
+run: maybe-coerce/read-file 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
+mem: ((101125 location) (raw)) => i
+run: maybe-coerce/read-file 8: #\i => ((5 location))
+mem: ((5 location)): 101099 <= #\i
+run: maybe-coerce/read-file 9: (((reply)) ((5 location)) ((4 boolean)))
+mem: ((5 location)) => i
+mem: ((4 boolean)) => t
+run: read-file 5: #\i => ((6 character))
+mem: ((6 character)): 101007 <= #\i
+run: read-file 6: (((7 boolean)) <- ((equal)) ((6 character)) ((q literal)))
+mem: ((6 character)) => i
+run: read-file 6: nil => ((7 boolean))
+mem: ((7 boolean)): 101008 <= nil
+run: read-file 7: (((jump-unless)) ((7 boolean)) ((1 offset)))
+mem: ((7 boolean)) => nil
+run: read-file 9: (((8 integer)) <- ((character-to-integer)) ((6 character)))
+mem: ((6 character)) => i
+run: read-file 9: 105 => ((8 integer))
+mem: ((8 integer)): 101009 <= 105
+run: read-file 10: (((8 integer)) <- ((subtract)) ((8 integer)) ((5 integer)))
+mem: ((8 integer)) => 105
+mem: ((5 integer)) => 97
+run: read-file 10: 8 => ((8 integer))
+mem: ((8 integer)): 101009 <= 8
+run: read-file 11: (((9 boolean)) <- ((greater-or-equal)) ((8 integer)) ((0 literal)))
+mem: ((8 integer)) => 8
+run: read-file 11: t => ((9 boolean))
+mem: ((9 boolean)): 101010 <= t
+run: read-file 12: (((assert)) ((9 boolean)) ((file too low literal)))
+mem: ((9 boolean)) => t
+run: read-file 13: (((10 boolean)) <- ((lesser-or-equal)) ((8 integer)) ((7 literal)))
+mem: ((8 integer)) => 8
+run: read-file 13: nil => ((10 boolean))
+mem: ((10 boolean)): 101011 <= nil
+run: read-file 14: (((assert)) ((10 boolean)) ((file too high literal)))
+mem: ((10 boolean)) => nil
+-: die: file too high
+schedule: done with dead routine read-file
+schedule: waking up main
+schedule: main
+schedule: done with routine nil