| cl = co + cl0 ⊦ cl = [], sources(cl, d) = (((∃ d0. d0 ∈ sources(cl0, d) ∧ cdom(co) ⇒ d0) ⊃ sources(cl0, d) ++ cdom(co); sources(cl0, d))) |
⊦ sources(co ' + cl0, d) = (((∃ d0. d0 ∈ sources(cl0, d) ∧ cdom(co) ⇒ d0) ⊃ sources(cl0, d) ++ cdom(co); sources(cl0, d)))
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : list, gen-command-list, a, ⊦ (cl + cl0) + cl1 = cl + cl0 + cl1], [CSIMPNAMEDSEQ : list, gen-command-list, e-01, ⊦ co ' + cl ≠ []], [CSIMPNAMEDSEQ : list, gen-command-list, c, ⊦ co + cl = co ' + cl])]]