|
@@
-2,6
+2,7
|
|
2
|
// version 1.0: 31/07/2013
|
|
2
|
// version 1.0: 31/07/2013
|
|
3
|
// version 1.1: 02/04/2014
|
|
3
|
// version 1.1: 02/04/2014
|
|
4
|
// version 1.2: 30/04/2014
|
|
4
|
// version 1.2: 30/04/2014
|
|
|
|
|
5
|
// version 1.3: 02/05/2014
|
|
5
|
|
|
6
|
|
|
6
|
#include "basic_parameters.h"
|
|
7
|
#include "basic_parameters.h"
|
|
7
|
#include <math.h>
|
|
8
|
#include <math.h>
|
|
@@
-92,8
+93,7
void init_k_f0( void )
|
|
92
|
float alpha_M = 45 * (3.1415927/180);
|
|
93
|
float alpha_M = 45 * (3.1415927/180);
|
|
93
|
|
|
94
|
|
|
94
|
void BP1_set( float * compressed_spec_mat, uint8_t nb_bins_compressed_spec_mat, uint8_t * lfr_bp1 ){
|
|
95
|
void BP1_set( float * compressed_spec_mat, uint8_t nb_bins_compressed_spec_mat, uint8_t * lfr_bp1 ){
|
|
95
|
int exponent; // 32 bits signed
|
|
96
|
float PSDB; // 32-bit floating point
|
|
96
|
float PSDB; // 32 bits floating point
|
|
|
|
|
97
|
float PSDE;
|
|
97
|
float PSDE;
|
|
98
|
float tmp;
|
|
98
|
float tmp;
|
|
99
|
float NVEC_V0;
|
|
99
|
float NVEC_V0;
|
|
@@
-110,13
+110,14
void BP1_set( float * compressed_spec_ma
|
|
110
|
float bx_bx_star;
|
|
110
|
float bx_bx_star;
|
|
111
|
float vphi;
|
|
111
|
float vphi;
|
|
112
|
float significand;
|
|
112
|
float significand;
|
|
113
|
uint8_t nbitexp; // 8 bits unsigned
|
|
113
|
int exponent; // 32-bit signed integer
|
|
|
|
|
114
|
uint8_t nbitexp; // 8-bit unsigned integer
|
|
114
|
uint8_t nbitsig;
|
|
115
|
uint8_t nbitsig;
|
|
115
|
uint8_t tmp_uint8;
|
|
116
|
uint8_t tmp_uint8;
|
|
116
|
uint8_t *pt_uint8; // pointer on unsigned 8-bit bytes
|
|
117
|
uint8_t *pt_uint8; // pointer on unsigned 8-bit integer
|
|
117
|
int8_t expmin; // 8 bits signed
|
|
118
|
int8_t expmin; // 8-bit signed integer
|
|
118
|
int8_t expmax;
|
|
119
|
int8_t expmax;
|
|
119
|
int16_t rangesig; // 16 bits unsigned
|
|
120
|
uint16_t rangesig; // 16-bit unsigned integer
|
|
120
|
uint16_t psd;
|
|
121
|
uint16_t psd;
|
|
121
|
uint16_t exp;
|
|
122
|
uint16_t exp;
|
|
122
|
uint16_t tmp_uint16;
|
|
123
|
uint16_t tmp_uint16;
|
|
@@
-259,16
+260,16
void BP1_set( float * compressed_spec_ma
|
|
259
|
NVEC_V1 = -compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+4] / tmp; // S13 Im => n2
|
|
260
|
NVEC_V1 = -compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+4] / tmp; // S13 Im => n2
|
|
260
|
NVEC_V2 = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+2] / tmp; // S12 Im => n3
|
|
261
|
NVEC_V2 = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+2] / tmp; // S12 Im => n3
|
|
261
|
|
|
262
|
|
|
262
|
lfr_bp1[i*NB_BYTES_BP1+4] = (uint8_t) (NVEC_V0*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
263
|
lfr_bp1[i*NB_BYTES_BP1+4] = (uint8_t) (NVEC_V0*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
263
|
lfr_bp1[i*NB_BYTES_BP1+5] = (uint8_t) (NVEC_V1*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
264
|
lfr_bp1[i*NB_BYTES_BP1+5] = (uint8_t) (NVEC_V1*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
264
|
pt_uint8 = (uint8_t*) &NVEC_V2; // affect an uint8_t pointer with the adress of NVEC_V2
|
|
265
|
pt_uint8 = (uint8_t*) &NVEC_V2; // Affect an uint8_t pointer with the adress of NVEC_V2
|
|
265
|
#ifdef LSB_FIRST_TCH
|
|
266
|
#ifdef LSB_FIRST_TCH
|
|
266
|
lfr_bp1[i*NB_BYTES_BP1+6] = pt_uint8[3] & 0x80; // extract the sign bit of NVEC_V2 (32-bit float, sign bit in the 4th octet:PC convention)
|
|
267
|
lfr_bp1[i*NB_BYTES_BP1+6] = pt_uint8[3] & 0x80; // Extract the sign bit of NVEC_V2 (32-bit float, sign bit in the 4th octet:PC convention)
|
|
267
|
// record it at the 8th bit position (from the right to the left) of lfr_bp1[i*NB_BYTES_BP1+6]
|
|
268
|
// Record it at the 8th bit position (from the right to the left) of lfr_bp1[i*NB_BYTES_BP1+6]
|
|
268
|
#endif
|
|
269
|
#endif
|
|
269
|
#ifdef MSB_FIRST_TCH
|
|
270
|
#ifdef MSB_FIRST_TCH
|
|
270
|
lfr_bp1[i*NB_BYTES_BP1+6] = pt_uint8[0] & 0x80; // extract the sign bit of NVEC_V2 (32-bit float, sign bit in the 0th octet:SPARC convention)
|
|
271
|
lfr_bp1[i*NB_BYTES_BP1+6] = pt_uint8[0] & 0x80; // Extract the sign bit of NVEC_V2 (32-bit float, sign bit in the 0th octet:SPARC convention)
|
|
271
|
// record it at the 8th bit position (from the right to the left) of lfr_bp1[i*NB_BYTES_BP1+6]
|
|
272
|
// Record it at the 8th bit position (from the right to the left) of lfr_bp1[i*NB_BYTES_BP1+6]
|
|
272
|
#endif
|
|
273
|
#endif
|
|
273
|
#ifdef DEBUG_TCH
|
|
274
|
#ifdef DEBUG_TCH
|
|
274
|
printf("NVEC_V0 : %16.8e\n",NVEC_V0);
|
|
275
|
printf("NVEC_V0 : %16.8e\n",NVEC_V0);
|
|
@@
-280,11
+281,11
void BP1_set( float * compressed_spec_ma
|
|
280
|
#endif
|
|
281
|
#endif
|
|
281
|
//=======================================================
|
|
282
|
//=======================================================
|
|
282
|
// BP1 ellipticity == PA_LFR_SC_BP1_ELLIP_F0 == 4 bits
|
|
283
|
// BP1 ellipticity == PA_LFR_SC_BP1_ELLIP_F0 == 4 bits
|
|
283
|
aux = 2*tmp / PSDB; // compute the ellipticity
|
|
284
|
aux = 2*tmp / PSDB; // Compute the ellipticity
|
|
284
|
|
|
285
|
|
|
285
|
tmp_uint8 = (uint8_t) (aux*15 + 0.5); // shift and cast into a 8-bit uint8_t with rounding
|
|
286
|
tmp_uint8 = (uint8_t) (aux*15 + 0.5); // Shift and cast into a 8-bit uint8_t with rounding
|
|
286
|
// where just the first 4 bits are used (0, ..., 15)
|
|
287
|
// where just the first 4 bits are used (0, ..., 15)
|
|
287
|
lfr_bp1[i*NB_BYTES_BP1+6] = lfr_bp1[i*NB_BYTES_BP1+6] | (tmp_uint8 << 3); // put these 4 bits next to the right place
|
|
288
|
lfr_bp1[i*NB_BYTES_BP1+6] = lfr_bp1[i*NB_BYTES_BP1+6] | (tmp_uint8 << 3); // Put these 4 bits next to the right place
|
|
288
|
// of the sign bit of NVEC_V2 (recorded
|
|
289
|
// of the sign bit of NVEC_V2 (recorded
|
|
289
|
// previously in lfr_bp1[i*NB_BYTES_BP1+6])
|
|
290
|
// previously in lfr_bp1[i*NB_BYTES_BP1+6])
|
|
290
|
#ifdef DEBUG_TCH
|
|
291
|
#ifdef DEBUG_TCH
|
|
@@
-304,11
+305,11
void BP1_set( float * compressed_spec_ma
|
|
304
|
+ 2 * compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+10]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+10]
|
|
305
|
+ 2 * compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+10]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+10]
|
|
305
|
+ 2 * compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+11]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+11];
|
|
306
|
+ 2 * compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+11]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+11];
|
|
306
|
aux = PSDB*PSDB;
|
|
307
|
aux = PSDB*PSDB;
|
|
307
|
tmp = ( 3*tr_SB_SB - aux ) / ( 2 * aux ); // compute the degree of polarisation
|
|
308
|
tmp = ( 3*tr_SB_SB - aux ) / ( 2 * aux ); // Compute the degree of polarisation
|
|
308
|
|
|
309
|
|
|
309
|
tmp_uint8 = (uint8_t) (tmp*7 + 0.5);// shift and cast into a 8-bit uint8_t with rounding
|
|
310
|
tmp_uint8 = (uint8_t) (tmp*7 + 0.5); // Shift and cast into a 8-bit uint8_t with rounding
|
|
310
|
// where just the first 3 bits are used (0, ..., 7)
|
|
311
|
// where just the first 3 bits are used (0, ..., 7)
|
|
311
|
lfr_bp1[i*NB_BYTES_BP1+6] = lfr_bp1[i*NB_BYTES_BP1+6] | tmp_uint8; // record these 3 bits at the 3 first bit positions
|
|
312
|
lfr_bp1[i*NB_BYTES_BP1+6] = lfr_bp1[i*NB_BYTES_BP1+6] | tmp_uint8; // Record these 3 bits at the 3 first bit positions
|
|
312
|
// (from the right to the left) of lfr_bp1[i*NB_BYTES_BP1+6]
|
|
313
|
// (from the right to the left) of lfr_bp1[i*NB_BYTES_BP1+6]
|
|
313
|
#ifdef DEBUG_TCH
|
|
314
|
#ifdef DEBUG_TCH
|
|
314
|
printf("DOP : %16.8e\n",tmp);
|
|
315
|
printf("DOP : %16.8e\n",tmp);
|
|
@@
-390,7
+391,7
void BP1_set( float * compressed_spec_ma
|
|
390
|
printf("lfr_bp1[i*NB_BYTES_BP1+7] for ReaSX significand : %u\n",lfr_bp1[i*NB_BYTES_BP1+7]);
|
|
391
|
printf("lfr_bp1[i*NB_BYTES_BP1+7] for ReaSX significand : %u\n",lfr_bp1[i*NB_BYTES_BP1+7]);
|
|
391
|
printf("tmp_uint8 for ReaSX exponent : %d\n",tmp_uint8);
|
|
392
|
printf("tmp_uint8 for ReaSX exponent : %d\n",tmp_uint8);
|
|
392
|
#endif
|
|
393
|
#endif
|
|
393
|
lfr_bp1[i*NB_BYTES_BP1+7] = lfr_bp1[i*NB_BYTES_BP1+7] | (tmp_uint8 << 3); // shift these 5 bits to the left before logical addition
|
|
394
|
lfr_bp1[i*NB_BYTES_BP1+7] = lfr_bp1[i*NB_BYTES_BP1+7] | (tmp_uint8 << 3); // Shift these 5 bits to the left before logical addition
|
|
394
|
// with lfr_bp1[i*NB_BYTES_BP1+7]
|
|
395
|
// with lfr_bp1[i*NB_BYTES_BP1+7]
|
|
395
|
#ifdef DEBUG_TCH
|
|
396
|
#ifdef DEBUG_TCH
|
|
396
|
printf("lfr_bp1[i*NB_BYTES_BP1+7] for ReaSX exponent + significand : %u\n",lfr_bp1[i*NB_BYTES_BP1+7]);
|
|
397
|
printf("lfr_bp1[i*NB_BYTES_BP1+7] for ReaSX exponent + significand : %u\n",lfr_bp1[i*NB_BYTES_BP1+7]);
|
|
@@
-535,12
+536,21
void BP1_set( float * compressed_spec_ma
|
|
535
|
|
|
536
|
|
|
536
|
void BP2_set( float * compressed_spec_mat, uint8_t nb_bins_compressed_spec_mat, uint8_t * lfr_bp2 )
|
|
537
|
void BP2_set( float * compressed_spec_mat, uint8_t nb_bins_compressed_spec_mat, uint8_t * lfr_bp2 )
|
|
537
|
{
|
|
538
|
{
|
|
538
|
int i, exponent;
|
|
539
|
float cross_re; // 32-bit floating point
|
|
539
|
float aux, significand, cross_re, cross_im;
|
|
540
|
float cross_im;
|
|
540
|
int8_t nbitexp, nbitsig, expmin, expmax; // 8 bits
|
|
541
|
float aux;
|
|
541
|
int16_t rangesig; // 16 bits
|
|
542
|
float significand;
|
|
542
|
uint16_t autocor, tmp_uint16; // 16 bits
|
|
543
|
int exponent; // 32-bit signed integer
|
|
543
|
uint16_t *pt_u_short_int; // pointer on unsigned 16-bit words
|
|
544
|
uint8_t nbitexp; // 8-bit unsigned integer
|
|
|
|
|
545
|
uint8_t nbitsig;
|
|
|
|
|
546
|
uint8_t *pt_uint8; // pointer on unsigned 8-bit integer
|
|
|
|
|
547
|
int8_t expmin; // 8-bit signed integer
|
|
|
|
|
548
|
int8_t expmax;
|
|
|
|
|
549
|
uint16_t rangesig; // 16-bit unsigned integer
|
|
|
|
|
550
|
uint16_t autocor;
|
|
|
|
|
551
|
uint16_t exp;
|
|
|
|
|
552
|
uint16_t tmp_uint16;
|
|
|
|
|
553
|
uint16_t i;
|
|
544
|
|
|
554
|
|
|
545
|
#ifdef DEBUG_TCH
|
|
555
|
#ifdef DEBUG_TCH
|
|
546
|
printf("BP2 : \n");
|
|
556
|
printf("BP2 : \n");
|
|
@@
-586,8
+596,8
void BP2_set( float * compressed_spec_ma
|
|
586
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]);
|
|
596
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]);
|
|
587
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+1] / aux;
|
|
597
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+1] / aux;
|
|
588
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+2] / aux;
|
|
598
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+2] / aux;
|
|
589
|
lfr_bp2[i*NB_BYTES_BP2+10] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
599
|
lfr_bp2[i*NB_BYTES_BP2+10] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
590
|
lfr_bp2[i*NB_BYTES_BP2+20] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
600
|
lfr_bp2[i*NB_BYTES_BP2+20] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
591
|
#ifdef DEBUG_TCH
|
|
601
|
#ifdef DEBUG_TCH
|
|
592
|
printf("\nBin number: %d\n", i);
|
|
602
|
printf("\nBin number: %d\n", i);
|
|
593
|
printf("lfr_bp2[i*NB_BYTES_BP2+10] for cross12_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+10]);
|
|
603
|
printf("lfr_bp2[i*NB_BYTES_BP2+10] for cross12_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+10]);
|
|
@@
-597,8
+607,8
void BP2_set( float * compressed_spec_ma
|
|
597
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]);
|
|
607
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]);
|
|
598
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+3] / aux;
|
|
608
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+3] / aux;
|
|
599
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+4] / aux;
|
|
609
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+4] / aux;
|
|
600
|
lfr_bp2[i*NB_BYTES_BP2+11] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
610
|
lfr_bp2[i*NB_BYTES_BP2+11] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
601
|
lfr_bp2[i*NB_BYTES_BP2+21] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
611
|
lfr_bp2[i*NB_BYTES_BP2+21] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
602
|
#ifdef DEBUG_TCH
|
|
612
|
#ifdef DEBUG_TCH
|
|
603
|
printf("lfr_bp2[i*NB_BYTES_BP2+11] for cross13_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+11]);
|
|
613
|
printf("lfr_bp2[i*NB_BYTES_BP2+11] for cross13_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+11]);
|
|
604
|
printf("lfr_bp2[i*NB_BYTES_BP2+21] for cross13_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+21]);
|
|
614
|
printf("lfr_bp2[i*NB_BYTES_BP2+21] for cross13_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+21]);
|
|
@@
-607,8
+617,8
void BP2_set( float * compressed_spec_ma
|
|
607
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]);
|
|
617
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]);
|
|
608
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+5] / aux;
|
|
618
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+5] / aux;
|
|
609
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+6] / aux;
|
|
619
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+6] / aux;
|
|
610
|
lfr_bp2[i*NB_BYTES_BP2+12] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
620
|
lfr_bp2[i*NB_BYTES_BP2+12] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
611
|
lfr_bp2[i*NB_BYTES_BP2+22] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
621
|
lfr_bp2[i*NB_BYTES_BP2+22] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
612
|
#ifdef DEBUG_TCH
|
|
622
|
#ifdef DEBUG_TCH
|
|
613
|
printf("lfr_bp2[i*NB_BYTES_BP2+12] for cross14_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+12]);
|
|
623
|
printf("lfr_bp2[i*NB_BYTES_BP2+12] for cross14_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+12]);
|
|
614
|
printf("lfr_bp2[i*NB_BYTES_BP2+22] for cross14_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+22]);
|
|
624
|
printf("lfr_bp2[i*NB_BYTES_BP2+22] for cross14_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+22]);
|
|
@@
-617,8
+627,8
void BP2_set( float * compressed_spec_ma
|
|
617
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
627
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
618
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+7] / aux;
|
|
628
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+7] / aux;
|
|
619
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+8] / aux;
|
|
629
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+8] / aux;
|
|
620
|
lfr_bp2[i*NB_BYTES_BP2+13] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
630
|
lfr_bp2[i*NB_BYTES_BP2+13] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
621
|
lfr_bp2[i*NB_BYTES_BP2+23] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
631
|
lfr_bp2[i*NB_BYTES_BP2+23] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
622
|
#ifdef DEBUG_TCH
|
|
632
|
#ifdef DEBUG_TCH
|
|
623
|
printf("lfr_bp2[i*NB_BYTES_BP2+13] for cross15_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+13]);
|
|
633
|
printf("lfr_bp2[i*NB_BYTES_BP2+13] for cross15_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+13]);
|
|
624
|
printf("lfr_bp2[i*NB_BYTES_BP2+23] for cross15_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+23]);
|
|
634
|
printf("lfr_bp2[i*NB_BYTES_BP2+23] for cross15_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+23]);
|
|
@@
-627,8
+637,8
void BP2_set( float * compressed_spec_ma
|
|
627
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]);
|
|
637
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]);
|
|
628
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+10] / aux;
|
|
638
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+10] / aux;
|
|
629
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+11] / aux;
|
|
639
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+11] / aux;
|
|
630
|
lfr_bp2[i*NB_BYTES_BP2+14] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
640
|
lfr_bp2[i*NB_BYTES_BP2+14] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
631
|
lfr_bp2[i*NB_BYTES_BP2+24] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
641
|
lfr_bp2[i*NB_BYTES_BP2+24] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
632
|
#ifdef DEBUG_TCH
|
|
642
|
#ifdef DEBUG_TCH
|
|
633
|
printf("lfr_bp2[i*NB_BYTES_BP2+14] for cross23_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+14]);
|
|
643
|
printf("lfr_bp2[i*NB_BYTES_BP2+14] for cross23_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+14]);
|
|
634
|
printf("lfr_bp2[i*NB_BYTES_BP2+24] for cross23_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+24]);
|
|
644
|
printf("lfr_bp2[i*NB_BYTES_BP2+24] for cross23_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+24]);
|
|
@@
-637,8
+647,8
void BP2_set( float * compressed_spec_ma
|
|
637
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]);
|
|
647
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]);
|
|
638
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+12] / aux;
|
|
648
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+12] / aux;
|
|
639
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+13] / aux;
|
|
649
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+13] / aux;
|
|
640
|
lfr_bp2[i*NB_BYTES_BP2+15] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
650
|
lfr_bp2[i*NB_BYTES_BP2+15] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
641
|
lfr_bp2[i*NB_BYTES_BP2+25] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
651
|
lfr_bp2[i*NB_BYTES_BP2+25] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
642
|
#ifdef DEBUG_TCH
|
|
652
|
#ifdef DEBUG_TCH
|
|
643
|
printf("lfr_bp2[i*NB_BYTES_BP2+15] for cross24_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+15]);
|
|
653
|
printf("lfr_bp2[i*NB_BYTES_BP2+15] for cross24_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+15]);
|
|
644
|
printf("lfr_bp2[i*NB_BYTES_BP2+25] for cross24_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+25]);
|
|
654
|
printf("lfr_bp2[i*NB_BYTES_BP2+25] for cross24_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+25]);
|
|
@@
-647,8
+657,8
void BP2_set( float * compressed_spec_ma
|
|
647
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
657
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
648
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+14] / aux;
|
|
658
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+14] / aux;
|
|
649
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+15] / aux;
|
|
659
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+15] / aux;
|
|
650
|
lfr_bp2[i*NB_BYTES_BP2+16] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
660
|
lfr_bp2[i*NB_BYTES_BP2+16] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
651
|
lfr_bp2[i*NB_BYTES_BP2+26] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
661
|
lfr_bp2[i*NB_BYTES_BP2+26] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
652
|
#ifdef DEBUG_TCH
|
|
662
|
#ifdef DEBUG_TCH
|
|
653
|
printf("lfr_bp2[i*NB_BYTES_BP2+16] for cross25_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+16]);
|
|
663
|
printf("lfr_bp2[i*NB_BYTES_BP2+16] for cross25_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+16]);
|
|
654
|
printf("lfr_bp2[i*NB_BYTES_BP2+26] for cross25_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+26]);
|
|
664
|
printf("lfr_bp2[i*NB_BYTES_BP2+26] for cross25_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+26]);
|
|
@@
-657,8
+667,8
void BP2_set( float * compressed_spec_ma
|
|
657
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]);
|
|
667
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]);
|
|
658
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+17] / aux;
|
|
668
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+17] / aux;
|
|
659
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+18] / aux;
|
|
669
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+18] / aux;
|
|
660
|
lfr_bp2[i*NB_BYTES_BP2+17] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
670
|
lfr_bp2[i*NB_BYTES_BP2+17] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
661
|
lfr_bp2[i*NB_BYTES_BP2+27] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
671
|
lfr_bp2[i*NB_BYTES_BP2+27] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
662
|
#ifdef DEBUG_TCH
|
|
672
|
#ifdef DEBUG_TCH
|
|
663
|
printf("lfr_bp2[i*NB_BYTES_BP2+17] for cross34_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+17]);
|
|
673
|
printf("lfr_bp2[i*NB_BYTES_BP2+17] for cross34_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+17]);
|
|
664
|
printf("lfr_bp2[i*NB_BYTES_BP2+27] for cross34_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+27]);
|
|
674
|
printf("lfr_bp2[i*NB_BYTES_BP2+27] for cross34_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+27]);
|
|
@@
-667,8
+677,8
void BP2_set( float * compressed_spec_ma
|
|
667
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
677
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
668
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+19] / aux;
|
|
678
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+19] / aux;
|
|
669
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+20] / aux;
|
|
679
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+20] / aux;
|
|
670
|
lfr_bp2[i*NB_BYTES_BP2+18] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
680
|
lfr_bp2[i*NB_BYTES_BP2+18] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
671
|
lfr_bp2[i*NB_BYTES_BP2+28] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
681
|
lfr_bp2[i*NB_BYTES_BP2+28] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
672
|
#ifdef DEBUG_TCH
|
|
682
|
#ifdef DEBUG_TCH
|
|
673
|
printf("lfr_bp2[i*NB_BYTES_BP2+18] for cross35_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+18]);
|
|
683
|
printf("lfr_bp2[i*NB_BYTES_BP2+18] for cross35_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+18]);
|
|
674
|
printf("lfr_bp2[i*NB_BYTES_BP2+28] for cross35_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+28]);
|
|
684
|
printf("lfr_bp2[i*NB_BYTES_BP2+28] for cross35_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+28]);
|
|
@@
-677,8
+687,8
void BP2_set( float * compressed_spec_ma
|
|
677
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
687
|
aux = sqrt(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21]*compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24]);
|
|
678
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+22] / aux;
|
|
688
|
cross_re = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+22] / aux;
|
|
679
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+23] / aux;
|
|
689
|
cross_im = compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+23] / aux;
|
|
680
|
lfr_bp2[i*NB_BYTES_BP2+19] = (uint8_t) (cross_re*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
690
|
lfr_bp2[i*NB_BYTES_BP2+19] = (uint8_t) (cross_re*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
681
|
lfr_bp2[i*NB_BYTES_BP2+29] = (uint8_t) (cross_im*127.5 + 128); // shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
691
|
lfr_bp2[i*NB_BYTES_BP2+29] = (uint8_t) (cross_im*127.5 + 128); // Shift and cast into a 8-bit uint8_t (0, ..., 255) with rounding
|
|
682
|
#ifdef DEBUG_TCH
|
|
692
|
#ifdef DEBUG_TCH
|
|
683
|
printf("lfr_bp2[i*NB_BYTES_BP2+19] for cross45_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+19]);
|
|
693
|
printf("lfr_bp2[i*NB_BYTES_BP2+19] for cross45_re (%16.8e) : %.3u\n",cross_re, lfr_bp2[i*NB_BYTES_BP2+19]);
|
|
684
|
printf("lfr_bp2[i*NB_BYTES_BP2+29] for cross45_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+29]);
|
|
694
|
printf("lfr_bp2[i*NB_BYTES_BP2+29] for cross45_im (%16.8e) : %.3u\n",cross_im, lfr_bp2[i*NB_BYTES_BP2+29]);
|
|
@@
-713,19
+723,27
void BP2_set( float * compressed_spec_ma
|
|
713
|
|
|
723
|
|
|
714
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
724
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
715
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
725
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
716
|
tmp_uint16 = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int
|
|
726
|
exp = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int where just
|
|
717
|
// where just the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
727
|
// the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
718
|
pt_u_short_int = (uint16_t*) &lfr_bp2[i*NB_BYTES_BP2+0]; // Affect an uint16_t pointer with the
|
|
728
|
tmp_uint16 = autocor | (exp << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
719
|
// adress where the 16-bit word result will be stored
|
|
729
|
// left place of the significand bits (nbitsig),
|
|
720
|
*pt_u_short_int = autocor | (tmp_uint16 << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
730
|
// making the 16-bit word to be recorded
|
|
721
|
// left place of the significand bits (nbitsig), making
|
|
731
|
pt_uint8 = (uint8_t*) &tmp_uint16; // Affect an uint8_t pointer with the adress of tmp_uint16
|
|
722
|
// the 16-bit word to be recorded, and record it using the pointer
|
|
732
|
#ifdef LSB_FIRST_TCH
|
|
|
|
|
733
|
lfr_bp2[i*NB_BYTES_BP2+0] = pt_uint8[0]; // Record LSB of tmp_uint16
|
|
|
|
|
734
|
lfr_bp2[i*NB_BYTES_BP2+1] = pt_uint8[1]; // Record MSB of tmp_uint16
|
|
|
|
|
735
|
#endif
|
|
|
|
|
736
|
#ifdef MSB_FIRST_TCH
|
|
|
|
|
737
|
lfr_bp2[i*NB_BYTES_BP2+0] = pt_uint8[1]; // Record LSB of tmp_uint16
|
|
|
|
|
738
|
lfr_bp2[i*NB_BYTES_BP2+1] = pt_uint8[0]; // Record MSB of tmp_uint16
|
|
|
|
|
739
|
#endif
|
|
723
|
#ifdef DEBUG_TCH
|
|
740
|
#ifdef DEBUG_TCH
|
|
724
|
printf("autocor for S11 significand : %u\n",autocor );
|
|
741
|
printf("autocor for S11 significand : %u\n",autocor);
|
|
725
|
printf("tmp_uint8 for S11 exponent : %u\n",tmp_uint16 );
|
|
742
|
printf("exp for S11 exponent : %u\n",exp);
|
|
726
|
printf("*pt_u_short_int for S11 exponent + significand : %.3d or %x\n",*pt_u_short_int, *pt_u_short_int);
|
|
743
|
printf("pt_uint8[1] for S11 exponent + significand : %.3d or %2x\n",pt_uint8[1], pt_uint8[1]);
|
|
727
|
printf("lfr_bp2[i*NB_BYTES_BP2+1] : %u or %x\n",lfr_bp2[i*NB_BYTES_BP2+1], lfr_bp2[i*NB_BYTES_BP2+1]);
|
|
744
|
printf("pt_uint8[0] for S11 exponent + significand : %.3d or %2x\n",pt_uint8[0], pt_uint8[0]);
|
|
728
|
printf("lfr_bp2[i*NB_BYTES_BP2+0] : %u or %x\n",lfr_bp2[i*NB_BYTES_BP2+0], lfr_bp2[i*NB_BYTES_BP2+0]);
|
|
745
|
printf("lfr_bp2[i*NB_BYTES_BP2+1] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+1], lfr_bp2[i*NB_BYTES_BP2+1]);
|
|
|
|
|
746
|
printf("lfr_bp2[i*NB_BYTES_BP2+0] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+0], lfr_bp2[i*NB_BYTES_BP2+0]);
|
|
729
|
#endif
|
|
747
|
#endif
|
|
730
|
// S22
|
|
748
|
// S22
|
|
731
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9], &exponent); // 0.5 <= significand < 1
|
|
749
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+9], &exponent); // 0.5 <= significand < 1
|
|
@@
-750,19
+768,27
void BP2_set( float * compressed_spec_ma
|
|
750
|
|
|
768
|
|
|
751
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
769
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
752
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
770
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
753
|
tmp_uint16 = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int
|
|
771
|
exp = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int where just
|
|
754
|
// where just the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
772
|
// the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
755
|
pt_u_short_int = (uint16_t*) &lfr_bp2[i*NB_BYTES_BP2+2]; // Affect an uint16_t pointer with the
|
|
773
|
tmp_uint16 = autocor | (exp << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
756
|
// adress where the 16-bit word result will be stored
|
|
774
|
// left place of the significand bits (nbitsig),
|
|
757
|
*pt_u_short_int = autocor | (tmp_uint16 << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
775
|
// making the 16-bit word to be recorded
|
|
758
|
// left place of the significand bits (nbitsig), making
|
|
776
|
pt_uint8 = (uint8_t*) &tmp_uint16; // Affect an uint8_t pointer with the adress of tmp_uint16
|
|
759
|
// the 16-bit word to be recorded, and record it using the pointer
|
|
777
|
#ifdef LSB_FIRST_TCH
|
|
|
|
|
778
|
lfr_bp2[i*NB_BYTES_BP2+2] = pt_uint8[0]; // Record LSB of tmp_uint16
|
|
|
|
|
779
|
lfr_bp2[i*NB_BYTES_BP2+3] = pt_uint8[1]; // Record MSB of tmp_uint16
|
|
|
|
|
780
|
#endif
|
|
|
|
|
781
|
#ifdef MSB_FIRST_TCH
|
|
|
|
|
782
|
lfr_bp2[i*NB_BYTES_BP2+2] = pt_uint8[1]; // Record LSB of tmp_uint16
|
|
|
|
|
783
|
lfr_bp2[i*NB_BYTES_BP2+3] = pt_uint8[0]; // Record MSB of tmp_uint16
|
|
|
|
|
784
|
#endif
|
|
760
|
#ifdef DEBUG_TCH
|
|
785
|
#ifdef DEBUG_TCH
|
|
761
|
printf("autocor for S22 significand : %d\n",autocor );
|
|
786
|
printf("autocor for S22 significand : %u\n",autocor);
|
|
762
|
printf("tmp_uint8 for S22 exponent : %d\n",tmp_uint16 );
|
|
787
|
printf("exp for S11 exponent : %u\n",exp);
|
|
763
|
printf("*pt_u_short_int for S22 exponent + significand : %.3d or %x\n",*pt_u_short_int, *pt_u_short_int);
|
|
788
|
printf("pt_uint8[1] for S22 exponent + significand : %.3d or %2x\n",pt_uint8[1], pt_uint8[1]);
|
|
764
|
printf("lfr_bp2[i*NB_BYTES_BP2+3] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+3], lfr_bp2[i*NB_BYTES_BP2+3]);
|
|
789
|
printf("pt_uint8[0] for S22 exponent + significand : %.3d or %2x\n",pt_uint8[0], pt_uint8[0]);
|
|
765
|
printf("lfr_bp2[i*NB_BYTES_BP2+2] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+2], lfr_bp2[i*NB_BYTES_BP2+2]);
|
|
790
|
printf("lfr_bp2[i*NB_BYTES_BP2+3] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+3], lfr_bp2[i*NB_BYTES_BP2+3]);
|
|
|
|
|
791
|
printf("lfr_bp2[i*NB_BYTES_BP2+2] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+2], lfr_bp2[i*NB_BYTES_BP2+2]);
|
|
766
|
#endif
|
|
792
|
#endif
|
|
767
|
// S33
|
|
793
|
// S33
|
|
768
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16], &exponent); // 0.5 <= significand < 1
|
|
794
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+16], &exponent); // 0.5 <= significand < 1
|
|
@@
-787,19
+813,27
void BP2_set( float * compressed_spec_ma
|
|
787
|
|
|
813
|
|
|
788
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
814
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
789
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
815
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
790
|
tmp_uint16 = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int
|
|
816
|
exp = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int where just
|
|
791
|
// where just the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
817
|
// the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
792
|
pt_u_short_int = (uint16_t*) &lfr_bp2[i*NB_BYTES_BP2+4]; // Affect an uint16_t pointer with the
|
|
818
|
tmp_uint16 = autocor | (exp << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
793
|
// adress where the 16-bit word result will be stored
|
|
819
|
// left place of the significand bits (nbitsig),
|
|
794
|
*pt_u_short_int = autocor | (tmp_uint16 << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
820
|
// making the 16-bit word to be recorded
|
|
795
|
// left place of the significand bits (nbitsig), making
|
|
821
|
pt_uint8 = (uint8_t*) &tmp_uint16; // Affect an uint8_t pointer with the adress of tmp_uint16
|
|
796
|
// the 16-bit word to be recorded, and record it using the pointer
|
|
822
|
#ifdef LSB_FIRST_TCH
|
|
|
|
|
823
|
lfr_bp2[i*NB_BYTES_BP2+4] = pt_uint8[0]; // Record LSB of tmp_uint16
|
|
|
|
|
824
|
lfr_bp2[i*NB_BYTES_BP2+5] = pt_uint8[1]; // Record MSB of tmp_uint16
|
|
|
|
|
825
|
#endif
|
|
|
|
|
826
|
#ifdef MSB_FIRST_TCH
|
|
|
|
|
827
|
lfr_bp2[i*NB_BYTES_BP2+4] = pt_uint8[1]; // Record LSB of tmp_uint16
|
|
|
|
|
828
|
lfr_bp2[i*NB_BYTES_BP2+5] = pt_uint8[0]; // Record MSB of tmp_uint16
|
|
|
|
|
829
|
#endif
|
|
797
|
#ifdef DEBUG_TCH
|
|
830
|
#ifdef DEBUG_TCH
|
|
798
|
printf("autocor for S33 significand : %d\n",autocor );
|
|
831
|
printf("autocor for S33 significand : %u\n",autocor);
|
|
799
|
printf("tmp_uint8 for S33 exponent : %d\n",tmp_uint16 );
|
|
832
|
printf("exp for S33 exponent : %u\n",exp);
|
|
800
|
printf("*pt_u_short_int for S33 exponent + significand : %.3d or %x\n",*pt_u_short_int, *pt_u_short_int);
|
|
833
|
printf("pt_uint8[1] for S33 exponent + significand : %.3d or %2x\n",pt_uint8[1], pt_uint8[1]);
|
|
801
|
printf("lfr_bp2[i*NB_BYTES_BP2+5] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+5], lfr_bp2[i*NB_BYTES_BP2+5]);
|
|
834
|
printf("pt_uint8[0] for S33 exponent + significand : %.3d or %2x\n",pt_uint8[0], pt_uint8[0]);
|
|
802
|
printf("lfr_bp2[i*NB_BYTES_BP2+4] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+4], lfr_bp2[i*NB_BYTES_BP2+4]);
|
|
835
|
printf("lfr_bp2[i*NB_BYTES_BP2+5] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+5], lfr_bp2[i*NB_BYTES_BP2+5]);
|
|
|
|
|
836
|
printf("lfr_bp2[i*NB_BYTES_BP2+4] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+4], lfr_bp2[i*NB_BYTES_BP2+4]);
|
|
803
|
#endif
|
|
837
|
#endif
|
|
804
|
// S44
|
|
838
|
// S44
|
|
805
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21], &exponent); // 0.5 <= significand < 1
|
|
839
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+21], &exponent); // 0.5 <= significand < 1
|
|
@@
-825,19
+859,27
void BP2_set( float * compressed_spec_ma
|
|
825
|
|
|
859
|
|
|
826
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
860
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
827
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
861
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
828
|
tmp_uint16 = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int
|
|
862
|
exp = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int where just
|
|
829
|
// where just the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
863
|
// the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
830
|
pt_u_short_int = (uint16_t*) &lfr_bp2[i*NB_BYTES_BP2+6]; // Affect an uint16_t pointer with the
|
|
864
|
tmp_uint16 = autocor | (exp << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
831
|
// adress where the 16-bit word result will be stored
|
|
865
|
// left place of the significand bits (nbitsig),
|
|
832
|
*pt_u_short_int = autocor | (tmp_uint16 << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
866
|
// making the 16-bit word to be recorded
|
|
833
|
// left place of the significand bits (nbitsig), making
|
|
867
|
pt_uint8 = (uint8_t*) &tmp_uint16; // Affect an uint8_t pointer with the adress of tmp_uint16
|
|
834
|
// the 16-bit word to be recorded, and record it using the pointer
|
|
868
|
#ifdef LSB_FIRST_TCH
|
|
|
|
|
869
|
lfr_bp2[i*NB_BYTES_BP2+6] = pt_uint8[0]; // Record LSB of tmp_uint16
|
|
|
|
|
870
|
lfr_bp2[i*NB_BYTES_BP2+7] = pt_uint8[1]; // Record MSB of tmp_uint16
|
|
|
|
|
871
|
#endif
|
|
|
|
|
872
|
#ifdef MSB_FIRST_TCH
|
|
|
|
|
873
|
lfr_bp2[i*NB_BYTES_BP2+6] = pt_uint8[1]; // Record LSB of tmp_uint16
|
|
|
|
|
874
|
lfr_bp2[i*NB_BYTES_BP2+7] = pt_uint8[0]; // Record MSB of tmp_uint16
|
|
|
|
|
875
|
#endif
|
|
835
|
#ifdef DEBUG_TCH
|
|
876
|
#ifdef DEBUG_TCH
|
|
836
|
printf("autocor for S44 significand : %d\n",autocor );
|
|
877
|
printf("autocor for S44 significand : %u\n",autocor);
|
|
837
|
printf("tmp_uint8 for S44 exponent : %d\n",tmp_uint16 );
|
|
878
|
printf("exp for S44 exponent : %u\n",exp);
|
|
838
|
printf("*pt_u_short_int for S44 exponent + significand : %.3d or %x\n",*pt_u_short_int, *pt_u_short_int);
|
|
879
|
printf("pt_uint8[1] for S44 exponent + significand : %.3d or %2x\n",pt_uint8[1], pt_uint8[1]);
|
|
839
|
printf("lfr_bp2[i*NB_BYTES_BP2+7] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+7], lfr_bp2[i*NB_BYTES_BP2+7]);
|
|
880
|
printf("pt_uint8[0] for S44 exponent + significand : %.3d or %2x\n",pt_uint8[0], pt_uint8[0]);
|
|
840
|
printf("lfr_bp2[i*NB_BYTES_BP2+6] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+6], lfr_bp2[i*NB_BYTES_BP2+6]);
|
|
881
|
printf("lfr_bp2[i*NB_BYTES_BP2+7] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+7], lfr_bp2[i*NB_BYTES_BP2+7]);
|
|
|
|
|
882
|
printf("lfr_bp2[i*NB_BYTES_BP2+6] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+6], lfr_bp2[i*NB_BYTES_BP2+6]);
|
|
841
|
#endif
|
|
883
|
#endif
|
|
842
|
// S55
|
|
884
|
// S55
|
|
843
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24], &exponent); // 0.5 <= significand < 1
|
|
885
|
significand = frexpf(compressed_spec_mat[i*NB_VALUES_PER_SPECTRAL_MATRIX+24], &exponent); // 0.5 <= significand < 1
|
|
@@
-862,19
+904,27
void BP2_set( float * compressed_spec_ma
|
|
862
|
|
|
904
|
|
|
863
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
905
|
autocor = (uint16_t) ((significand*2-1)*rangesig + 0.5); // Shift and cast into a 16-bit unsigned int with rounding
|
|
864
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
906
|
// where just the first nbitsig bits are used (0, ..., 2^nbitsig-1)
|
|
865
|
tmp_uint16 = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int
|
|
907
|
exp = (uint16_t) (exponent-expmin); // Shift and cast into a 16-bit unsigned int where just
|
|
866
|
// where just the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
908
|
// the first nbitexp bits are used (0, ..., 2^nbitexp-1)
|
|
867
|
pt_u_short_int = (uint16_t*) &lfr_bp2[i*NB_BYTES_BP2+8]; // Affect an uint16_t pointer with the
|
|
909
|
tmp_uint16 = autocor | (exp << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
868
|
// adress where the 16-bit word result will be stored
|
|
910
|
// left place of the significand bits (nbitsig),
|
|
869
|
*pt_u_short_int = autocor | (tmp_uint16 << nbitsig); // Put the exponent bits (nbitexp) next to the
|
|
911
|
// making the 16-bit word to be recorded
|
|
870
|
// left place of the significand bits (nbitsig), making
|
|
912
|
pt_uint8 = (uint8_t*) &tmp_uint16; // Affect an uint8_t pointer with the adress of tmp_uint16
|
|
871
|
// the 16-bit word to be recorded, and record it using the pointer
|
|
913
|
#ifdef LSB_FIRST_TCH
|
|
|
|
|
914
|
lfr_bp2[i*NB_BYTES_BP2+8] = pt_uint8[0]; // Record LSB of tmp_uint16
|
|
|
|
|
915
|
lfr_bp2[i*NB_BYTES_BP2+9] = pt_uint8[1]; // Record MSB of tmp_uint16
|
|
|
|
|
916
|
#endif
|
|
|
|
|
917
|
#ifdef MSB_FIRST_TCH
|
|
|
|
|
918
|
lfr_bp2[i*NB_BYTES_BP2+8] = pt_uint8[1]; // Record LSB of tmp_uint16
|
|
|
|
|
919
|
lfr_bp2[i*NB_BYTES_BP2+9] = pt_uint8[0]; // Record MSB of tmp_uint16
|
|
|
|
|
920
|
#endif
|
|
872
|
#ifdef DEBUG_TCH
|
|
921
|
#ifdef DEBUG_TCH
|
|
873
|
printf("autocor for S55 significand : %d\n",autocor );
|
|
922
|
printf("autocor for S55 significand : %u\n",autocor);
|
|
874
|
printf("tmp_uint8 for S55 exponent : %d\n",tmp_uint16 );
|
|
923
|
printf("exp for S55 exponent : %u\n",exp);
|
|
875
|
printf("*pt_u_short_int for S55 exponent + significand : %.3d or %x\n",*pt_u_short_int, *pt_u_short_int);
|
|
924
|
printf("pt_uint8[1] for S55 exponent + significand : %.3d or %2x\n",pt_uint8[1], pt_uint8[1]);
|
|
876
|
printf("lfr_bp2[i*NB_BYTES_BP2+9] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+9], lfr_bp2[i*NB_BYTES_BP2+9]);
|
|
925
|
printf("pt_uint8[0] for S55 exponent + significand : %.3d or %2x\n",pt_uint8[0], pt_uint8[0]);
|
|
877
|
printf("lfr_bp2[i*NB_BYTES_BP2+8] : %.3d or %x\n",lfr_bp2[i*NB_BYTES_BP2+8], lfr_bp2[i*NB_BYTES_BP2+8]);
|
|
926
|
printf("lfr_bp2[i*NB_BYTES_BP2+9] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+9], lfr_bp2[i*NB_BYTES_BP2+9]);
|
|
|
|
|
927
|
printf("lfr_bp2[i*NB_BYTES_BP2+8] : %3u or %2x\n",lfr_bp2[i*NB_BYTES_BP2+8], lfr_bp2[i*NB_BYTES_BP2+8]);
|
|
878
|
#endif
|
|
928
|
#endif
|
|
879
|
}
|
|
929
|
}
|
|
880
|
}
|
|
930
|
}
|