Introductie¶
In het boek wordt in hoofdstuk 2 geschreven over warmtetransport. Dat kan op drie manieren plaatsvinden. Het is niet eenvoudig om deze drie verschillende vormen uit elkaar te houden. In het vak ‘Fysische Transportverschijnselen’, dat in het tweede jaar wordt gegeven, zal je zien dat de natuurkunde achter deze verschillende vormen van warmtetransport ook best ingewikkeld is.
In deze proef proberen we een inschatting te maken van de ordegrootte van de verschillende vormen van warmtetransport bij de koeling van een metalen buis aan lucht.
Theorie¶
Volgens Newton’s wet van afkoeling is de snelheid waarmee een voorwerp afkoelt evenredig met het verschil in de temperatuur van het voorwerp () en de omgeving (). We kunnen dit schrijven als:
waarin
de warmtestroom in ,
het oppervlak waardoor koeling optreedt in ,
de warmteoverdrachtscoëfficiënt in .
Dit levert de differentiaalvergelijking
met de warmtecapaciteit in . Herschrijven met levert:
met als oplossing:
We kunnen hieruit dus concluderen dat de karakteristieke tijdsduur is waarin de temperatuur van de buis een factor verlaagd ten opzichte van de omgevingstemperatuur.
Bepaling van soortelijke warmte van water¶
binnendiameter = 27e-3 #m
dikte = 1.5e-3 #m
lengte = 102e-3 #m
print(binnendiameter,dikte,lengte)
times = np.arange(0,181,10)
temps = np.array([47,44.4,43.6,43.1,42.1,41.5,40.9,40.5,39.9,39.4,38.8,38.4,38.0,37.6,37.2,36.8,36.6,36.3,36.0])
print(times,temps, len(temps),len(times))
0.027 0.0015 0.102
[ 0 10 20 30 40 50 60 70 80 90 100 110 120 130 140 150 160 170
180] [47. 44.4 43.6 43.1 42.1 41.5 40.9 40.5 39.9 39.4 38.8 38.4 38. 37.6
37.2 36.8 36.6 36.3 36. ] 19 19
We zijn hier voor het gemak uitgegaan van een die onafhankelijk is van de temperatuur. We weten echter dat warmtetransport door straling niet lineair gaat, maar als
Voor kleine temperatuurverschillen () is dit te vereenvoudigen tot
Zolang dus relatief klein is ten opzichte van , kunnen we dus inderdaad als een constante beschouwen.
Methode en materialen¶
Ontwerp¶
Materialen¶
standaard met twee thermisch geïsoleerde grijparmen
metalen buis me bijpassende dop
thermometer (infrarood of thermokoppel)
knijper voor bevestigen thermokoppel op buis
warm water tussen 60 en 80 graden Celsius
(evt) schuifmaat voor bepalen dimensies buis
Procedure¶
Stop de buis in warm water en laat deze gedurende een paar minuten zitten om thermisch evenwicht te bereiken. Beantwoord ondertussen de volgende vragen met behulp van de tabel:
| Materiaal | in | in |
|---|---|---|
| messing | 8,73E3 | 3,8E2 |
| aluminium | 2,7E3 | 8,8E2 |
| staal | 7,9E3 | 4,7E2 |
Pak de buis op met thermisch isolerende handschoenen (of direct met de geïsoleerde grijparm) en plaats deze in de grijparm met isolatieschoentjes. Positioneer de thermometer voor optimale temperatuurlezing. Meet als functie van tijd hoe lichaam koelt. Wacht voldoende lang zodat je de karakteristieke tijd voor de afkoeling kan bepalen.
Doe dit voor twee of drie configuraties:
De buis met de as in verticale richting en afgesloten met dop.
De buis met de as in verticale richting zonder dop.
(alleen bij voldoende tijd) De buis met de as in horizontale richting en afgesloten met dop.
Data analyse¶
Bepaal de karakteristieke tijd waarin de temperatuur van buis afneemt. Deze kan verschillend zijn voor de drie bovenstaande configuraties.
Bereken hieruit de warmteoverdrachtscoëfficiënt.
Vergelijk je resultaten met je groepsgenoten die een vergelijkbare buis hebben gemeten (dit kan klassikaal).
Welk deel van de warmteoverdrachtscoëfficiënt verwacht je dat gegeven is door de geleiding, straling en convectie? Onderbouw je redenering.
Resultaten¶
import numpy as np
import matplotlib.pyplot as plt
from scipy.optimize import curve_fit
# Functie voor exponentiële afkoeling
def exp_func(t, A, tau, T_omg):
return A * np.exp(-t / tau) + T_omg
# Gegevens
times = np.arange(0, 181, 10)
temps_C = np.array([47,44.4,43.6,43.1,42.1,41.5,40.9,40.5,39.9,39.4,
38.8,38.4,38.0,37.6,37.2,36.8,36.6,36.3,36.0])
times_dop = np.arange(0, 181, 10)
temps_dop_C = np.array([50.3,49.8,49.,48.3,47.5,46.8,46.,45.5,44.8,
44.1,43.6,43.,42.6,42.2,41.6,41.3,40.7,40.3,39.8])
# Zet naar Kelvin
temps = temps_C + 273
temps_dop = temps_dop_C + 273
# Plaatsvervangers voor materiaalconstanten
buitenoppervlak = (0.027*np.pi*0.102)+(0.03*np.pi*0.102) # in m^2
warmtecapaciteit = 3.8e2 # in J/K, vul aan na berekening uit C*m
# Fit zonder dop
popt, _ = curve_fit(exp_func, times, temps, p0=[temps[0]-temps[-1], 300, temps[-1]], maxfev=5000)
A_exp, tau_exp, T_omg_exp = popt
y_fit = exp_func(times, *popt)
plt.figure(figsize=(7,5))
plt.plot(times, temps, 'bo', label='Metingen zonder dop')
plt.plot(times, y_fit, 'r-',
label=r'$T = %.2f e^{-t/%.2f} + %.2f$ K' % (A_exp, tau_exp, T_omg_exp))
plt.xlabel('Time [s]')
plt.ylabel('Temperature [K]')
plt.legend()
plt.grid(True)
plt.show()
print(f"Karakteristieke tijd τ zonder dop: {tau_exp:.2f} s")
h_exp = warmtecapaciteit / (tau_exp * buitenoppervlak)
print(f"Warmteoverdrachtscoëfficiënt zonder dop: {h_exp:.2f} W/m²K")
# Fit met dop
popt, _ = curve_fit(exp_func, times_dop, temps_dop, p0=[temps_dop[0]-temps_dop[-1], 300, temps_dop[-1]], maxfev=5000)
A_exp, tau_exp, T_omg_exp = popt
y_fit = exp_func(times_dop, *popt)
plt.figure(figsize=(7,5))
plt.plot(times_dop, temps_dop, 'bo', label='Metingen met dop')
plt.plot(times_dop, y_fit, 'r-',
label=r'$T = %.2f e^{-t/%.2f} + %.2f$ K' % (A_exp, tau_exp, T_omg_exp))
plt.xlabel('Time [s]')
plt.ylabel('Temperature [K]')
plt.legend()
plt.grid(True)
plt.show()
print(f"Karakteristieke tijd τ met dop: {tau_exp:.2f} s")
h_exp = warmtecapaciteit / (tau_exp * buitenoppervlak)
print(f"Warmteoverdrachtscoëfficiënt met dop: {h_exp:.2f} W/m²K")

Karakteristieke tijd τ zonder dop: 109.25 s
Warmteoverdrachtscoëfficiënt zonder dop: 190.44 W/m²K

Karakteristieke tijd τ met dop: 249.30 s
Warmteoverdrachtscoëfficiënt met dop: 83.45 W/m²K
Discussie en conclusie¶
#your code/answer