'From VisualWorks(R), Release 2.5 of September 26, 1995 on February 12, 1998 at 3:38:55 pm'! !Room methodsFor: 'accessing-attributes'! amountOfHeat "Generated by MPOK 2.8 (fast)." "Get the value of the specified attribute, if it is known by the receiver or one of its neighbours." ^amountOfHeatA notNil ifTrue: [amountOfHeatA] ifFalse: [self searchForAttribute: #amountOfHeatA]! amountOfHeat: aValue "Generated by MPOK 2.8 (fast)." "Set the value for the specified attribute" | ret | ret := amountOfHeatA. amountOfHeatA := aValue. ^ret! heatCapacity "Generated by MPOK 2.8 (fast)." "Get the value of the specified attribute, if it is known by the receiver or one of its neighbours." ^heatCapacityA notNil ifTrue: [heatCapacityA] ifFalse: [self searchForAttribute: #heatCapacityA]! heatCapacity: aValue "Generated by MPOK 2.8 (fast)." "Set the value for the specified attribute" | ret | ret := heatCapacityA. heatCapacityA := aValue. ^ret! interval "Generated by MPOK 2.8 (fast)." "Get the value of the specified attribute, if it is known by the receiver or one of its neighbours." ^intervalA notNil ifTrue: [intervalA] ifFalse: [self searchForAttribute: #intervalA]! interval: aValue "Generated by MPOK 2.8 (fast)." "Set the value for the specified attribute" | ret | ret := intervalA. intervalA := aValue. ^ret! temperature "Generated by MPOK 2.8 (fast)." "Get the value of the specified attribute, if it is known by the receiver or one of its neighbours." ^temperatureA notNil ifTrue: [temperatureA] ifFalse: [self searchForAttribute: #temperatureA]! temperature: aValue "Generated by MPOK 2.8 (fast)." "Set the value for the specified attribute" | ret | ret := temperatureA. temperatureA := aValue. ^ret! thermalResistance "Generated by MPOK 2.8 (fast)." "Get the value of the specified attribute, if it is known by the receiver or one of its neighbours." ^thermalResistanceA notNil ifTrue: [thermalResistanceA] ifFalse: [self searchForAttribute: #thermalResistanceA]! thermalResistance: aValue "Generated by MPOK 2.8 (fast)." "Set the value for the specified attribute" | ret | ret := thermalResistanceA. thermalResistanceA := aValue. ^ret! timeOfLastComputation "Generated by MPOK 2.8 (fast)." "Get the value of the specified attribute, if it is known by the receiver or one of its neighbours." ^timeOfLastComputationA notNil ifTrue: [timeOfLastComputationA] ifFalse: [self searchForAttribute: #timeOfLastComputationA]! timeOfLastComputation: aValue "Generated by MPOK 2.8 (fast)." "Set the value for the specified attribute" | ret | ret := timeOfLastComputationA. timeOfLastComputationA := aValue. ^ret! volume "Generated by MPOK 2.8 (fast)." "Get the value of the specified attribute, if it is known by the receiver or one of its neighbours." ^volumeA notNil ifTrue: [volumeA] ifFalse: [self searchForAttribute: #volumeA]! volume: aValue "Generated by MPOK 2.8 (fast)." "Set the value for the specified attribute" | ret | ret := volumeA. volumeA := aValue. ^ret! !