mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-09-02 13:17:49 -04:00
More cleanup.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@6642 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
parent
eb1182f8f2
commit
1bca15f8fc
Binary file not shown.
Binary file not shown.
@ -1,24 +0,0 @@
|
|||||||
#!/bin/sh
|
|
||||||
# search for a good code
|
|
||||||
# make-ldpc ldpc.pchk $m $n $seed evenboth 2x3/8x4 no4cycle
|
|
||||||
n=128
|
|
||||||
k=80
|
|
||||||
m=$((n-k))
|
|
||||||
niterations=10
|
|
||||||
|
|
||||||
set -e # Stop if an error occurs
|
|
||||||
|
|
||||||
rand-src ldpc.src 2 "$k"x100000
|
|
||||||
|
|
||||||
for i in `seq 1 1000`
|
|
||||||
do
|
|
||||||
seed=$i
|
|
||||||
echo seed $seed
|
|
||||||
make-ldpc ldpc.pchk $m $n $seed evenboth 124x3/4x4 no4cycle
|
|
||||||
make-gen ldpc.pchk ldpc.gen dense
|
|
||||||
encode ldpc.pchk ldpc.gen ldpc.src ldpc.enc
|
|
||||||
transmit ldpc.enc ldpc.rec 1 awgn 0.7
|
|
||||||
decode ldpc.pchk ldpc.rec ldpc.dec awgn 0.70 prprp $niterations
|
|
||||||
verify ldpc.pchk ldpc.dec ldpc.gen ldpc.src
|
|
||||||
done
|
|
||||||
|
|
@ -1,39 +0,0 @@
|
|||||||
#!/bin/sh
|
|
||||||
# this script characterizes a single code over a range of Eb/N0
|
|
||||||
# a baseband signal with mean power = 1
|
|
||||||
# note relationship between noise standard deviation, sigma, and Eb/No:
|
|
||||||
# Eb/No = 1/(2*R*sigma^2)
|
|
||||||
# If R=1/2, then Eb/No = 1/sigma^2
|
|
||||||
# make-ldpc ldpc.pchk "$m" "$n" $seed evenboth 2x3/8x4 no4cycle
|
|
||||||
|
|
||||||
set -e # Stop if an error occurs
|
|
||||||
#set -v # Echo commands as they are read
|
|
||||||
|
|
||||||
n=128
|
|
||||||
k=80
|
|
||||||
m=$((n-k))
|
|
||||||
seed=873
|
|
||||||
ntrials=1000000
|
|
||||||
niterations=10
|
|
||||||
|
|
||||||
rate=$(echo "scale=5; $k/$n" | bc)
|
|
||||||
echo n=$n k=$k rate=$rate m=$m
|
|
||||||
|
|
||||||
#make-ldpc ldpc.pchk "$m" "$n" $seed evenboth 120x3/8x4 no4cycle
|
|
||||||
cp sfpeg2.pchk ldpc.pchk
|
|
||||||
|
|
||||||
make-gen ldpc.pchk ldpc.gen sparse
|
|
||||||
rand-src ldpc.src 1 "$k"x"$ntrials"
|
|
||||||
encode ldpc.pchk ldpc.gen ldpc.src ldpc.enc
|
|
||||||
|
|
||||||
for i in `seq -1 10`;
|
|
||||||
do
|
|
||||||
db=$(echo "scale=5; $i/2.0" | bc)
|
|
||||||
ebno=$(echo "scale=5; e(0.1*$db*l(10.0))" | bc -l)
|
|
||||||
sigma=$(echo "scale=5; 1/sqrt(2*$rate*$ebno)" | bc)
|
|
||||||
echo db $db ebno $ebno sigma $sigma
|
|
||||||
|
|
||||||
transmit ldpc.enc ldpc.rec 1 awgn $sigma
|
|
||||||
decode ldpc.pchk ldpc.rec ldpc.dec awgn $sigma prprp $niterations
|
|
||||||
verify ldpc.pchk ldpc.dec ldpc.gen ldpc.src
|
|
||||||
done
|
|
Loading…
x
Reference in New Issue
Block a user