map{$m[$_]=$_*-($_+(@m=(0)x@@)),print"@m
"}@@=-$_*2..0for<>