Simplify "(let ((v $1)) (pcase v))" => "(pcase $1)".