Scattered stuff from Silas during Dissertation

2026-06-03 09:05:33 +02:00
parent a91da3b97c
commit 5c2e27687d
37 changed files with 1726 additions and 1338 deletions
--- a/projects/IMDD_base_system/imdd_it.m
+++ b/projects/IMDD_base_system/imdd_it.m
@@ -11,25 +11,25 @@
    % -> FFE / DFE / VNLE+MLSE / DB target DSP branches
 % -> result packages stored in DataStorage

-close all;
+% close all;

 if 1
    
    uloops              = struct;
    uloops.precomp      = [0];
-    uloops.fsym = 180e9;
-    % uloops.bitrate = 100e9;
+    uloops.fsym = [152:8:212].*1e9;
+    % uloops.bitrate = 380e9;
    % uloops.laser_wavelength = [1293,1297.5,1302,1306.5,1310,1313.4,1318,1322.7,1327.4];
    uloops.laser_wavelength = [1310];
-    uloops.M            = [2,4,6,8];
-    uloops.link_length  = 1;
+    uloops.M            = [4];
+    uloops.link_length  = 2;
    % uloops.link_length  = [0:2:10]; % 1,2,3,5,6,8,10
-    uloops.channel_alpha = [0.8];
-    uloops.duob_mode = db_mode.no_db;
-    uloops.decoding_mode = "memoryless";
-    uloops.channel_mode = "awgn"; %awgn_alphad
+    uloops.channel_alpha = [0.5];
+    uloops.duob_mode = db_mode.db_precoded;
+    uloops.decoding_mode = db_decoder.sequencedetection;
+    uloops.channel_mode = channel_model.physical;
    uloops.channel_snr_dB = [20];
-    uloops.rop = -6;
+    uloops.rop = 0;
    
    wh = DataStorage(uloops);
    wh.addStorage("ber");
@@ -39,35 +39,119 @@ if 1
 end

 %%
-figure
+
+wh = load("C:\Users\Silas\Documents\MATLAB\Datensätze\Diss_400G\highspeed_loop.mat");
+wh = wh.wh;
+M = 6;
+rate = 212e9;
+precomp = wh.parameter.precomp.values(1);
+wavelength = wh.parameter.laser_wavelength.values(1);
+link_length = wh.parameter.link_length.values(1);
+alpha = wh.parameter.channel_alpha.values(1);
+duob_mode = wh.parameter.duob_mode.values(1);
+decoding_mode = wh.parameter.decoding_mode.values(1);
+channel_mode = wh.parameter.channel_mode.values(1);
+snr_dB = wh.parameter.channel_snr_dB.values(1);
+rop = wh.parameter.rop.values;
+fsym = wh.parameter.fsym.values;
+
+%% get all ROP values for M = 4 and rate = 92e9:
+a = wh.getStoValue('ber',precomp, rate, wavelength, M, link_length,alpha,duob_mode,decoding_mode,channel_mode,snr_dB,rop);
+
+ber_ffe = getResultBER(a, "ffe_results");
+ber_dfe = getResultBER(a, "dfe_results");
+ber_vnle = getResultBER(a, "vnle_results");
+ber_mlse = getResultBER(a, "mlse_results");
+ber_dbt = getResultBER(a, "dbt_results");
+
+figure(44)
+clf
 hold on
-if isfield(uloops, 'fsym') && isfield(uloops, 'bitrate')
-    error('Define only one of uloops.fsym or uloops.bitrate.');
-elseif isfield(uloops, 'fsym')
-    rateLookup = uloops.fsym;
-elseif isfield(uloops, 'bitrate')
-    rateLookup = uloops.bitrate;
-else
-    error('Define either uloops.fsym or uloops.bitrate.');
-end
-
-for alpha = uloops.channel_alpha
-    a=wh.getStoValue('ber',0, rateLookup, uloops.laser_wavelength, uloops.M, uloops.link_length,alpha,uloops.duob_mode,uloops.decoding_mode,uloops.channel_mode,uloops.channel_snr_dB);
-    gmi_ffe = cellfun(@(x) x.ffe_results.metrics.GMI, a);
-    alpha_ffe = cellfun(@(x) x.ffe_results.metrics.Alpha, a);
-
-    gmi_mlse = cellfun(@(x) x.mlse_results.metrics.GMI, a);
-
-    plot(uloops.channel_snr_dB,gmi_ffe,'DisplayName',sprintf(''),'LineStyle','-','HandleVisibility','on');
-    plot(uloops.channel_snr_dB,gmi_mlse,'DisplayName',sprintf(''),'LineStyle','-','HandleVisibility','on');
-end
-
-set(gca, 'YScale', 'log');
-% ylim([5e-5 0.5]);
-% yline([3.8e-3, 2e-2],'HandleVisibility','off');
-legend
+plot(rop,ber_ffe,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","FFE");
+plot(rop,ber_dfe,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","DFE");
+plot(rop,ber_vnle,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","VNLE");
+plot(rop,ber_mlse,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","MLSE");
+plot(rop,ber_dbt,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","DB target");
+yline(3.8e-3,'DisplayName','HD-FEC','LineStyle','--','HandleVisibility','off');
+xlabel('Received Optical Power (dBm)');
+ylabel('Bit Error Rate (BER)');
+title(sprintf('BER vs. ROP | PAM %d | %.0f GBd',M,rate.*1e-9));
+set(gca,'yscale','log');
+set(gca,'Box','on');
+grid on;
+grid minor
+legend('Interpreter','none');
 beautifyBERplot()
-ylabel('BER');
+
+%% get all baudrate values for M = 4 and fixed ROP:
+rop_ = -6;
+a = wh.getStoValue('ber',precomp, fsym, wavelength, M, link_length,alpha,duob_mode,decoding_mode,channel_mode,snr_dB,rop_);
+
+ber_ffe = getResultBER(a, "ffe_results");
+ber_dfe = getResultBER(a, "dfe_results");
+ber_vnle = getResultBER(a, "vnle_results");
+ber_mlse = getResultBER(a, "mlse_results");
+ber_dbt = getResultBER(a, "dbt_results");
+
+figure(45)
+clf
+hold on
+plot(fsym.*1e-9,ber_ffe,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","FFE");
+plot(fsym.*1e-9,ber_dfe,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","DFE");
+plot(fsym.*1e-9,ber_vnle,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","VNLE");
+plot(fsym.*1e-9,ber_mlse,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","MLSE");
+plot(fsym.*1e-9,ber_dbt,"LineWidth",0.5,"LineStyle","-","Marker",".","MarkerSize",15,"DisplayName","DB target");
+yline(3.8e-3,'DisplayName','HD-FEC','LineStyle','--','HandleVisibility','off');
+xlabel('Baudrate (GBd)');
+ylabel('Bit Error Rate (BER)');
+title(sprintf('BER vs. Baudrate | PAM %d | ROP %g dBm',M,rop_));
+set(gca,'yscale','log');
+set(gca,'Box','on');
+grid on;
+grid minor
+legend('Interpreter','none');
+beautifyBERplot()
+
+
+
+
+
+
+
+
+
+
+
+
+% figure
+% hold on
+% if isfield(uloops, 'fsym') && isfield(uloops, 'bitrate')
+%     error('Define only one of uloops.fsym or uloops.bitrate.');
+% elseif isfield(uloops, 'fsym')
+%     rateLookup = uloops.fsym;
+% elseif isfield(uloops, 'bitrate')
+%     rateLookup = uloops.bitrate;
+% else
+%     error('Define either uloops.fsym or uloops.bitrate.');
+% end
+
+% for alpha = uloops.channel_alpha
+%     a=wh.getStoValue('ber',0, rateLookup, uloops.laser_wavelength, uloops.M, uloops.link_length,alpha,uloops.duob_mode,uloops.decoding_mode,uloops.channel_mode,uloops.channel_snr_dB);
+%     gmi_ffe = cellfun(@(x) x.ffe_results.metrics.GMI, a);
+%     alpha_ffe = cellfun(@(x) x.ffe_results.metrics.Alpha, a);
+
+%     gmi_mlse = cellfun(@(x) x.mlse_results.metrics.GMI, a);
+
+%     plot(uloops.channel_snr_dB,gmi_ffe,'DisplayName',sprintf(''),'LineStyle','-','HandleVisibility','on');
+%     plot(uloops.channel_snr_dB,gmi_mlse,'DisplayName',sprintf(''),'LineStyle','-','HandleVisibility','on');
+% end
+
+% set(gca, 'YScale', 'log');
+% % ylim([5e-5 0.5]);
+% % yline([3.8e-3, 2e-2],'HandleVisibility','off');
+% legend
+% beautifyBERplot()
+% ylabel('BER');



@@ -585,3 +669,24 @@ ylabel('BER');
 %
 % beautifyBERplot();
 % legend('BER contour lines');
+
+function ber = getResultBER(results, resultField)
+ber = nan(size(results));
+resultField = char(resultField);
+
+for k = 1:numel(results)
+    if isempty(results{k}) || ~isstruct(results{k}) || ~isfield(results{k}, resultField)
+        continue
+    end
+
+    branch = results{k}.(resultField);
+    if isempty(branch) || ~isstruct(branch) || ~isfield(branch, 'metrics') 
+        continue
+    end
+
+    val = branch.metrics.BER;
+    if ~isempty(val)
+        ber(k) = val(1);
+    end
+end
+end
--- a/projects/IMDD_base_system/imdd_model.m
+++ b/projects/IMDD_base_system/imdd_model.m
@@ -3,11 +3,11 @@ function  [output] = imdd_model(varargin)
 simulation_mode = 1;

 %%% Change folder
-curFolder = pwd;
-funcFolder=fileparts(mfilename('fullpath'));
-if ~isempty(funcFolder)
-    cd(funcFolder);
-end
+% curFolder = pwd;
+% funcFolder=fileparts(mfilename('fullpath'));
+% if ~isempty(funcFolder)
+%     cd(funcFolder);
+% end

 %%% Run parameters
 % TX
@@ -16,8 +16,8 @@ fsym            = 150e9;
 bitrate         = [];

 apply_pulsef    = 0;
-fdac            = 4*fsym;%256e9;
-fadc            = 4*fsym;%256e9;
+fdac            = 256e9;
+fadc            = 256e9;
 random_key      = 1;

 rcalpha         = 0.05;
@@ -29,7 +29,7 @@ vbias           = -vbias_rel*u_pi;

 laser_wavelength    = 1293;
 laser_linewidth     = 0;
-tx_bw_nyquist   = 0.65;
+tx_bw_nyquist       = 0.65;

 % Channel
 link_length     = 1;
@@ -112,18 +112,26 @@ end

 f_nyquist       = fsym/2;

-Pform       = Pulseformer("fsym",fsym,"fdac",4*fsym,"pulse","rc","pulselength",16,"alpha",rcalpha);

-[Digi_sig,Symbols,Tx_bits] = PAMsource(...
-    "fsym",fsym,"M",M,"order",16,"useprbs",0,...
-    "fs_out",fdac,...
-    "applyclipping",0,"clipfactor",1.5,...
-    "applypulseform",apply_pulsef,"pulseformer",Pform,...
-    "randkey",random_key,...
-    'duobinary_mode',duob_mode,...
-    "mrds_code",0,"mrds_blocklength",512).process();
+%%%%% START SIMULATION

-Digi_sig.spectrum("displayname",'Digi Spectrum','fignum',10,'normalizeTo0dB',1);
+measure_tf = 0;
+if measure_tf
+    freqresp = ChannelFreqResp("Nacq",1024,"Navg",64,"Ncp",70,"f_ref",fadc);
+    Digi_sig = freqresp.buildOFDM();
+else
+    Pform       = Pulseformer("fsym",fsym,"fdac",4*fsym,"pulse","rc","pulselength",16,"alpha",rcalpha);
+    [Digi_sig,Symbols,Tx_bits] = PAMsource(...
+        "fsym",fsym,"M",M,"order",18,"useprbs",0,...
+        "fs_out",fdac,...
+        "applyclipping",0,"clipfactor",1.5,...
+        "applypulseform",apply_pulsef,"pulseformer",Pform,...
+        "randkey",random_key,...
+        'duobinary_mode',duob_mode,...
+        "mrds_code",0,"mrds_blocklength",512).process();
+end
+
+% Digi_sig.spectrum("displayname",'Digi Spectrum','fignum',10,'normalizeTo0dB',1);

 channel_mode = lower(string(channel_mode));

@@ -131,26 +139,35 @@ switch channel_mode
    case "physical"

        %%%%% AWG
-        % El_sig = M8199A("kover",kover).process(Digi_sig);
-        El_sig = AWG("fdac",fdac,"f_cutoff",fsym,"lpf_active",1,"kover",kover,"bit_resolution",12,"upsampling_method","samplehold","precomp_sinc_rolloff",0).process(Digi_sig);
+        El_sig = M8199B("kover",kover).process(Digi_sig);
+        % El_sig = AWG("fdac",fdac,"f_cutoff",fsym,"lpf_active",1,"kover",kover,"bit_resolution",12,"upsampling_method","samplehold","precomp_sinc_rolloff",0,"H_lpf",H_awg).process(Digi_sig);
        % El_sig.spectrum("displayname",'Digi Spectrum','fignum',100,'normalizeTo0dB',0);
        % El_sig = El_sig.setPower(0,"dBm");

        %%%%% Low-pass el. components %%%%%%
-        tx_bwl = tx_bw_nyquist.*f_nyquist;
-        % tx_bwl = 80e9;
-        El_sig = Filter('filtdegree',4,"f_cutoff",tx_bwl,"fs",fdac*kover,"filterType",filtertypes.butterworth,"active",true).process(El_sig);
+        % tx_bwl = tx_bw_nyquist.*f_nyquist;
+        tx_bwl = 85e9;
+        El_sig = Filter('filtdegree',4,"f_cutoff",tx_bwl,"fs",fdac*kover,"filterType",filtertypes.bessel_inp,"active",true).process(El_sig);
        % El_sig.spectrum("displayname",'Digi Spectrum','fignum',100,'normalizeTo0dB',1);

        %%%%% Electrical Driver Amplifier %%%%%%
        % El_sig = Amplifier("amp_mode","ideal_no_noise","gain_mode","gain","amplification_db",3).process(El_sig);
        El_sig = El_sig.normalize("mode","oneone");
-        scaling = 0.6*(u_pi/2-abs(vbias-u_pi/2));
+        scaling = 0.7*(u_pi/2-abs(vbias-u_pi/2));
        El_sig = El_sig .* scaling;

        %%%%% MODULATE E/O CONVERSION %%%%%%
        [Opt_sig] = EML("mode",eml_mode.im_cosinus,"power",3,"fsimu",El_sig.fs,"lambda",laser_wavelength,"bias",vbias,"u_pi",u_pi,"linewidth",laser_linewidth,"randomkey",random_key+1,"alpha",eml_alpha).process(El_sig);

+        % figure(10)
+        % hold on
+        % scatter(El_sig.signal(1:100000)+vbias,(abs(Opt_sig.signal(1:100000)).^2)*1e3,0.1,'.','DisplayName','Modulator TF')
+        % ylim([0 u_pi]);
+        % xlim([-u_pi/2, u_pi/2]+vbias);
+        % xlabel('Input in V')
+        % ylabel('abs(Output) in mW')
+
+
        % Opt_sig.spectrum("displayname",'Opt Spectrum','fignum',10,'normalizeTo0dB',1);
        Opt_sig    = Fiber("fsimu",Opt_sig.fs,"fiber_length",link_length,"alpha",0.3,"D",0,"lambda0",1310,"gamma",0,"Dslope",0.07).process(Opt_sig);

@@ -161,14 +178,14 @@ switch channel_mode
        Rx_sig = Photodiode("fsimu",fdac*kover,"dark_current",2e-08,"responsivity",1,"temperature",20,"nep",1.8e-11).process(Rx_sig);

        %%%%%% Low-pass RX (PD, El. Connectors and Scope %%%%%%
-        rx_bwl = rx_bw_nyquist.*f_nyquist;
-        % rx_bwl = 80e9;
+        % rx_bwl = rx_bw_nyquist.*f_nyquist;
+        rx_bwl = 90e9;
        Rx_sig = Filter('filtdegree',4,"f_cutoff",rx_bwl,"fs",fdac*kover,"filterType",filtertypes.butterworth,"active",true).process(Rx_sig);

        % %%%%%% Low-pass Scope %%%%%%
        Lp_scpe = Filter('filtdegree',4,"f_cutoff",110e9,"fs",fadc,"filterType",filtertypes.butterworth,"active",true);

-        % Rx_sig.spectrum("displayname",'Analog Rx Spectrum','fignum',100,'normalizeTo0dB',1);
+        % Rx_sig.spectrum("displayname",'Analog Rx Spectrum','fignum',10,'normalizeTo0dB',1);

        %%%%%% Scope %%%%%%
        Rx_sig = Scope("fsimu",fdac*kover,"fadc",fadc,...
@@ -193,6 +210,15 @@ switch channel_mode
        error('Unknown channel_mode "%s". Supported: physical, awgn, awgn_alphaD.', channel_mode);
 end

+if measure_tf
+    Rx_sig = Rx_sig.resample("fs_out",freqresp.f_ref);
+    freqresp.estimate(Rx_sig,"fileName",'','save',false);
+    freqresp.plot()
+    return;
+end
+
+Rx_sig.spectrum("displayname",'Sampled Rx Spectrum','fignum',1996,'normalizeTo0dB',1);
+
 txPulseformer = [];
 if apply_pulsef
    txPulseformer = Pform;
@@ -205,7 +231,7 @@ dspParameters.mu_dfe = mu_dfe;
 dspParameters.mu_dc = mu_dc;
 dspParameters.use_ffe = 1;
 dspParameters.use_dfe = 0;
-dspParameters.use_vnle_mlse = 1;
+dspParameters.use_vnle_mlse = 0;
 dspParameters.use_dbtgt = 0;
 dspParameters.use_dbenc = 0;
 dspParameters.use_ml_mlse = 0;
@@ -213,9 +239,9 @@ dspParameters.pf_ncoeffs = pf_ncoeffs;
 dspParameters.ffe_order_ffe = [50, 0, 0];
 dspParameters.ffe_order_dfe = [50, 0, 0];
 dspParameters.dfe_feedback_order = [2, 0, 0];
-dspParameters.ffe_order_vnle = [200, 0, 0];
+dspParameters.ffe_order_vnle = [50, 4, 4];
 dspParameters.dfe_order_vnle = dfe_order;
-dspParameters.ffe_order_dbtgt = [50, 0, 0];
+dspParameters.ffe_order_dbtgt = [50, 4, 4];
 dspParameters.dfe_order_dbtgt = dfe_order;
 dspParameters.decoding_mode = decoding_mode;

--- a/projects/IMDD_base_system/minimal_example.m
+++ b/projects/IMDD_base_system/minimal_example.m
@@ -130,17 +130,20 @@ Scpe_sig = Scpe_sig - mean(Scpe_sig.signal);
 Scpe_sig.signal = Scpe_sig.signal(1:2*length(Symbols));

 %%
-if 0
+if 1
    % -------------------- FFE --------------------
-    ffe_order   = [50, 0, 0];
+    ffe_order   = [150, 0, 0];
    eq_      = EQ("Ne",ffe_order,"Nb",[2,0,0], ...
        "training_length",len_tr,"training_loops",5,"dd_loops",5, ...
        "K",2,"DCmu",mu_dc,"DDmu",[mu_ffe mu_dfe],"DFEmu",0.005, ...
        "FFEmu",0,"plotfinal",0,"ideal_dfe",0);
    
-    % eq_ = FFE("epochs_tr",4,"epochs_dd",5,"len_tr",4096,"mu_dd",0.01,"mu_tr",0.01,"order",50,"sps",2,"decide",0, "adaption",adaption_method.nlms,"dd_mode",1);
-    eq_ = FFE_DFE("epochs_tr",5,"epochs_dd",5,"len_tr",512,"ffe_mu_dd",1e-4,"dfe_mu_dd",5e-4,"ffe_mu_tr",0,"dfe_mu_tr",0,"ffe_order",99,"dfe_order",99,"sps",2,"decide",0);
+    % mu_tr_rls = 9.805e-01; mu_dd_rls = 0.999989348903919;
+    eq_ = FFE("epochs_tr",5,"epochs_dd",5,"len_tr",4096*2,"mu_dd",1e-4,"mu_tr",1.933e-04,"order",ffe_order(1),"sps",2,"decide",0,"optmize_mus",1,"dd_mode",1,"adaption_technique","nlms");
+
    
+    % eq_ = FFE("epochs_tr",4,"epochs_dd",5,"len_tr",4096,"mu_dd",0.01,"mu_tr",0.01,"order",50,"sps",2,"decide",0, "adaption",adaption_method.nlms,"dd_mode",1);
+    % eq_ = FFE_DFE("epochs_tr",5,"epochs_dd",5,"len_tr",512,"ffe_mu_dd",1e-4,"dfe_mu_dd",5e-4,"ffe_mu_tr",0,"dfe_mu_tr",0,"ffe_order",99,"dfe_order",99,"sps",2,"decide",0);
    
    output.ffe_results = ffe(eq_,M,Scpe_sig,Symbols,Tx_bits, ...
        "precode_mode",duob_mode,'showAnalysis',1,"postFFE",[], ...