function out = k_foam(T)
% k_foam defines a temperature dependent thermal conductivity for an 
% insulation foam material.
out = -2.141+1.87e-2*T-5.3e-5*T.^2+4.945e-8*T.^3;