| ⊦ flatten(val ++ shortval(sho)) = flatten(val) ++ shortval(sho) |
is_valuelist(val ++ shortval(sho)) ⊦ flatten(val ++ shortval(sho)) = flatten(val) ++ shortval(sho)
⊦ ¬ is_valuelist(val) → flatten(val) = val
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ val ++ val1 = val0 ++ val1 ↔ val = val0], [CSIMPSEQ : ⊦ is_valuelist(val ++ val0)])], [EXTRAFMAS : (is_valuelist(val ++ shortval(sho)))]]