{
  double r, d;
  rd(r, d);
  wt(sqrt(d ** 2 - r ** 2));
}