($a,$b,$=)=map$_%$.,glob,$z+=$|=!++$.<($a-$b)*($=-$b)&&$a-$=for(<>)x$<;print$|?INF:$z