| 1233 | } |
| 1234 | |
| 1235 | BOOLEAN |
| 1236 | FindUnivariateWrapper( ideal source, ideal & destIdeal ) |
| 1237 | { |
| 1238 | BOOLEAN fglmok; |
| 1239 | |
| 1240 | idealFunctionals L( 100, (currRing->N) ); |
| 1241 | fglmok = CalculateFunctionals( source, L ); |
| 1242 | if ( fglmok == TRUE ) { |
| 1243 | destIdeal= FindUnivariatePolys( L ); |
| 1244 | return TRUE; |
| 1245 | } |
| 1246 | else |
| 1247 | return FALSE; |
| 1248 | } |
| 1249 | |
| 1250 | // ---------------------------------------------------------------------------- |
| 1251 | // Local Variables: *** |
no test coverage detected