my $bin1;
if ($binc1 == 0) {
   $bin1 = 0;
} else {
   $bin1 = 1;
}