matrix := [ [0,10,0,0,0,0,0,0,0], [10,0,0,0,0,0,0,0,0], [0,0,0,10,0,0,0,0,0], [0,0,10,0,0,0,0,0,0], [0,0,0,0,0,10,0,0,0], [0,0,0,0,10,0,0,0,0], [0,0,0,0,0,0,0,0,10], [10,9,9,10,18,1,10,10,9], [0,0,0,0,0,0,10,0,0] ]*Z(19);