6WPL    #MAC  FINDLCA                      [C.E.WILKINSON : FINDS LCA   
 6X9=    #STR  %A
 6XNW    (   
 6Y8G    #STR  %A,1  
 6YN6          LDX   1  %A   
 6^7Q    )   
 6^MB    #STR  %A
 7272    #SKI
 72LL          LDX   1  CPPTR(2) 
 736=          LDX   0  K58(1)   
 73KW          MPA   0  %B   
 745G    #NOR