@a=<>=~$"..$`;map{<>=~/ .* /;push@{0+$'.-$`},0+$&,push@{0+$'.-$&},$`,0}1..$';<>=~s/\d+/@a=sort{$a-$b}keys{map@{$&.-$_},@a}/ger;print@a."
@a"