pub fn sphere_body_r4( position: Vec4, velocity: Vec4, radius: f32, mass: f32, ) -> Option<BodyDef<EuclideanR4>>