my $suppress =
         (($self->{simpos} == 1) and (($typ eq 'BHC') || ($typ eq 'ISC'
+)));