silas/imdd_silas
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Minor changes from Star PC.

Browse Source 
Better plot in channel freq response

imdd_mpi simulation is a good 400G model

DSP offline analysis script
This commit is contained in:
sioe
2024-10-20 17:28:13 +02:00
parent 637dd7bc86
commit 70fd0a44be
6 changed files with 390 additions and 191 deletions
Download Patch File Download Diff File Expand all files Collapse all files

155
projects/Lab_2024/offline_dsp_analysis/load_n_dsp.m
View File

@@ -2,76 +2,123 @@
% load data points
foldername = 'C:\Users\Silas\Nextcloud4\Dokumente\02_Ablage_Office\Lab_Data_24\sir_sweep_pam4';
filename = 'PAM4_10km';
filename = 'PAM4_10km_';
stuff = load([foldername,filesep,filename,'_wh']);
stuff = load([foldername,filesep,filename,'wh']);
%stuff = load([foldername,filesep,'PAM4_v2_10km_wh']);
wh = stuff.obj;
i_atten_vals = wh.parameter.i_atten.values;
v_bias = wh.parameter.vbias.values(1);
awg_vpp = wh.parameter.awg_vpp.values(1);
eq_mode = wh.parameter.eq_mode.values(1);
eqmode = wh.parameter.eq_mode.values(1);
M = 4;
% Tx Bits
% Tx Symbols
% Rx Signal
Bits = load([foldername, filesep, filename, '_bits'],'Bits');
Bits = load([foldername, filesep, filename, 'bits'],'Bits');
Bits = Bits.Bits;
Symbols = load([foldername, filesep, filename, '_symbols_92gbd'],'Symbols');
Symbols = load([foldername, filesep, filename, 'symbols'],'Symbols');
Symbols = Symbols.Symbols;
% all_signals = load([foldername, filesep, filename, 'best_rx_signals']);
% all_signals = all_signals.all_signals;
Eq = EQ("Ne",[50,7,7],"Nb",[0,0,0],"training_length",4096*2,"training_loops",5,"dd_loops",5,"K",2,"DCmu",0.0,"DDmu",[0.0004 0.0004 0.0004 0.0004 ],"DFEmu",0.005,"FFEmu",0,"plotfinal",0,"ideal_dfe",1);
cnt = 0;
for atten = 40:-4:0
cnt = cnt+1;
for atten = 0:4:40
Signal_cell = load([foldername, filesep, filename, '_rx_signal_iatten_',num2str(atten)]);
Scpe_sig = Signal_cell.S{1};
Signal_cell = load([foldername, filesep, filename, 'rx_signal_iatten_',num2str(atten)]);
% Scpe_sig = all_signals(cnt);
bers = wh.getStoValue('ber',v_bias,awg_vpp,eq_mode,atten);
ber_ffe_only_ = zeros(numel(Signal_cell.S),1);
ber_mlse_ = zeros(numel(Signal_cell.S),1);
ber_db_ = zeros(numel(Signal_cell.S),1);
parfor i = 1:numel(Signal_cell.S)
Scpe_sig = Signal_cell.S{i};
sir_measured = wh.getStoValue('sir',v_bias,awg_vpp,eqmode,atten);
if eqmode == 2
[EQ_sig] = Eq.process(Scpe_sig,Symbols);
EQ_sig.plot("fignum",50,"displayname",'After EQ','clear',1);
Noi = EQ_sig-Symbols;
Rx_bits = PAMmapper(M,0).demap(EQ_sig);
[~,errors_bm,ber_ffe_only_(i),errors] = calc_ber(Rx_bits.signal,Bits.signal,"skip_front",100,"skip_end",150,"returnErrorLocation",1);
nc = 2;
burg_coeff = arburg(Noi.signal,nc);
EQ_sig = EQ_sig.filter(burg_coeff,1);
if 1
Noi.spectrum('displayname',['SIR: ', num2str(sir_measured), ' dB '],'fignum',123)
[h,w] = freqz(1,burg_coeff,length(Noi),"whole",Noi.fs);
h = h/max(abs(h));
hold on
w_ = (w - Noi.fs/2);
plot(w_.*1e-9,20*log10(fftshift(h)),'DisplayName',['', num2str(nc), ' coefficients for burg alg.']);
end
if 0
figure(53);
clf
constellation = unique(Symbols.signal);
received = NaN(numel(constellation),length(Symbols));
for lvl = 1:numel(constellation)
received(lvl,Symbols.signal==constellation(lvl)) = EQ_sig.signal(Symbols.signal==constellation(lvl));
hold on
histogram(received(lvl,:),1000,"EdgeAlpha",0);
end
end
EQ_sig = MLSE("DIR",burg_coeff,"duobinary_output",0,"M",M,"trellis_states",PAMmapper(M,0).levels).process(EQ_sig);
Rx_bits = PAMmapper(M,0).demap(EQ_sig);
[~,errors_bm,ber_mlse_(i),errors] = calc_ber(Rx_bits.signal,Bits.signal,"skip_front",100,"skip_end",150,"returnErrorLocation",1);
disp(['FFE: ',sprintf('%.1E',ber_ffe_only_(i)),' -> PF -> MLSE: ',sprintf('%.1E',ber_mlse_(i)),' dB ']);
elseif eqmode == 3
[EQ_sig, Noi] = Eq.process(Scpe_sig,Duobinary().encode(Symbols));
% EQ_sig.plot("fignum",50,"displayname",'After EQ','clear',1);
EQ_sig = MLSE("DIR",[1,1],"duobinary_output",1,"M",M,"trellis_states",PAMmapper(M,0).levels).process(EQ_sig);
EQ_sig = Duobinary().decode(EQ_sig);
Rx_bits = PAMmapper(M,0).demap(EQ_sig);
[~,errors_bm,ber_db_(i),errors] = calc_ber(Rx_bits.signal,Bits.signal,"skip_front",100,"skip_end",150,"returnErrorLocation",1);
disp([' DB Precode -> Channel -> FFE -> Decode/ Mod ',sprintf('%.1E',ber_db_(i)),' ']);
[EQ_sig] = Eq.process(Scpe_sig,Symbols);
EQ_sig.plot("fignum",50,"displayname",'After EQ','clear',1);
Noi = EQ_sig-Symbols;
Rx_bits = PAMmapper(M,0).demap(EQ_sig);
[~,errors_bm,ber_ffe_only,errors] = calc_ber(Rx_bits.signal,Bits.signal,"skip_front",100,"skip_end",150,"returnErrorLocation",1);
nc = 2;
burg_coeff = arburg(Noi.signal,nc);
EQ_sig = EQ_sig.filter(burg_coeff,1);
if 1
Noi.spectrum('displayname','Noise PSD','fignum',123)
[h,w] = freqz(1,burg_coeff,length(Noi),"whole",Noi.fs);
h = h/max(abs(h));
hold on
w_ = (w - Noi.fs/2);
plot(w_.*1e-9,20*log10(fftshift(h)),'DisplayName',['', num2str(nc), ' coefficients for burg alg.']);
end
if 0
figure(53);
constellation = unique(Symbols.signal);
received = NaN(numel(constellation),length(Symbols));
for lvl = 1:numel(constellation)
received(lvl,Symbols.signal==constellation(lvl)) = EQ_sig.signal(Symbols.signal==constellation(lvl));
hold on
histogram(received(lvl,:),1000,"EdgeAlpha",0);
end
end
EQ_sig = MLSE("DIR",burg_coeff,"duobinary_output",0,"M",M,"trellis_states",PAMmapper(M,0).levels).process(EQ_sig);
if eqmode == 2
[ber_ffe_2(cnt),idx] = min(ber_ffe_only_);
[ber_mlse_2(cnt),idx] = min(ber_mlse_);
Rx_bits = PAMmapper(M,0).demap(EQ_sig);
[~,errors_bm,ber,errors] = calc_ber(Rx_bits.signal,Bits.signal,"skip_front",100,"skip_end",150,"returnErrorLocation",1);
disp(['FFE: ',sprintf('%.1E',ber_ffe_only),' -> PF -> MLSE: ',sprintf('%.1E',ber),' dB | PD_in: ',num2str(pd_in),' dBm']);
elseif eqmode == 3
[ber_db(cnt),idx] = min(ber_db_);
end
all_signals(:,cnt) = Signal_cell.S{idx};
end
@@ -83,21 +130,23 @@ cols = linspecer(8);
i_atten_vals = wh.parameter.i_atten.values;
v_bias = wh.parameter.vbias.values(1);
awg_vpp = wh.parameter.awg_vpp.values(1);
eq_mode = wh.parameter.eq_mode.values(1);
eqmode = wh.parameter.eq_mode.values(1);
bers = wh.getStoValue('ber',v_bias,awg_vpp,eq_mode,i_atten_vals);
bers = wh.getStoValue('ber',v_bias,awg_vpp,eqmode,i_atten_vals);
sirs = wh.getStoValue('sir',v_bias,awg_vpp,eqmode,i_atten_vals);
figure(90);
hold on; % Retain the plot so new points can be added without complete redraw
% Plot the data and get the line handle
hLine = plot(i_atten_vals, bers, "LineWidth", 0.5, "LineStyle", "-", "Marker", ".", "MarkerSize", 15, "DisplayName", 'nbla');
if eqmode == 2
hLine1 = plot(sirs, ber_ffe_2, "LineWidth", 0.5, "LineStyle", "-", "Marker", ".", "MarkerSize", 15, "DisplayName", 'VNLE 2');
hLine2 = plot(sirs, ber_mlse_2, "LineWidth", 0.5, "LineStyle", "-", "Marker", ".", "MarkerSize", 15, "DisplayName", 'VNLE+MLSE 2');
elseif eqmode == 3
hLine2 = plot(sirs, ber_db, "LineWidth", 0.5, "LineStyle", "-", "Marker", ".", "MarkerSize", 15, "DisplayName", 'DB ');
end
% Customize the data tips
% Set labels for existing data tip rows
hLine.DataTipTemplate.DataTipRows(1).Label = 'Fsym';
hLine.DataTipTemplate.DataTipRows(2).Label = 'BER';
hLine.DataTipTemplate.DataTipRows(2).Format = '%.2e'; % Format BER as "3e-4"
hLine3 = plot(sirs, bers, "LineWidth", 0.5, "LineStyle", "-", "Marker", ".", "MarkerSize", 15, "DisplayName", 'from measurement');
% Continue with the rest of your plot settings