add fact_r