Section Backward.
Variable (X: Const).
Implicit Types (sigma: nat -> exp X) (x y z c n: nat).
Definition sub_sol sigma x :=
match dec_enc (sigma x) with
| inl (exist _ k _) => k
| inr _ => 0
end.
End Backward.

Lemma Dowek X : H10 ⪯ SOU X 3.