Corrected energy measurement of the RSRP

lib/src/phy/ch_estimation/chest_dl.c

@@ -543,8 +543,7 @@ void chest_interpolate_noise_est(srslte_chest_dl_t *q, cf_t *input, cf_t *ce, ui
 
   /* Compute RSRP for the channel estimates in this port */
   uint32_t npilots = SRSLTE_REFSIGNAL_NUM_SF(q->cell.nof_prb, port_id);
-  float energy = cabsf(srslte_vec_acc_cc(q->pilot_estimates, npilots)/npilots);
+  q->rsrp[rxant_id][port_id] = __real__ srslte_vec_dot_prod_conj_ccc(q->pilot_estimates, q->pilot_estimates, npilots) / npilots;
-  q->rsrp[rxant_id][port_id] = energy*energy;
   q->rssi[rxant_id][port_id] = srslte_chest_dl_rssi(q, input, port_id);
 }