helloworld.sel

(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")