///|
/// Calculate one over the square root of the sum of squares of four coordinates.
pub fn rnorm4d(a : Double, b : Double, c : Double, d : Double) -> Double {
  rnorm([a, b, c, d])
}