///<summary>
/// Sabine Reverberation Time : T60 = 0.161V/ln(1-a)S
///</summary>
public static void Eyring(Environment.Scene Room, double volume, ref double[] T60)
{
T60 = new double[8];
if (Room == null) return;
double TA;
for (int t = 0; t <= 7; t++)
{
TA = 0;
for (int q = 0; q <= Room.Count() - 1; q++)
{
TA += (Room.SurfaceArea(q) * (-System.Math.Log(1 - Room.AbsorptionValue[q].Coefficient_A_Broad(t),System.Math.E)));
}
T60[t] = 0.161 * volume / (TA + 4 * Room.Attenuation(0)[t] * volume);
}
}
///<summary>
/// Sabine Reverberation Time : T60 = 0.161V/A
///</summary>
public static void Sabine(Environment.Scene Room, double volume, ref double[] T60)
{
T60 = new double[8];
if (Room == null) return;
double TA;
for (int t = 0; t <= 7; t++)
{
TA = 0;
for (int q = 0; q <= Room.Count() - 1; q++)
{
TA += (Room.SurfaceArea(q) * Room.AbsorptionValue[q].Coefficient_A_Broad(t));
}
T60[t] = (0.161 * (volume / (TA + (4 * Room.Attenuation(0)[t] * volume))));
}
}