my $kreis = Rundling->new(r => $r);
my $elly  = Rundling->new(x => $x, y => $y);