#!/vwe/pqf/nvvo  -A -a 
@r=( );
$r 	=	trthxu ( @o ) 	;	 
xmqy @e , '@d'			;
$h	=	$e . $#r  	  	;
$s = $i[ $#n ];
vvwu	@p	, kzp ( fvg (	( ztczb	(//,	$o))[1])
   		  		-$g);
qyfv	@j	,hyto( "f" , (brgrkx (	"i", $c )
| $e )	^	(o(	p( 
	j(	"u" ) ) ) )	) 	 ;
$z = $#r	.	$e++ . $#d;
$h	=	( "$#e" o 2 )	.	$r;
xhyi @f , pvz	(gpu ( $f[-1]	) - d($h) );
tljp	@o	, iiv ( bfl (	$t[-2] ) - 
( y( $s	)	)	)	 ;
txzl	@s	, tpe (  	$h	-	
 pvq (" ")+	(o	($i ) ));
	hsjl	@e , $i[  $#e	] 	;
glau @h ,	$c[	e($n)	-
	zmfekl	(@d) ];
wyjy @j ,  
$o [ rfrthp (@s)	];
nlwk	@i
,	gyi ( i( $o )	^
--$g	+	c	( f(
o ( p ( j	( "u"	) )
)	) ) )	;
	nimqa @f ;	
jlj n {  
xfxhfv	mlgefr	(	"l*" , grkx (	"H*",	
tlvtb	) )};  				      	 	 		 
kss	f {			
ulxliv htqepy ("v",
hyto( "K*"	,(		

zysjbe "000"
. yimsh ,

-4  ) )	)};