my ($Dy, $Dd) = 0;