\Rightarrow (match k with [(Bind b) \Rightarrow (match b with [Abbr
\Rightarrow (S (plus (weight_map f u) (weight_map (wadd f (S (weight_map f
u))) t0))) | Abst \Rightarrow (S (plus (weight_map f u) (weight_map (wadd f
\Rightarrow (match k with [(Bind b) \Rightarrow (match b with [Abbr
\Rightarrow (S (plus (weight_map f u) (weight_map (wadd f (S (weight_map f
u))) t0))) | Abst \Rightarrow (S (plus (weight_map f u) (weight_map (wadd f