Problem:
 from(x) -> :(x,from(s(x)))
 sel(0(),:(y,z)) -> y
 sel(s(x),:(y,z)) -> sel(x,z)

Proof:
 Church Rosser Transformation Processor (critical pair closing system, Thm 2.11):
  
  critical peaks: joinable
  Qed