continue;
}
- size_t n_drop;
- if (at == CTAT_SUBTABLE
- && t->clabels_from_axis != PIVOT_AXIS_LAYER
- && t->clabels_to_axis != PIVOT_AXIS_LAYER)
- n_drop = a == t->clabels_from_axis ? 2 : 0;
- else if (at == CTAT_SUBTABLE && t->label_axis[PIVOT_AXIS_ROW] == PIVOT_AXIS_LAYER)
+ enum pivot_axis_type ata, atb;
+ if (at == CTAT_ROW || at == CTAT_LAYERROW)
{
- if (a == PIVOT_AXIS_COLUMN)
- n_drop = 1;
- else
- {
- if (a == PIVOT_AXIS_ROW)
- {
- size_t n = nest->n_areas[at];
- if (n > 1)
- {
- nest->areas[at][n - 2] = nest->areas[at][n - 1];
- nest->n_areas[at]--;
- }
- }
- n_drop = 0;
- }
- }
- else if (at == CTAT_SUBTABLE && t->label_axis[PIVOT_AXIS_COLUMN] == PIVOT_AXIS_LAYER)
- {
- if (a == PIVOT_AXIS_ROW)
- n_drop = 1;
- else
- {
- if (a == PIVOT_AXIS_COLUMN)
- {
- size_t n = nest->n_areas[at];
- if (n > 1)
- {
- nest->areas[at][n - 2] = nest->areas[at][n - 1];
- nest->n_areas[at]--;
- }
- }
- n_drop = 0;
- }
+ ata = PIVOT_AXIS_ROW;
+ atb = PIVOT_AXIS_COLUMN;
}
- else if (at == CTAT_ROW && a == PIVOT_AXIS_COLUMN && t->label_axis[PIVOT_AXIS_ROW] == PIVOT_AXIS_COLUMN)
- n_drop = 0;
- else if (at == CTAT_COL && a == PIVOT_AXIS_ROW && t->label_axis[PIVOT_AXIS_ROW] == PIVOT_AXIS_COLUMN)
+ else if (at == CTAT_COL || at == CTAT_LAYERCOL)
{
- size_t n = nest->n_areas[at];
- if (n > 1)
- {
- nest->areas[at][n - 2] = nest->areas[at][n - 1];
- nest->n_areas[at]--;
- }
- n_drop = 0;
+ ata = PIVOT_AXIS_COLUMN;
+ atb = PIVOT_AXIS_ROW;
}
- else if (at == CTAT_COL && a == PIVOT_AXIS_ROW && t->label_axis[PIVOT_AXIS_COLUMN] == PIVOT_AXIS_ROW)
- continue;
- else if (at == CTAT_ROW && a == PIVOT_AXIS_COLUMN && t->label_axis[PIVOT_AXIS_COLUMN] == PIVOT_AXIS_ROW)
- {
- size_t n = nest->n_areas[at];
- if (n > 1)
- {
- nest->areas[at][n - 2] = nest->areas[at][n - 1];
- nest->n_areas[at]--;
- }
- n_drop = 0;
- }
- else if (at == CTAT_COL && a == PIVOT_AXIS_ROW && t->label_axis[PIVOT_AXIS_ROW] == PIVOT_AXIS_LAYER)
+
+ size_t n_drop = 0;
+ bool drop_inner = false;
+ switch (at)
{
- size_t n = nest->n_areas[at];
- if (n > 1)
+ case CTAT_SUBTABLE:
+ if (t->clabels_from_axis == PIVOT_AXIS_LAYER)
+ n_drop = a != PIVOT_AXIS_LAYER;
+ else if (t->clabels_to_axis != PIVOT_AXIS_LAYER)
+ n_drop = a == t->clabels_from_axis ? 2 : 0;
+ else if (a != PIVOT_AXIS_LAYER && a != t->clabels_from_axis)
+ n_drop = 1;
+ else
+ drop_inner = a == t->clabels_from_axis;
+ break;
+
+ case CTAT_LAYERROW:
+ case CTAT_LAYERCOL:
+ n_drop = a == ata && t->label_axis[ata] == atb;
+ break;
+
+ case CTAT_ROW:
+ case CTAT_COL:
+ if (a == atb)
{
- nest->areas[at][n - 2] = nest->areas[at][n - 1];
- nest->n_areas[at]--;
+ if (t->clabels_from_axis == atb)
+ drop_inner = true;
+ else if (t->clabels_to_axis != atb)
+ n_drop = 1;
}
- n_drop = 0;
+ else if (a == ata)
+ n_drop = t->label_axis[ata] == atb;
+ break;
+
+ case CTAT_LAYER:
+ case CTAT_TABLE:
+ break;
}
- else if (at == CTAT_ROW && a == PIVOT_AXIS_COLUMN && t->label_axis[PIVOT_AXIS_COLUMN] == PIVOT_AXIS_LAYER)
+
+ if (drop_inner)
{
size_t n = nest->n_areas[at];
if (n > 1)
nest->areas[at][n - 2] = nest->areas[at][n - 1];
nest->n_areas[at]--;
}
- n_drop = 0;
- }
- else
- {
- bool drop_last = (at == CTAT_SUBTABLE ? a != PIVOT_AXIS_LAYER
- : at == CTAT_ROW ? a == PIVOT_AXIS_COLUMN
- : at == CTAT_COL ? a == PIVOT_AXIS_ROW
- : false);
- bool drop_additional
- = ((t->label_axis[PIVOT_AXIS_ROW] == PIVOT_AXIS_COLUMN && (at == CTAT_ROW || at == CTAT_LAYERROW) && a == PIVOT_AXIS_ROW)
- || (t->label_axis[PIVOT_AXIS_COLUMN] == PIVOT_AXIS_ROW && (at == CTAT_COL || at == CTAT_LAYERCOL) && a == PIVOT_AXIS_COLUMN));
-
- n_drop = 0;
- if (drop_last)
- n_drop++;
- if (drop_additional)
- n_drop++;
}
-
for (size_t i = 0; i < n_drop; i++)
if (nest->n_areas[at] > 0)
nest->n_areas[at]--;