| 94 | // ---------------------------------------------------------------------------- |
| 95 | |
| 96 | int hasOne( ideal J, const ring r ) |
| 97 | { |
| 98 | int i; |
| 99 | |
| 100 | for( i=0; i<IDELEMS(J); i++ ) |
| 101 | { |
| 102 | if (p_IsConstant(J->m[i],r)) return TRUE; |
| 103 | } |
| 104 | return FALSE; |
| 105 | } |
| 106 | // ---------------------------------------------------------------------------- |
| 107 | // test if m is a multiple of one of the monomials of f |
| 108 | // ---------------------------------------------------------------------------- |
no test coverage detected