-definition clen:
- C \to nat
-\def
- let rec clen (c: C) on c: nat \def (match c with [(CSort _) \Rightarrow O |
-(CHead c0 k _) \Rightarrow (s k (clen c0))]) in clen.
+rec definition clen (c: C) on c: nat \def match c with [(CSort _) \Rightarrow
+O | (CHead c0 k _) \Rightarrow (s k (clen c0))].