Nuprl Lemma : seq-add-len
∀[T:Type]. ∀[s:sequence(T)]. ∀[x:Top].  (||seq-add(s;x)|| ~ ||s|| + 1)
Proof
Definitions occuring in Statement : 
seq-add: seq-add(s;x), 
seq-len: ||s||, 
sequence: sequence(T), 
uall: ∀[x:A]. B[x], 
top: Top, 
add: n + m, 
natural_number: $n, 
universe: Type, 
sqequal: s ~ t
Definitions unfolded in proof : 
pi1: fst(t), 
seq-add: seq-add(s;x), 
seq-len: ||s||, 
sequence: sequence(T), 
member: t ∈ T, 
uall: ∀[x:A]. B[x]
Lemmas referenced : 
sequence_wf, 
top_wf
Rules used in proof : 
universeEquality, 
hypothesisEquality, 
isectElimination, 
hypothesis, 
extract_by_obid, 
cut, 
sqequalAxiom, 
sqequalRule, 
thin, 
productElimination, 
sqequalHypSubstitution, 
introduction, 
isect_memberFormation, 
sqequalReflexivity, 
computationStep, 
sqequalTransitivity, 
sqequalSubstitution
Latex:
\mforall{}[T:Type].  \mforall{}[s:sequence(T)].  \mforall{}[x:Top].    (||seq-add(s;x)||  \msim{}  ||s||  +  1)
Date html generated:
2018_07_25-PM-01_29_44
Last ObjectModification:
2018_06_19-AM-10_15_07
Theory : arithmetic
Home
Index