osl/source/relation.c

175     osl_int_dump_precision(file, relation->precision);
190       osl_int_dump_precision(file, relation->precision);
212         osl_int_print(file, relation->precision, relation->m[i], j);
256  * \param[in]     precision The precision of the value.
267                                        int precision, int * first,
279   if (!osl_int_zero(precision, val, 0) && (!cst)) {
280     if ((*first) || osl_int_neg(precision, val, 0)) {
281       if (osl_int_one(precision, val, 0)) {         // case 1
285         if (osl_int_mone(precision, val, 0)) {      // case -1
289 	  osl_int_sprint_txt(sval, precision, val, 0);
297       if (osl_int_one(precision, val, 0)) {
302 	osl_int_sprint_txt(temp, precision, val, 0);
311       if ((osl_int_zero(precision, val, 0) && (*first)) ||
312           (osl_int_neg(precision, val, 0)))
313         osl_int_sprint_txt(sval, precision, val, 0);
314       if (osl_int_pos(precision, val, 0)) {
317           osl_int_sprint_txt(temp, precision, val, 0);
321           osl_int_sprint_txt(sval, precision, val, 0);
433       osl_int_oppose(relation->precision,
443         osl_int_address(relation->precision, relation->m[row], i),
444         relation->precision, &first, constant, strings[i]);
447       osl_int_oppose(relation->precision,
502   if (!osl_int_zero(relation->precision, relation->m[row], 0))
508     if (!osl_int_zero(relation->precision, relation->m[row], i)) {
514       if (osl_int_one(relation->precision, relation->m[row], i))
516       else if (osl_int_mone(relation->precision, relation->m[row], i))
570         osl_int_zero(relation->precision, relation->m[row], 1)) {
594     if (osl_int_zero(relation->precision, relation->m[row], 0))
792         osl_int_sprint(buffer, relation->precision, relation->m[i], j);
955  * osl_relation_pread function ("precision read"):
958  * available precision.
960  * \param[in] precision The precision of the relation elements.
963 osl_relation_p osl_relation_pread(FILE * foo, int precision) {
1007     relation = osl_relation_pmalloc(precision, nb_rows, nb_columns);
1028         osl_int_sread(&tmp, precision, relation->m[i], j);
1053  * the precision corresponds to the precision environment variable or
1054  * to the highest available precision if it is not defined.
1058   int precision = osl_util_get_precision();
1059   return osl_relation_pread(foo, precision);
1070  * (precision malloc) this function allocates the memory space for an
1073  * \param[in] precision  The precision of the constraint matrix.
1079 osl_relation_p osl_relation_pmalloc(int precision,
1093   relation->precision      = precision;
1102                     nb_rows * nb_columns * osl_int_sizeof(precision));
1105       relation->m[i] = osl_int_address(precision, q, i * nb_columns);
1107         osl_int_init_set_si(precision, relation->m[i], j, 0);
1120  * the precision corresponds to the precision environment variable or
1121  * to the highest available precision if it is not defined.
1125   int precision = osl_util_get_precision();
1126   return osl_relation_pmalloc(precision, nb_rows, nb_columns);
1149     osl_int_clear(relation->precision, p, i);
1212     node = osl_relation_pmalloc(relation->precision, n, relation->nb_columns);
1221         osl_int_assign(relation->precision, node->m[i], j, relation->m[i], j);
1310       (relation->precision != vector->precision) ||
1316     osl_int_assign(relation->precision, relation->m[row], i, vector->v, i);
1334       (relation->precision != vector->precision) ||
1339   if (osl_int_get_si(relation->precision, relation->m[row], 0) == 0)
1340     osl_int_assign(relation->precision, relation->m[row], 0, vector->v, 0);
1343     osl_int_add(relation->precision,
1362       (relation->precision != vector->precision) ||
1367   if (osl_int_get_si(relation->precision, relation->m[row], 0) == 0)
1368     osl_int_assign(relation->precision, relation->m[row], 0, vector->v, 0);
1371     osl_int_sub(relation->precision,
1432     vector = osl_vector_pmalloc(relation->precision, relation->nb_columns);
1459   temp = osl_relation_pmalloc(relation->precision,
1464       osl_int_assign(relation->precision, temp->m[i], j, relation->m[i], j);
1467       osl_int_assign(relation->precision, temp->m[i], j+1, relation->m[i], j);
1494   relation = osl_relation_pmalloc(vector->precision, 1, vector->size);
1514       (r1->precision != r2->precision)   ||
1521       osl_int_assign(r1->precision, r1->m[i+row], j, r2->m[i], j);
1549       (r1->precision != r2->precision)   ||
1554   temp = osl_relation_pmalloc(r1->precision,
1559       osl_int_assign(r1->precision, temp->m[i], j, r1->m[i], j);
1565       osl_int_assign(r1->precision, temp->m[i], j, r1->m[i-r2->nb_rows], j);
1596   temp = osl_relation_pmalloc(r->precision,
1601       osl_int_assign(r->precision, temp->m[i], j, r->m[i], j);
1605       osl_int_assign(r->precision, temp->m[i - 1], j, r->m[i], j);
1636   temp = osl_relation_pmalloc(r->precision,
1641       osl_int_assign(r->precision, temp->m[i], j, r->m[i], j);
1644       osl_int_assign(r->precision, temp->m[i], j - 1, r->m[i], j);
1677   if ((relation->precision != insert->precision) ||
1683   temp = osl_relation_pmalloc(relation->precision, relation->nb_rows,
1688       osl_int_assign(relation->precision, temp->m[i], j, relation->m[i], j);
1691       osl_int_assign(relation->precision,
1696       osl_int_assign(relation->precision,
1740   new = osl_relation_pmalloc(r1->precision,
1765         (r1->precision      != r2->precision)      ||
1776         if (osl_int_ne(r1->precision, r1->m[i], j, r2->m[i], j))
1972         if (!osl_int_zero(relation->precision, relation->m[i], 0) &&
1973             !osl_int_one(relation->precision, relation->m[i], 0)) {
2071   int precision;
2082     precision = relation->precision;
2099       if (!osl_int_zero(precision, relation->m[i], 1)) {
2113       if ((i != 1) && !osl_int_zero(precision, relation->m[row_id], i)) {
2118     if (!osl_int_divisible(precision,
2124     array_id = -osl_int_get_si(precision,
2127     array_id /= osl_int_get_si(precision, relation->m[row_id], 1);
2280     node = osl_relation_pmalloc(relation->precision,
2294         osl_int_assign(relation->precision, node->m[i], j, relation->m[i], j);
2298         osl_int_assign(relation->precision,
2306           osl_int_set_si(relation->precision, node->m[i], j, -1);