added function remove_b1_slope_from_betacurve