Nuprl Lemma : list-diff2

[T:Type]. ∀[eq:EqDecider(T)]. ∀[as:T List]. ∀[b,c:T].  (as-[b; c] as-[b]-[c] ∈ (T List))


Proof




Definitions occuring in Statement :  list-diff: as-bs cons: [a b] nil: [] list: List deq: EqDecider(T) uall: [x:A]. B[x] universe: Type equal: t ∈ T
Definitions unfolded in proof :  uall: [x:A]. B[x] member: t ∈ T squash: T prop: true: True subtype_rel: A ⊆B uimplies: supposing a guard: {T} iff: ⇐⇒ Q and: P ∧ Q rev_implies:  Q implies:  Q append: as bs all: x:A. B[x] so_lambda: so_lambda(x,y,z.t[x; y; z]) top: Top so_apply: x[s1;s2;s3]
Lemmas referenced :  equal_wf squash_wf true_wf list-diff_wf cons_wf nil_wf list-diff-diff iff_weakening_equal list_ind_cons_lemma list_ind_nil_lemma
Rules used in proof :  sqequalSubstitution sqequalTransitivity computationStep sqequalReflexivity isect_memberFormation introduction cut applyEquality thin lambdaEquality sqequalHypSubstitution imageElimination extract_by_obid isectElimination hypothesisEquality equalityTransitivity hypothesis equalitySymmetry because_Cache cumulativity natural_numberEquality sqequalRule imageMemberEquality baseClosed universeEquality independent_isectElimination productElimination independent_functionElimination dependent_functionElimination isect_memberEquality voidElimination voidEquality axiomEquality

Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[as:T  List].  \mforall{}[b,c:T].    (as-[b;  c]  =  as-[b]-[c])



Date html generated: 2017_04_17-AM-09_13_08
Last ObjectModification: 2017_02_27-PM-05_19_50

Theory : decidable!equality


Home Index