{
  my $data= $self->{dataref};
  foreach my $x (0..$max_x)
  {
    $data->{$x}{$y} = $new_value;
  }
}