[/X{count dup 2 idiv{/:[2 sub}repeat{/.[}repeat = clear}10{X}32{}43{}46()58{0()}([)//=only(]){(%stdin)(r)file read{load exec]}if}>>begin]X