Fac_F_RR1 function

Part of the steepest descent algorithm and work to reduce error given the S and F matrices.