Nuprl Lemma : band_spread_left

∀[F,G,x:Top].  (let a,b = x in F[a;b] ∧b G ~ let a,b = x in F[a;b] ∧b G)


Proof




Definitions occuring in Statement :  band: p ∧b q,  uall: ∀[x:A]. B[x],  top: Top,  so_apply: x[s1;s2],  spread: spread def,  sqequal: s ~ t
Definitions unfolded in proof :  uall: ∀[x:A]. B[x],  member: t ∈ T,  so_apply: x[s1;s2],  band: p ∧b q,  bfalse: ff,  ifthenelse: if b then t else f fi ,  it: ⋅,  so_lambda: so_lambda(x,y,z,w.t[x; y; z; w]),  so_apply: x[s1;s2;s3;s4],  so_lambda: λ2x.t[x],  top: Top,  so_apply: x[s],  uimplies: b supposing a,  strict4: strict4(F),  and: P ∧ Q,  all: ∀x:A. B[x],  implies: P ⇒ Q,  has-value: (a)↓,  prop: ℙ,  guard: {T},  or: P ∨ Q,  squash: ↓T,  so_lambda: λ2x y.t[x; y]
Lemmas referenced :  lifting-strict-spread,  top_wf,  equal_wf,  has-value_wf_base,  base_wf,  is-exception_wf
Rules used in proof :  sqequalSubstitution,  sqequalTransitivity,  computationStep,  sqequalReflexivity,  isect_memberFormation,  introduction,  cut,  sqequalRule,  extract_by_obid,  sqequalHypSubstitution,  isectElimination,  thin,  baseClosed,  isect_memberEquality,  voidElimination,  voidEquality,  independent_isectElimination,  independent_pairFormation,  lambdaFormation,  callbyvalueDecide,  hypothesis,  hypothesisEquality,  equalityTransitivity,  equalitySymmetry,  unionEquality,  unionElimination,  sqleReflexivity,  dependent_functionElimination,  independent_functionElimination,  baseApply,  closedConclusion,  decideExceptionCases,  inrFormation,  because_Cache,  imageMemberEquality,  imageElimination,  exceptionSqequal,  inlFormation,  sqequalAxiom

Latex:
\mforall{}[F,G,x:Top].    (let  a,b  =  x  in  F[a;b]  \mwedge{}\msubb{}  G  \msim{}  let  a,b  =  x  in  F[a;b]  \mwedge{}\msubb{}  G)



Date html generated: 2017_10_01-AM-08_39_23
Last ObjectModification: 2017_07_26-PM-04_27_27

Theory : untyped!computation


Home Index