A completely isolated rod is heated via a temperature source. The precision of the discretization grid is checked by providing a solution for n=3 and for n=15 grid elements. Simulate for 5.0e4 seconds and compare rod3.T[1:3] with rod15.T[{3,8,12}]
model HeatedRod "Heating of a rod with different discretization grids" extends Modelica.Icons.Example; ModelicaAdditions.HeatFlow1D.HeatedRod rod3( L=1, A=0.0004, rho=7.5*1000, lambda=74, c=450, n=3); ModelicaAdditions.HeatFlow1D.HeatedRod rod15( L=1, A=0.0004, rho=7.5*1000, lambda=74, c=450, n=15); ModelicaAdditions.HeatFlow1D.TemperatureSource_C Tsource; Modelica.Blocks.Sources.Constant const(k={200}); equation connect(const.outPort, Tsource.inPort); connect(Tsource.surface_b, rod3.surface_a); connect(Tsource.surface_b, rod15.surface_a); end HeatedRod;