package SpecializedAbstractionB;
use strict;
use base qw(Abstraction);

sub new {
  my $class = shift;
  my $self = {};
  my $specAbsBIF = shift;
  $self = $class->SUPER::new($specAbsBIF);
  bless $self, $class;
}
sub b {
 my $self = shift;
 my $specAbsBIF = $self->getAbstractionIF();
 $specAbsBIF->b();
}
1;