73 if (heat_transfer != 0) |
73 if (heat_transfer != 0) |
74 t_change = vhc_air / (heat_transfer * (simulator->volume_air * 1000)); |
74 t_change = vhc_air / (heat_transfer * (simulator->volume_air * 1000)); |
75 else |
75 else |
76 t_change = 0.0; |
76 t_change = 0.0; |
77 simulator->air_temperature = simulator->air_temperature + t_change; |
77 simulator->air_temperature = simulator->air_temperature + t_change; |
78 fprintf(stdout, "room_air=%f room=%f air=%.15f heat_transfer=%f t_change=%.15f\n", |
78 if (debug) |
|
79 fprintf(stdout, "room_air=%f room=%f air=%.15f heat_transfer=%f t_change=%.15f\n", |
79 sqm_room_air, simulator->room_temperature, simulator->air_temperature, heat_transfer, t_change); |
80 sqm_room_air, simulator->room_temperature, simulator->air_temperature, heat_transfer, t_change); |
80 |
81 |
81 /* |
82 /* |
82 * If heating, calculate temperature of the heating plate. If heating is off but |
83 * If heating, calculate temperature of the heating plate. If heating is off but |
83 * the plate is warmer then the air, calculate the cooling down temperature. |
84 * the plate is warmer then the air, calculate the cooling down temperature. |