mark input of ∊𝕩 as fl_asc|fl_dsc if it's all same
This commit is contained in:
parent
7326348c79
commit
1eee4d7450
@ -275,7 +275,12 @@ B memberOf_c1(B t, B x) {
|
||||
i++;
|
||||
}
|
||||
allSame:;
|
||||
decG(x);
|
||||
if (v(x)->refc > 1) {
|
||||
FL_SET(x, fl_asc|fl_dsc);
|
||||
incByG(x, -1);
|
||||
} else {
|
||||
decG(x);
|
||||
}
|
||||
Arr* r = allZeroes(n);
|
||||
bitarrv_ptr((TyArr*) r)[0] = 1;
|
||||
return taga(arr_shVec(r));
|
||||
|
||||
Loading…
Reference in New Issue
Block a user