pub fn d_i_m_t_0_i<T1: Num, T2: Num>(q: R, om: T1, p: R, m: T2, beta: R) -> C