mark input of ∊𝕩 as fl_asc|fl_dsc if it's all same

This commit is contained in:
dzaima 2024-10-09 01:13:51 +03:00
parent 7326348c79
commit 1eee4d7450

View File

@ -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));