pub fn d_i_0_0_i<T: Num>(q: R, om: T, p: R, beta: R) -> C