my @Matrix;
$Matrix[$a] = 1;