jp_2
 
 	 
label_0
   
dup 
 jpz_1
	  	
push_1   	
sub	  	copy_1 	  	
putn	
 	jp_0
 
 
label_1
   	
push_0xa   	 	 
putc	
  ret
	
label_2
   	 
push_0   
dup 
 getn	
		load			dup 
 label_3
   		
dup 
 jpz_4
	  	  
copy_1 	  	
copy_1 	  	
call_0
 	 
pop 

pop 

push_1   	
sub	  	jp_3
 
 		
label_4
   	  
end


.