1 /****************************************************************************/
2 // Eclipse SUMO, Simulation of Urban MObility; see https://eclipse.org/sumo
3 // Copyright (C) 2001-2019 German Aerospace Center (DLR) and others.
4 // This program and the accompanying materials
5 // are made available under the terms of the Eclipse Public License v2.0
6 // which accompanies this distribution, and is available at
7 // http://www.eclipse.org/legal/epl-v20.html
8 // SPDX-License-Identifier: EPL-2.0
9 /****************************************************************************/
10 /// @file HelpersHarmonoise.cpp
11 /// @author Daniel Krajzewicz
12 /// @author Jakob Erdmann
13 /// @author Michael Behrisch
14 /// @date Mon, 10.05.2004
15 /// @version $Id$
16 ///
17 // Noise data collector for edges/lanes
18 /****************************************************************************/
19
20
21 // ===========================================================================
22 // included modules
23 // ===========================================================================
24 #include <config.h>
25
26 #include "PollutantsInterface.h"
27 #include "HelpersHarmonoise.h"
28 #include <limits>
29 #include <cmath>
30
31
32 // ===========================================================================
33 // static definitions
34 // ===========================================================================
35 // ---------------------------------------------------------------------------
36 // vehicle class noise emission coefficients
37 // ---------------------------------------------------------------------------
38 // rolling component, light vehicles, alpha
39 double
40 HelpersHarmonoise::myR_A_C1_Parameter[27] = { 69.9, 69.9, 69.9, 74.9, 74.9, 74.9, 77.3, 77.5, 78.1, 78.3, 78.9, 77.8, 78.5, 81.9, 84.1, 86.5, 88.6, 88.2, 87.6, 85.8, 82.8, 80.2, 77.6, 75.0, 72.8, 70.4, 67.9 };
41
42 // rolling component, light vehicles, beta
43 double
44 HelpersHarmonoise::myR_B_C1_Parameter[27] = { 33.0, 33.0, 33.0, 15.2, 15.2, 15.2, 41.0, 41.2, 42.3, 41.8, 38.6, 35.5, 31.7, 21.5, 21.2, 23.5, 29.1, 33.5, 34.1, 35.1, 36.4, 37.4, 38.9, 39.7, 39.7, 39.7, 39.7 };
45
46
47 // rolling component, heavy vehicles, alpha
48 double
49 HelpersHarmonoise::myR_A_C3_Parameter[27] = { 80.5, 80.5, 80.5, 82.5, 83.5, 83.5, 86.5, 88.3, 88.7, 88.3, 91.4, 92.2, 96.0, 98.1, 97.8, 98.4, 97.2, 94.6, 95.9, 90.5, 87.1, 85.1, 83.2, 81.3, 81.3, 81.3, 81.3 };
50
51 // rolling component, heavy vehicles, beta
52 double
53 HelpersHarmonoise::myR_B_C3_Parameter[27] = { 33.0, 33.0, 33.0, 30.0, 30.0, 30.0, 41.0, 41.2, 42.3, 41.8, 38.6, 35.5, 31.7, 21.5, 21.2, 23.5, 29.1, 33.5, 34.1, 35.1, 36.4, 37.4, 38.9, 39.7, 39.7, 39.7, 39.7 };
54
55
56
57 // traction component, light vehicles, alpha
58 double
59 HelpersHarmonoise::myT_A_C1_Parameter[27] = { 90.0, 92.0, 89.0, 91.0, 92.4, 94.8, 90.8, 86.8, 86.2, 84.5, 84.5, 84.8, 83.5, 81.8, 81.4, 79.0, 79.2, 81.4, 85.5, 85.8, 85.2, 82.9, 81.0, 78.2, 77.2, 75.2, 74.2 };
60
61 // traction component, light vehicles, beta
62 double
63 HelpersHarmonoise::myT_B_C1_Parameter[27] = { 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4, 9.4 };
64
65
66 // traction component, heavy vehicles, alpha
67 double
68 HelpersHarmonoise::myT_A_C3_Parameter[27] = { 97.7, 97.3, 98.2, 103.3, 109.5, 104.3, 99.8, 100.2, 98.9, 99.5, 100.7, 101.2, 100.6, 100.2, 97.4, 97.1, 97.8, 97.3, 95.8, 94.9, 92.7, 90.6, 89.9, 87.9, 85.9, 83.8, 82.2 };
69
70 // traction component, heavy vehicles, beta
71 double
72 HelpersHarmonoise::myT_B_C3_Parameter[27] = { 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7, 11.7 };
73
74
75 // ---------------------------------------------------------------------------
76 // A-weighted correction for octave bands
77 // ---------------------------------------------------------------------------
78 double
79 HelpersHarmonoise::myAOctaveBandCorrection[27] = { -44.7, -39.4, -34.6, -30.2, -26.2, -22.5, -19.1, -16.1, -13.4,
80 -10.9, -8.6, -6.6, -4.8, -3.2, -1.9, -0.8, 0.0, +0.6,
81 +1.0, +1.2, +1.3, +1.2, +1.0, +0.5, -0.1, -1.1, -2.5
82 };
83
84
85
86 double
87 mySurfaceCorrection[27] = { 0.7, 0.2, 3.6, -1.0, -1.8, -0.1, -0.9, -0.7, -1.1, -0.5, -1.5,
88 -2.4, -3.0, -4.6, -5.8, -6.5, -7.9, -7.8, -7.2, -6.3, -5.6,
89 -5.5, -4.8, -4.3
90 };
91
92
93 // ===========================================================================
94 // method definitions
95 // ===========================================================================
96 double
computeNoise(SUMOEmissionClass c,double v,double a)97 HelpersHarmonoise::computeNoise(SUMOEmissionClass c, double v, double a) {
98 double* alphaT, *betaT, *alphaR, *betaR;
99 double ac = 0;
100 if (PollutantsInterface::isHeavy(c)) {
101 alphaT = myT_A_C3_Parameter;
102 betaT = myT_B_C3_Parameter;
103 alphaR = myR_A_C3_Parameter;
104 betaR = myR_B_C3_Parameter;
105 ac = 5.6;
106 } else if (!PollutantsInterface::isSilent(c)) {
107 alphaT = myT_A_C1_Parameter;
108 betaT = myT_B_C1_Parameter;
109 alphaR = myR_A_C1_Parameter;
110 betaR = myR_B_C1_Parameter;
111 ac = 4.4;
112 } else {
113 return 0;
114 }
115 //
116 double L_low = 0;
117 double L_high = 0;
118 v = v * 3.6;
119 double s = -30.;//
120 for (int i = 0; i < 27; ++i) {
121 double crc_low = alphaR[i] + betaR[i] * log10(v / 70.) + 10.*log10(.8); // + mySurfaceCorrection[i];
122 double ctc_low = alphaT[i] + betaT[i] * ((v - 70.) / 70.) + a * ac + 10.*log10(.2);
123 double Li_low = 10. * log10(pow(10., (crc_low / 10.)) + pow(10., (ctc_low / 10.)));
124 Li_low += s;
125 double crc_high = alphaR[i] + betaR[i] * log10(v / 70.) + 10.*log10(.2); // + mySurfaceCorrection[i];
126 double ctc_high = alphaT[i] + betaT[i] * ((v - 70.) / 70.) + a * ac + 10.*log10(.8);
127 double Li_high = 10. * log10(pow(10., (crc_high / 10.)) + pow(10., (ctc_high / 10.)));
128 Li_high += s;
129 L_low += pow(10., (Li_low + myAOctaveBandCorrection[i]) / 10.);
130 L_high += pow(10., (Li_high + myAOctaveBandCorrection[i]) / 10.);
131 }
132 L_low = (10. * log10(L_low));
133 L_high = (10. * log10(L_high));
134 double v1 = (double)(10. * log10(pow(10., L_low / 10.) + pow(10., L_high / 10.)));
135 return v1;
136 }
137
138
139
140
141 /****************************************************************************/
142
143