#TFD (Temporary for debug)>>
my $cell0 = $next_cell_arr[0] || die "cell0 undef!\n"; printf "Cell0 = %s\n", $cell0;
my $cell1 = $next_cell_arr[1] || die "cell1 undef!\n"; printf "Cell1 = %s\n", $cell1;
my $cell2 = $next_cell_arr[2] || die "cell2 undef!\n"; printf "Cell2 = %s\n", $cell2;

if( ($cell0 == $cell1) && ($cell1 == $cell2) ){
        print "TFD> All 3 cell values defined and EQUAL\n";
        push( @sequence_2_arr, $protein_matrix[0][$col+1] );
        push( @sequence_1_arr, $protein_matrix[$row+1][0] );
        $dowhat = "diagonal";
}
print "TFD> All 3 cell values defined, but NOT equal\n";