+rnExpr (HsKappa matches)
+ = rnMatchGroup LambdaExpr matches `thenM` \ (matches', fvMatch) ->
+ return (HsKappa matches', fvMatch)
+rnExpr (HsKappaApp fun arg)
+ = rnLExpr fun `thenM` \ (fun',fvFun) ->
+ rnLExpr arg `thenM` \ (arg',fvArg) ->
+ return (HsKappaApp fun' arg', fvFun `plusFV` fvArg)