Final aire acondicionado temo fimee en ees(invierno y verano)

PARA INVIERNO
"CALCULO DE U"

"Calculo de la velocidad exterior"
Vm1=2.5 "[m/s]"
Vm2=2.6
Vm3=1.6
Vm4=2.5
Vm5=3.2
Vm6=3.9
Vm7=1.8
Vm8=2
Vae=((Vm1+Vm2+Vm3+Vm4+Vm5+Vm6+Vm7+Vm8)/8)*(3600/1609.344) "[Mi/h]"

"conductividades termica"
Kmadera=.094 "[Btu/(hr)(ft)(F)]"
Kvidrio=.59
Kconcreto=1.05

"Claculo de hs para paredes lisas"
he=1.6+(.3*Vae)
hi=1.6

"Calculo de Us"
"Upared"
upa= .48 "[Btu/(hr)(ft^2)(F)]"

"U ventanas"
uve= 1/((1/he)+(.6/(30.48*kvidrio))+(1/hi))

"U puertas"
upu= 1/((1/he)+(4/(30.48*kmadera))+(1/hi))

"U techo"
ute =.18

"U piso"
upi=.23

"CALCULO DE BALANCE TERMICO"
"Claculo de temperatura exterior [F]"
T1=10.2
T2=10.3
T3=10.5
T4=11
T5=10
T6=13
T7=10.1
T8=10.2
Tbse=(((T1+T2+T3+T4+T5+T6+T7+T8)/(8))*(9/5))+32

"Calculode temperatura interior, fuente: System Design Manual, Load estimating"
Tbsl=69 "HUMEDAD RELATIVA 30%"

"Calculo de areas"
"Areas de pared planta baja (ft^2)"
Apbpf=(((3.5+2.9)*(2.5+.57))-((.9)*(2.5))-((1.5)*(2)))*(2)*(3.281^2)
Apbpc=(8.4*3.2)*2*(3.281^2)
Apbpb=(6.4*1.57)*2*(3.281^2)
Apbpt=Apbpf+Apbpb+Apbpc

"Areas de pared planta alta (ft^2)"Apapf=(((4.9+.9)*(1.57))-((1)*(.9)))*(2)*(3.281^2)
Apapc=(8.4*3.2)*2*(3.281^2)
Apapb=(6.4*1.57)*2*(3.281^2)
Apapt=Apapb+Apapc+Apapf

"Area de pared total (ft^2)"
apa=Apapt+Apbpt

"Area de ventanas"
ave=((4*1.5)+(.42*.9*2)+(3.5*1.5)+(1.5*6.4))*(2)*(3.281^2)

"Area de puertas"
apu=((.9)*(2.5-.42))*4*(3.281^2)

"Area de piso"
api=(6.4*8.4*2)*(3.281^2)

"Area de techo"
ate=(6.4*8.4*2)*(3.281^2)

"Caculo de Q de paredes,ventanas, puertas, techo y piso"
qpa=apa*upa*(Tbse-Tbsl)
qve=ave*uve*(Tbse-Tbsl)
qpu=apu*upu*(Tbse-Tbsl)
qte=ate*ute*(((Tbse+Tbsl)/2)-Tbsl)
qpi=api*upi*(((Tbse+Tbsl)/2)-Tbsl)

"Calculo de Q para personas sentadas con un poco de trabajo "
Ntrabajadores=5
qpe=Ntrabajadores*215

"Calculo de Q para equipo y alumbrado"
qco=0
qre=300*3.415
qal=23*10*3.415
qeya=qre+qco+qal

"Calculo deQ por efecto solares"
qes=0

"Calculo total de transferencia de calor [btu/hr]"
Qtotal=qes+qeya+qpu+qve+qpa+qpi+qte+qpe
Hs=qco+qre+qal+qeya
"calculo de hs"
DeltaT_bs=40
"calculo de volumen de aire para remover el calor"
V_remv=Hs/(f*60*DeltaT_bs)
V_res=20*Ntrabajadores
"calculo del flujo masico"
v_1=VOLUME(Air,T=Tbsl,P=.8118)
f=0.24/v_1
" como el flujo de aire para remover el calorcumple con el flujo necesario para la respiracion se toma valido"
m_a=V_remv/v_1
delta_hs=Hs/(m_a*(60))
H_sl=0.24*Tbsl
H_si=H_sl+delta_hs
T_bsi=H_si/0.24

"Calor latente"
Hl=Ntrabajadores*135

Htl=21 "De la carta Psicometrica [Btu/lb]"
DHl=Hl/m_a
Hll=Htl-H_sl

"Calculo de propiedades a la entrada"
Hli=Hll-DHl

Hti=H_si+Hli

"linea de acondicionamiento"
"de la cartapsicometrica con los datos de Tbs=74, Hti"
"con la grafica de linea de acondicionameinto aseguramos que es fisicamente posible remover el calor dentro del local y no es necesario hacer una ajuste al calculo del flujo masico ya que este es el correcto"

"____________________________________________________________

____________________________________________________________

_______________"

"Flujode recirculacion"
m_r=V_res/v_1

"Flujo de entrada"
m_e=m_a-m_r

"Temperatura bulbo seco recirculacion"
Tbs_re=Tbsl

"Temperatura bulbo seco mezcla"
Tbs_me=( (m_r*Tbs_re) + (m_e * Tbse) ) / m_a

Velocidad=700

"series 84"
Nespiras=1

"Calculo del area"

"Flujo Volumetrico"
FlujoVol=m_a*v_1

"Area"
Area=FlujoVol/Velocidad

apa=2077 [ft^2]
Apbpb=216.3 [ft^2]
apu=80.61delta_hs=9.6
hi=1.6
Hti=-76.81 [Btu/lb_as]
Kmadera=0.094 [Btu/hr*F*ft^2]
Nespiras=1
qeya=1810 [Btu/hr]
qre=1025 [Btu/hr]
T2=10.3 [F]
T7=10.1 [F]
Tbs_re=69
ute=0.18 [Btu/(hr)(ft^2)(F)]
Vm2=2.6 [m/s]
Vm7=1.8 [m/s]
Apapb=216.3 [ft^2]
Apbpc=578.7 [ft^2]
Area=0.1474
DHl=107.4
Hl=675 [Btu/lb_as]
Htl=21 [Btu/lb_as]
Kvidrio=0.59 [Btu/hr*F*ft^2]
Ntrabajadores=5 [personas]...