Modular Arithmetic: Calculating with Residue Classes - Cryptography in C and C++ - page 74

int
mequ_l (CLINT a_l, CLINT b_l, CLINT m_l)
{
CLINT r_l;
if (EQZ_L (m_l))
{
return E_CLINT_DBZ;
}
msub_l (a_l, b_l, r_l, m_l);
return ((0 == DIGITS_L (r_l))?1:0);
}