Step
*
1
of Lemma
equal_upto_mklist_eq
1. f : 
 
 
@i
2. g : 
 
 
@i
3. n : 
@i
4. 
m:
n. ((f m) = (g m))@i
5. m : 
@i
6. m 
 n@i
 mklist(m;f) = mklist(m;g)
BY
{ (BLemma `list_extensionality` THEN Auto) }
1
1. f : 
 
 
@i
2. g : 
 
 
@i
3. n : 
@i
4. 
m:
n. ((f m) = (g m))@i
5. m : 
@i
6. m 
 n@i
 ||mklist(m;f)|| = ||mklist(m;g)||
2
1. f : 
 
 
@i
2. g : 
 
 
@i
3. n : 
@i
4. 
m:
n. ((f m) = (g m))@i
5. m : 
@i
6. m 
 n@i
7. i : 
@i
8. i < ||mklist(m;f)||@1
 mklist(m;f)[i] = mklist(m;g)[i]
1.  f  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}@i
2.  g  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}@i
3.  n  :  \mBbbN{}@i
4.  \mforall{}m:\mBbbN{}n.  ((f  m)  =  (g  m))@i
5.  m  :  \mBbbN{}@i
6.  m  \mleq{}  n@i
\mvdash{}  mklist(m;f)  =  mklist(m;g)
By
(BLemma  `list\_extensionality`  THEN  Auto)
Home
Index