fact: Definition dee_dec k e := match e with | dee_nat n => dee_nat n | dee_var v => dee_var v | dee_par 0 => dee_var k | dee_par (S i) => dee_par i | dee_comp o v w => dee_comp o v w end.
imports: List Arith Lia Undecidability.Shared.Libs.DLW.Utils(utils_list) Undecidability.H10.Dio(dio_logic)