Fórmula Iterativa Fanger Confort
Publicado por Gonzalo (1 intervención) el 12/06/2019 20:51:44
Buenas tardes,
Llevo varios días intentando solucionar una formula iterativa. Sin embargo no sale el resultado que debería sacar.
Es una fórmula TCL, en el que es iterativa pues también se encuentra TCL en el desarrollo de la misma. Siguiendo un video de la Universidad de Valencia, no consigo obtener dicho resultado.
La fórmula es:
TCL=35.7-(0.028*M)-ICL*((3.96e-8)*FCL*(((TCL+273)^4)-(TR+273)^4)+(FCL*HC*(TCL-TA)))
Se ve que TCL se encuentra en el interior de la misma.
Adjunto la Fórmula de VBA:
No consigo encontrar el fallo en la programación, pues soy nuevo en esto, agradecería si me podéis indicar cómo se programa una ecuación iterativa.
Un saludo y muchas gracias!
Llevo varios días intentando solucionar una formula iterativa. Sin embargo no sale el resultado que debería sacar.
Es una fórmula TCL, en el que es iterativa pues también se encuentra TCL en el desarrollo de la misma. Siguiendo un video de la Universidad de Valencia, no consigo obtener dicho resultado.
La fórmula es:
TCL=35.7-(0.028*M)-ICL*((3.96e-8)*FCL*(((TCL+273)^4)-(TR+273)^4)+(FCL*HC*(TCL-TA)))
Se ve que TCL se encuentra en el interior de la misma.
Adjunto la Fórmula de VBA:
1
2
3
4
5
6
7
8
9
Function TCLs(M,ICL,FCL,TR,HC,TA)
TCLc=4Do
TCLs=TCLcTCLc=35.7-(0.028*M)-ICL*((3.96e-8)*FCL*(((TCLs+273)^4)-(TR+273)^4)+(FCL*HC*(TCLs-TA)))
dif = ((TCLs - TCLc) / TCLs)
Loop Until dif < 0.000015
TCLs = (TCLs + TCLc) / 2
End Function
No consigo encontrar el fallo en la programación, pues soy nuevo en esto, agradecería si me podéis indicar cómo se programa una ecuación iterativa.
Un saludo y muchas gracias!
Valora esta pregunta
0