Wall radiation heat flux calculation now uses given emissivity

This commit is contained in:
Ray Speth 2012-03-23 22:16:37 +00:00
parent 9124b361dc
commit 3c83a76e48

View file

@ -100,7 +100,7 @@ doublereal Wall::Q(doublereal t)
if (m_emiss > 0.0) {
double tl = m_left->temperature();
double tr = m_right->temperature();
q1 += m_area * StefanBoltz * (tl*tl*tl*tl - tr*tr*tr*tr);
q1 += m_emiss * m_area * StefanBoltz * (tl*tl*tl*tl - tr*tr*tr*tr);
}
if (m_qf) {
q1 += m_area * m_qf->eval(t);