Nuprl Lemma : test-bnot-nbot

∀[p:Top]. (¬b¬bp ~ p ∧b tt)


Proof




Definitions occuring in Statement :  band: p ∧b q,  bnot: ¬bb,  btrue: tt,  uall: ∀[x:A]. B[x],  top: Top,  sqequal: s ~ t
Definitions unfolded in proof :  uall: ∀[x:A]. B[x],  member: t ∈ T,  bnot: ¬bb,  ifthenelse: if b then t else f fi ,  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,  bfalse: ff,  btrue: tt,  it: ⋅,  band: p ∧b q
Lemmas referenced :  lifting-strict-decide,  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{}[p:Top].  (\mneg{}\msubb{}\mneg{}\msubb{}p  \msim{}  p  \mwedge{}\msubb{}  tt)



Date html generated: 2017_10_01-AM-08_43_32
Last ObjectModification: 2017_07_26-PM-04_29_51

Theory : untyped!computation


Home Index