"#"[11#O.9#O.9#O.38FO.45#O.)F.21#O.]#
"#"DELETE
"#"DELETE
"#3" [GVAR] 15#3#!&2E#31#-#B!
"#4" [GVAR] 15#4#!&59#41#-#B!
"#5" [GVAR] 15#5#!&73#51#-#B!
"#6" [GVAR] 15#6#!&B8#61#-#B!
"#4" [GVAR] 15#4#!&59#41#-#B!
"#5" [GVAR] 15#5#!&73#51#-#B!
"#6" [GVAR] 15#6#!&B8#61#-#B!
"FREE" [OFFREP(6#5)UNTIL(OFF#2124#+#11
#B?15AND#+1#+#?#B12OFFREP(6#5)UNTIL(
#21214#+#11#B?15AND#+3#+#3#11IF(#12#2
FRAMEFRAME?ON4FVAR#!FRAME!)IF)UNTIL(
)REP#2#2NOTIF(#114#+#4#6)IF)REP#2]
#B?15AND#+1#+#?#B12OFFREP(6#5)UNTIL(
#21214#+#11#B?15AND#+3#+#3#11IF(#12#2
FRAMEFRAME?ON4FVAR#!FRAME!)IF)UNTIL(
)REP#2#2NOTIF(#114#+#4#6)IF)REP#2]
"FREED" ["""#6""DELETE"$+
"""#5""DELETE"$+"""#4""DELETE"$+
"""#3""DELETE"$+"""FREE""DELETE"$+
"""FREED""DELETE"$+]
"""#5""DELETE"$+"""#4""DELETE"$+
"""#3""DELETE"$+"""FREE""DELETE"$+
"""FREED""DELETE"$+]
6#OUT
% Type FREE to identify unused words
% Type FREED to delete this utility
% Type FREE to identify unused words
% Type FREED to delete this utility
Published in AMPLINEX 013, September
1989
