| author | Nicola Baldo <nbaldo@cttc.es> |
| Mon, 07 May 2012 13:52:32 +0200 | |
| changeset 8744 | 5ee0d10aa9bd |
| parent 8741 | c996688338ee |
| permissions | -rw-r--r-- |
|
8204
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
1 |
clear all; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
2 |
close all; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
3 |
|
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
4 |
%% LTE pathloss model |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
5 |
|
|
8741
c996688338ee
moved reference propagation scripts
Nicola Baldo <nbaldo@cttc.es>
parents:
8289
diff
changeset
|
6 |
%% ITU1411, COST231, OH, etc. scripts are in the propagation module |
|
c996688338ee
moved reference propagation scripts
Nicola Baldo <nbaldo@cttc.es>
parents:
8289
diff
changeset
|
7 |
addpath ("../../../propagation/test/reference/");
|
|
c996688338ee
moved reference propagation scripts
Nicola Baldo <nbaldo@cttc.es>
parents:
8289
diff
changeset
|
8 |
|
|
c996688338ee
moved reference propagation scripts
Nicola Baldo <nbaldo@cttc.es>
parents:
8289
diff
changeset
|
9 |
%% ITU1238 script is in the buildings module |
|
c996688338ee
moved reference propagation scripts
Nicola Baldo <nbaldo@cttc.es>
parents:
8289
diff
changeset
|
10 |
addpath ("../../../buildings/test/reference/");
|
|
8289
4d9ec8ec60a3
Bugfix on lte_pathloss-m: adjust reference values according to new frequency
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8239
diff
changeset
|
11 |
|
|
4d9ec8ec60a3
Bugfix on lte_pathloss-m: adjust reference values according to new frequency
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8239
diff
changeset
|
12 |
|
|
4d9ec8ec60a3
Bugfix on lte_pathloss-m: adjust reference values according to new frequency
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8239
diff
changeset
|
13 |
d = 104.12; |
|
4d9ec8ec60a3
Bugfix on lte_pathloss-m: adjust reference values according to new frequency
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8239
diff
changeset
|
14 |
fmhz = 2130; |
|
4d9ec8ec60a3
Bugfix on lte_pathloss-m: adjust reference values according to new frequency
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8239
diff
changeset
|
15 |
f = 2130e6; |
|
8204
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
16 |
hb = 30; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
17 |
hm = 1; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
18 |
hr = 20; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
19 |
l = 80; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
20 |
b = 50; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
21 |
st_w = 20; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
22 |
phi = 45; |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
23 |
big = 1; % metropolitan centre |
|
8744
5ee0d10aa9bd
correct light speed in ITU-R porpagation models
Nicola Baldo <nbaldo@cttc.es>
parents:
8741
diff
changeset
|
24 |
g = loss_ITU1411_LOS (d, hb, hm, f); |
|
8213
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
25 |
printf ("Test #11: the value of ITU1411 in LOS is: %f\n", g);
|
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
26 |
|
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
27 |
d = d = 500.84; |
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
28 |
g = loss_ITU1411_NLOS_over_rooftop (d, hb, hm, hr, f, l, b, st_w, phi, big); |
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
29 |
printf ("Test #10: the value of ITU1411 in NLOS over the roof-top is: %f\n", g);
|
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
30 |
|
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
31 |
|
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
32 |
d = 1.50028; % km |
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
33 |
g = loss_COST231_large_cities_urban (d, hb, hm, fmhz); |
|
7746b2e4bffc
BuildingPathlossModel system test finalized and passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8209
diff
changeset
|
34 |
printf ("Test #11: the value of COST231 for large cities is: %f\n", g);
|
|
8209
7a795d377e61
Finalized pathloss model compound test: passed
Marco Miozzo <marco.miozzo@cttc.es>
parents:
8208
diff
changeset
|
35 |
|
|
8204
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
36 |
|
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
37 |
%%snr = txPsd + g - kT - nf ; % dB |
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
38 |
|
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
39 |
|
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
40 |
|
|
f704063fd288
Add octave reference values computation
Marco Miozzo <marco.miozzo@cttc.es>
parents:
diff
changeset
|
41 |