package Double {
  has value : private double;
  
  sub new : Double ($value : double) {
    my $self = new Double;
    
    $self->{value} = $value;
    
    return $self;
  }
  
  sub get_value : double ($self : self) {
    return $self->{value};
  }

  sub set_value : void ($self : self, $value : double) {
    $self->{value} = $value;
  }
}