Solve R_fact in Prop.v