(* This file was automatically generated: do not edit *********************)
-include "Basic-1/A/defs.ma".
+include "basic_1/A/defs.ma".
-definition lweight:
- A \to nat
-\def
- let rec lweight (a: A) on a: nat \def (match a with [(ASort _ _) \Rightarrow
-O | (AHead a1 a2) \Rightarrow (S (plus (lweight a1) (lweight a2)))]) in
-lweight.
+rec definition lweight (a: A) on a: nat \def match a with [(ASort _ _)
+\Rightarrow O | (AHead a1 a2) \Rightarrow (S (plus (lweight a1) (lweight
+a2)))].
definition llt:
A \to (A \to Prop)