m := Matrix(1..18,1..18,fill=0);
m[1,2] := m[1,2] + 1;
m[1,3] := m[1,3] + 1;
m[1,4] := m[1,4] + 1;
m[1,5] := m[1,5] + 1;
m[2,6] := m[2,6] + 1;
m[2,7] := m[2,7] + 1;
m[2,8] := m[2,8] + 1;
m[2,9] := m[2,9] + 1;
m[3,10] := m[3,10] + 1;
m[3,6] := m[3,6] + 1;
m[3,11] := m[3,11] + 1;
m[3,12] := m[3,12] + 1;
m[4,13] := m[4,13] + 1;
m[4,14] := m[4,14] + 1;
m[4,6] := m[4,6] + 1;
m[4,15] := m[4,15] + 1;
m[5,16] := m[5,16] + 1;
m[5,17] := m[5,17] + 1;
m[5,18] := m[5,18] + 1;
m[5,6] := m[5,6] + 1;
m[6,6] := m[6,6] + 1;
m[6,6] := m[6,6] + 1;
m[6,6] := m[6,6] + 1;
m[7,6] := m[7,6] + 1;
m[7,6] := m[7,6] + 1;
m[7,11] := m[7,11] + 1;
m[7,12] := m[7,12] + 1;
m[8,6] := m[8,6] + 1;
m[8,14] := m[8,14] + 1;
m[8,6] := m[8,6] + 1;
m[8,15] := m[8,15] + 1;
m[9,6] := m[9,6] + 1;
m[9,17] := m[9,17] + 1;
m[9,18] := m[9,18] + 1;
m[9,6] := m[9,6] + 1;
m[10,6] := m[10,6] + 1;
m[10,6] := m[10,6] + 1;
m[10,8] := m[10,8] + 1;
m[10,9] := m[10,9] + 1;
m[11,13] := m[11,13] + 1;
m[11,6] := m[11,6] + 1;
m[11,6] := m[11,6] + 1;
m[11,15] := m[11,15] + 1;
m[12,16] := m[12,16] + 1;
m[12,6] := m[12,6] + 1;
m[12,18] := m[12,18] + 1;
m[12,6] := m[12,6] + 1;
m[13,6] := m[13,6] + 1;
m[13,7] := m[13,7] + 1;
m[13,6] := m[13,6] + 1;
m[13,9] := m[13,9] + 1;
m[14,10] := m[14,10] + 1;
m[14,6] := m[14,6] + 1;
m[14,6] := m[14,6] + 1;
m[14,12] := m[14,12] + 1;
m[15,16] := m[15,16] + 1;
m[15,17] := m[15,17] + 1;
m[15,6] := m[15,6] + 1;
m[15,6] := m[15,6] + 1;
m[16,6] := m[16,6] + 1;
m[16,7] := m[16,7] + 1;
m[16,8] := m[16,8] + 1;
m[16,6] := m[16,6] + 1;
m[17,10] := m[17,10] + 1;
m[17,6] := m[17,6] + 1;
m[17,11] := m[17,11] + 1;
m[17,6] := m[17,6] + 1;
m[18,13] := m[18,13] + 1;
m[18,14] := m[18,14] + 1;
m[18,6] := m[18,6] + 1;
m[18,6] := m[18,6] + 1;
m[6,6] := m[6,6] + 1;
u := Vector[row](18,fill=0);
u[1] := 1;
v := Vector[column](18,fill=0);
v[1] := 1;
v[2] := 1;
v[3] := 1;
v[4] := 1;
v[5] := 1;
v[7] := 1;
v[8] := 1;
v[9] := 1;
v[10] := 1;
v[11] := 1;
v[12] := 1;
v[13] := 1;
v[14] := 1;
v[15] := 1;
v[16] := 1;
v[17] := 1;
v[18] := 1;
