pub fn d_i_m_m_i<T1: Num, T2: Num, T3: Num>(
    q: R,
    om: T1,
    p: R,
    m1: T2,
    m2: T3,
    beta: R
) -> C