"POC-File generated on Tue Feb 10 17:11:59 1998"


"---- Wall ----"

ThermalJunction
	bind: 'target' to: 'Wall';
	bind: 'thermalResistance' to: 'thermalResistance';
	bind: 'getThermalResistance' to: 'getThermalResistance';
	bind: 'neighbouringObject' to: 'intoRoom';
	bind: 'getTemperature' to: 'getTemperature';
	bind: 'area' to: 'area';
	bind: 'getHeatFlowFor' to: 'getHeatFlowFor'.


"---- Surface ----"

ThermalJunction
	bind: 'target' to: 'Surface';
	bind: 'getTemperature' to: 'getTemperature';
	bind: 'thermalResistance' to: 'thermalResistance';
	bind: 'area' to: 'area';
	bind: 'neighbouringObject' to: 'Radiator';
	bind: 'getHeatFlowFor' to: 'getHeatFlowFor';
	bind: 'getThermalResistance' to: 'getThermalResistance'.


"---- Radiator ----"

DisplaySlider
	bind: 'target' to: 'Radiator';
	bind: 'startValue' to: '-10';
	bind: 'monitor' to: 'temperature';
	bind: 'stopValue' to: '60';
	bind: 'label' to: 'Radiatortemp.'.

ConstantValue
	bind: 'target' to: 'Radiator';
	bind: 'value' to: '0';
	bind: 'constant' to: 'getThermalResistance'.

MethodAlias
	bind: 'target' to: 'Radiator';
	bind: 'alias' to: 'getTemperature';
	bind: 'realName' to: 'temperature'.


"---- Room ----"

MethodAlias
	bind: 'target' to: 'Room';
	bind: 'realName' to: 'thermalResistance';
	bind: 'alias' to: 'getThermalResistance'.

FollowRelationAndSum
	bind: 'target' to: 'Room';
	bind: 'relation' to: '#(#Surfaces #intoWalls)';
	bind: 'parameter' to: 'theCaller';
	bind: 'operation' to: 'getHeatFlowFor'.

DisplayGraphic
	bind: 'target' to: 'Room';
	bind: 'monitor' to: 'temperature'.

MethodAlias
	bind: 'target' to: 'Room';
	bind: 'alias' to: 'getTemperature';
	bind: 'realName' to: 'temperature'.

ContinuousComputation
	bind: 'target' to: 'Room';
	bind: 'priority' to: '2';
	bind: 'compute' to: 'doCalcLoop';
	bind: 'interval' to: 'interval';
	bind: 'event' to: 'RoomEvent';
	bind: 'activeObject' to: 'activeObject'.

ThermalMass
	bind: 'target' to: 'Room';
	bind: 'amountOfHeat' to: 'amountOfHeat';
	bind: 'temperature' to: 'temperature';
	bind: 'compute' to: 'doCalcLoop';
	bind: 'getHeatFlowFor' to: 'getHeatFlowFor';
	bind: 'timeOfLastComputation' to: 'timeOfLastComputation';
	bind: 'volume' to: 'volume';
	bind: 'getHeatCapacity' to: 'heatCapacity'.

To increase readability of this file, some HTML tags have been included

(click here for the original file)