aboutsummaryrefslogtreecommitdiff
path: root/octave/tcohpsk.m
diff options
context:
space:
mode:
authordrowe67 <[email protected]>2023-07-14 10:33:23 +0930
committerGitHub <[email protected]>2023-07-14 10:33:23 +0930
commit6588e77f38bdebd7adffe091b22e7760d95d0ccb (patch)
treee015b6d01db10ff219f5d1cf49eb3dcadb7dbe48 /octave/tcohpsk.m
parentac7c48b4dee99d4c772f133d70d8d1b38262fcd2 (diff)
parent98992bc3585124981450659394d6f84032b81370 (diff)
Merge pull request #1 from drowe67/dr-cleanup
Cleanup
Diffstat (limited to 'octave/tcohpsk.m')
-rw-r--r--octave/tcohpsk.m12
1 files changed, 7 insertions, 5 deletions
diff --git a/octave/tcohpsk.m b/octave/tcohpsk.m
index 00afafb..54bdeb1 100644
--- a/octave/tcohpsk.m
+++ b/octave/tcohpsk.m
@@ -1,7 +1,7 @@
% tcohpsk.m
% David Rowe Oct 2014
%
-% Octave coherent PSK modem script that hs two modes:
+% Octave coherent PSK modem script that has two modes:
%
% i) tests the C port of the coherent PSK modem. This script loads
% the output of unittest/tcohpsk.c and compares it to the output of
@@ -254,10 +254,12 @@ acohpsk.f_fine_est = 0;
acohpsk.ct = 4;
acohpsk.ftrack_en = ftrack_en;
-[spread spread_2ms hf_gain] = init_hf_model(Fs, frames*acohpsk.Nsymbrowpilot*afdmdv.M);
-hf_n = 1;
-nhfdelay = floor(hf_delay_ms*Fs/1000);
-ch_fdm_delay = zeros(1, acohpsk.Nsymbrowpilot*M + nhfdelay);
+if fading_en
+ [spread spread_2ms hf_gain] = init_hf_model(Fs, frames*acohpsk.Nsymbrowpilot*afdmdv.M);
+ hf_n = 1;
+ nhfdelay = floor(hf_delay_ms*Fs/1000);
+ ch_fdm_delay = zeros(1, acohpsk.Nsymbrowpilot*M + nhfdelay);
+end
% simulated SSB tx filter