Change MonoReduce to do fixed-pointing, since it sometimes enables more optimizations for itself (e.g., yanking lambdas out of [case]s)

type r = {A : int, B : int, C : float}
type string = int

val x : r = {A = 1, B = "hi", C = 2.3}