SELECT./Hello World

The first "Hello World!" program written in SELECT. It is by no means the shortest or most elegant such program possible, but merely the easiest to write. In fact, it is extraordinarily wasteful in all ways that a program can be wasteful. Generated by SELECT. Code Generator v0.3 by User:Quintopia.
 (65,17,1)
 
 DRAW STRING LITERAL "Hello World!'
 
 DRAW LETTER "H" AT (-30,-6)
 
 MAKE -29+-4I:
 
 MAKE 4:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -29+-4I
 
 PRINT. RIGHT. 
 
 MAKE -29+-3I:
 
 MAKE 3:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -29+-3I
 
 PRINT. RIGHT. 
 
 MAKE -29+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -29+-2I
 
 PRINT. RIGHT. 
 
 MAKE -29+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -29+-1I
 
 PRINT. RIGHT. 
 
 MAKE -29:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -29
 
 PRINT. RIGHT. 
 
 MAKE -29+1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -29+1I
 
 PRINT. RIGHT. 
 
 MAKE -29+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -29+2I
 
 PRINT. RIGHT. 
 
 MAKE -28+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -28+-1I
 
 PRINT. RIGHT. 
 
 MAKE -27+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -27+-1I
 
 PRINT. RIGHT. 
 
 MAKE -26+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -26+-1I
 
 PRINT. RIGHT. 
 
 MAKE -26:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -26
 
 PRINT. RIGHT. 
 
 MAKE -26+1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -26+1I
 
 PRINT. RIGHT. 
 
 MAKE -26+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -26+2I
 
 PRINT. RIGHT. 
 
 MAKE -26+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -26+-2I
 
 PRINT. RIGHT. 
 
 MAKE -26+-3I:
 
 MAKE 3:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -26+-3I
 
 PRINT. RIGHT. 
 
 MAKE -26+-4I:
 
 MAKE 4:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -26+-4I
 
 PRINT. RIGHT. 
 END DRAW LETTER "H"
 
 DRAW LETTER "e" AT (-25,-6)
 
 MAKE -23+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -23+-2I
 
 PRINT. RIGHT. 
 
 MAKE -22+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -22+-2I
 
 PRINT. RIGHT. 
 
 MAKE -24+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -24+-1I
 
 PRINT. RIGHT. 
 
 MAKE -21+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -21+-1I
 
 PRINT. RIGHT. 
 
 MAKE -24:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -24
 
 PRINT. RIGHT. 
 
 MAKE -23:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -23
 
 PRINT. RIGHT. 
 
 MAKE -22:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -22
 
 PRINT. RIGHT. 
 
 MAKE -21:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -21
 
 PRINT. RIGHT. 
 
 MAKE -24+1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -24+1I
 
 PRINT. RIGHT. 
 
 MAKE -23+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -23+2I
 
 PRINT. RIGHT. 
 
 MAKE -22+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -22+2I
 
 PRINT. RIGHT. 
 
 MAKE -21+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -21+2I
 
 PRINT. RIGHT. 
 END DRAW LETTER "e"
 
 DRAW LETTER "l" AT (-20,-6)
 
 MAKE -20+-5I:
 
 MAKE 5:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -20+-5I
 
 PRINT. RIGHT. 
 
 MAKE -19+-5I:
 
 MAKE 5:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -19+-5I
 
 PRINT. RIGHT. 
 
 MAKE -18+-5I:
 
 MAKE 5:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -18+-5I
 
 PRINT. RIGHT. 
 
 MAKE -18+-4I:
 
 MAKE 4:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -18+-4I
 
 PRINT. RIGHT. 
 
 MAKE -18+-3I:
 
 MAKE 3:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -18+-3I
 
 PRINT. RIGHT. 
 
 MAKE -18+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -18+-2I
 
 PRINT. RIGHT. 
 
 MAKE -18+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -18+-1I
 
 PRINT. RIGHT. 
 
 MAKE -18:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -18
 
 PRINT. RIGHT. 
 
 MAKE -18+1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -18+1I
 
 PRINT. RIGHT. 
 
 MAKE -17+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -17+2I
 
 PRINT. RIGHT. 
 
 MAKE -16+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -16+2I
 
 PRINT. RIGHT. 
 END DRAW LETTER "l"
 
 DRAW LETTER "l" AT (-15,-6)
 
 MAKE -15+-5I:
 
 MAKE 5:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -15+-5I
 
 PRINT. RIGHT. 
 
 MAKE -14+-5I:
 
 MAKE 5:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -14+-5I
 
 PRINT. RIGHT. 
 
 MAKE -13+-5I:
 
 MAKE 5:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -13+-5I
 
 PRINT. RIGHT. 
 
 MAKE -13+-4I:
 
 MAKE 4:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -13+-4I
 
 PRINT. RIGHT. 
 
 MAKE -13+-3I:
 
 MAKE 3:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -13+-3I
 
 PRINT. RIGHT. 
 
 MAKE -13+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -13+-2I
 
 PRINT. RIGHT. 
 
 MAKE -13+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -13+-1I
 
 PRINT. RIGHT. 
 
 MAKE -13:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -13
 
 PRINT. RIGHT. 
 
 MAKE -13+1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -13+1I
 
 PRINT. RIGHT. 
 
 MAKE -12+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -12+2I
 
 PRINT. RIGHT. 
 
 MAKE -11+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -11+2I
 
 PRINT. RIGHT. 
 END DRAW LETTER "l"
 
 DRAW LETTER "o" AT (-10,-6)
 
 MAKE -8+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -8+-2I
 
 PRINT. RIGHT. 
 
 MAKE -7+-2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -7+-2I
 
 PRINT. RIGHT. 
 
 MAKE -9+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -9+-1I
 
 PRINT. RIGHT. 
 
 MAKE -9:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -9
 
 PRINT. RIGHT. 
 
 MAKE -9+1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -9+1I
 
 PRINT. RIGHT. 
 
 MAKE -8+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -8+2I
 
 PRINT. RIGHT. 
 
 MAKE -7+2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -7+2I
 
 PRINT. RIGHT. 
 
 MAKE -6+-1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -6+-1I
 
 PRINT. RIGHT. 
 
 MAKE -6:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -6
 
 PRINT. RIGHT. 
 
 MAKE -6+1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. 
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE -6+1I
 
 PRINT. RIGHT. 
 END DRAW LETTER "o"
 
 DRAW LETTER "W" AT (0,-6)
 
 MAKE -4I:
 
 MAKE -4:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 PRINT. RIGHT. 
 
 MAKE -3I:
 
 MAKE -3:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 PRINT. RIGHT. 
 
 MAKE -2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 PRINT. RIGHT. 
 
 MAKE 1+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 1+-2I
 
 PRINT. RIGHT. 
 
 MAKE 1+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 1+-1I
 
 PRINT. RIGHT. 
 
 MAKE 1:
 LOG. SELECT.
 
 PRINT. RIGHT. 
 
 MAKE 1+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 1+1I
 
 PRINT. RIGHT. 
 
 MAKE 1+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 1+2I
 
 PRINT. RIGHT. 
 
 MAKE 2+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 2+-2I
 
 PRINT. RIGHT. 
 
 MAKE 2+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 2+-1I
 
 PRINT. RIGHT. 
 
 MAKE 3+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 3+-2I
 
 PRINT. RIGHT. 
 
 MAKE 3+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 3+-1I
 
 PRINT. RIGHT. 
 
 MAKE 3:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 3
 
 PRINT. RIGHT. 
 
 MAKE 3+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 3+1I
 
 PRINT. RIGHT. 
 
 MAKE 3+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 3+2I
 
 PRINT. RIGHT. 
 
 MAKE 4+-4I:
 
 MAKE -4:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 4+-4I
 
 PRINT. RIGHT. 
 
 MAKE 4+-3I:
 
 MAKE -3:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 4+-3I
 
 PRINT. RIGHT. 
 
 MAKE 4+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 4+-2I
 
 PRINT. RIGHT. 
 END DRAW LETTER "W"
 
 DRAW LETTER "o" AT (5,-6)
 
 MAKE 7+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 7+-2I
 
 PRINT. RIGHT. 
 
 MAKE 8+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 8+-2I
 
 PRINT. RIGHT. 
 
 MAKE 6+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 6+-1I
 
 PRINT. RIGHT. 
 
 MAKE 6:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 6
 
 PRINT. RIGHT. 
 
 MAKE 6+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 6+1I
 
 PRINT. RIGHT. 
 
 MAKE 7+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 7+2I
 
 PRINT. RIGHT. 
 
 MAKE 8+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 8+2I
 
 PRINT. RIGHT. 
 
 MAKE 9+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 9+-1I
 
 PRINT. RIGHT. 
 
 MAKE 9:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 9
 
 PRINT. RIGHT. 
 
 MAKE 9+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 9+1I
 
 PRINT. RIGHT. 
 END DRAW LETTER "o"
 
 DRAW LETTER "r" AT (10,-6)
 
 MAKE 12+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 12+-2I
 
 PRINT. RIGHT. 
 
 MAKE 13+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 13+-2I
 
 PRINT. RIGHT. 
 
 MAKE 14+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 14+-2I
 
 PRINT. RIGHT. 
 
 MAKE 12+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 12+-1I
 
 PRINT. RIGHT. 
 
 MAKE 12:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 12
 
 PRINT. RIGHT. 
 
 MAKE 12+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 12+1I
 
 PRINT. RIGHT. 
 
 MAKE 12+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 12+2I
 
 PRINT. RIGHT. 
 END DRAW LETTER "r"
 
 DRAW LETTER "l" AT (15,-6)
 
 MAKE 15+-5I:
 
 MAKE -5:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 15+-5I
 
 PRINT. RIGHT. 
 
 MAKE 16+-5I:
 
 MAKE -5:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 16+-5I
 
 PRINT. RIGHT. 
 
 MAKE 17+-5I:
 
 MAKE -5:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 17+-5I
 
 PRINT. RIGHT. 
 
 MAKE 17+-4I:
 
 MAKE -4:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 17+-4I
 
 PRINT. RIGHT. 
 
 MAKE 17+-3I:
 
 MAKE -3:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 17+-3I
 
 PRINT. RIGHT. 
 
 MAKE 17+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 17+-2I
 
 PRINT. RIGHT. 
 
 MAKE 17+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 17+-1I
 
 PRINT. RIGHT. 
 
 MAKE 17:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 17
 
 PRINT. RIGHT. 
 
 MAKE 17+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 17+1I
 
 PRINT. RIGHT. 
 
 MAKE 18+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 18+2I
 
 PRINT. RIGHT. 
 
 MAKE 19+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 19+2I
 
 PRINT. RIGHT. 
 END DRAW LETTER "l"
 
 DRAW LETTER "d" AT (20,-6)
 
 MAKE 24+-5I:
 
 MAKE -5:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -5
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24+-5I
 
 PRINT. RIGHT. 
 
 MAKE 24+-4I:
 
 MAKE -4:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24+-4I
 
 PRINT. RIGHT. 
 
 MAKE 24+-3I:
 
 MAKE -3:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24+-3I
 
 PRINT. RIGHT. 
 
 MAKE 24+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24+-2I
 
 PRINT. RIGHT. 
 
 MAKE 24+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24+-1I
 
 PRINT. RIGHT. 
 
 MAKE 24:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24
 
 PRINT. RIGHT. 
 
 MAKE 24+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24+1I
 
 PRINT. RIGHT. 
 
 MAKE 24+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 24+2I
 
 PRINT. RIGHT. 
 
 MAKE 23+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 23+-2I
 
 PRINT. RIGHT. 
 
 MAKE 23+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 23+2I
 
 PRINT. RIGHT. 
 
 MAKE 22+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 22+-2I
 
 PRINT. RIGHT. 
 
 MAKE 22+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 22+2I
 
 PRINT. RIGHT. 
 
 MAKE 21+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 21+-1I
 
 PRINT. RIGHT. 
 
 MAKE 21:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 21
 
 PRINT. RIGHT. 
 
 MAKE 21+1I:
 
 MAKE 1:
 LOG. SELECT.
 
 RIGHT. 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 21+1I
 
 PRINT. RIGHT. 
 END DRAW LETTER "d"
 
 DRAW LETTER "!" AT (25,-6)
 
 MAKE 28+-4I:
 
 MAKE -4:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -4
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 28+-4I
 
 PRINT. RIGHT. 
 
 MAKE 28+-3I:
 
 MAKE -3:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -3
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 28+-3I
 
 PRINT. RIGHT. 
 
 MAKE 28+-2I:
 
 MAKE -2:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 COMBINE SIGN
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 
 END MAKE -2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 28+-2I
 
 PRINT. RIGHT. 
 
 MAKE 28+-1I:
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 END MAKE -1
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 28+-1I
 
 PRINT. RIGHT. 
 
 MAKE 28:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 28
 
 PRINT. RIGHT. 
 
 MAKE 28+2I:
 
 MAKE 2:
 EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 
 END MAKE 2
 
 
 MAKE I:
 
 MAKE 1/2:
 RIGHT. EXP. SELECT.
 EXP. LEFT. SELECT.
 RIGHT. LOG. LEFT. SELECT.
 LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 END MAKE 1/2
 
 RIGHT. 
 
 MAKE -1:
 
 MAKE 1/K:
 RIGHT. EXP. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 EXP. LEFT. SELECT.
 
 MARK AS makenumsign
 LOG. RIGHT. SELECT.
 
 END MAKE 1/K
 
 LEFT. 
 END MAKE -1
 
 EXP. LEFT. SELECT.
 RIGHT. 
 END MAKE I
 
 RIGHT. EXP. LEFT. SELECT.
 RIGHT. EXP. LEFT. LEFT. LEFT. SELECT.
 RIGHT. RIGHT. RIGHT. 
 MARK AS makenumimagpart
 RIGHT. EXP. SELECT.
 EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. EXP. RIGHT. SELECT.
 LEFT. 
 COMBINE IMAGINARY PART
 EXP. LEFT. SELECT.
 RIGHT. LOG. RIGHT. SELECT.
 LEFT. LOG. RIGHT. SELECT.
 LEFT. 
 END MAKE 28+2I
 
 PRINT. RIGHT. 
 END DRAW LETTER "!"
 
 END DRAW STRING LITERAL "Hello World!'
 
 ######GENERATION CODE######
 init(65,17,1)
 drawString("Hello World!",-30,-6)
 writetofile("helloworld")
Category:Examples