DO,1<-#18DO,1SUB#1<-#20   
        DO,1SUB#2<-#31DO,1SUB#3<-#1
       DO,1SUB#4<-#19DO,1SUB#5<-#19
      DO,1SUB#6<-#24DO,1SUB#7<-#27 
     DO,1SUB#8<-#12DO,1SUB#9<-#4   
    DO,1SUB#10<-#31DO,1SUB#11<-#31 
   DO,1SUB#12<-#18DO,1SUB#13<-#24  
  DO,1SUB#14<-#10DO,1SUB#15<-#19   
 DO,1SUB#16<-#9DO,1SUB#17<-#27     
DO,1SUB#18<-#13DOREADOUT,1         
O,1SUB#16<                         
,1SUB#14<-                         
1SUB#12<-#                         
<UB#80<-#1                         
-B#6<<-#93                         
##4<--#1DD                         
12<-##10OO                         
8<-#138D,R                         
D-#221DO1E                         
O#14DDO,SA                         
,39DOO,1UD                         
11DO,,1SBO                         
SDO,11SU#U                         
UO,1SSUB1T                         
B,1SUUB#7,                         
#1SUBB#1<1                         
1SUB##15-                          
<UB#913<#                          
-B#7<1<-2                          
##5<-<-#7                          
23<-#-#1                           
0<-#4#29                           
 -#2 34                            
 #17 1                             
 19