IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
interleaving split111 1. T : Type
2. L : T List
3. P : ||L||Prop
4. x:||L||. Dec(P(x))
5. n : 6. k : 7. f : n||L||
8. g : k||L||
9. increasing(f;n)
10. increasing(g;k)
11. i:n. P(f(i))
12. j:k. P(g(j))
13. i:||L||. (j:n. i = f(j)) (j:k. i = g(j))
14. L2 : T List
15. ||L2|| = n 16. sublist_occurence(T;L2;L;f)
17. L1 : T List
18. ||L1|| = k 19. sublist_occurence(T;L1;L;g)
interleaving_occurence(T;L2;L1;L;f;g)
By:
All (Unfolds [`interleaving_occurence`;`sublist_occurence`]) THEN ExRepD
THEN
SimpConcl