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