referenced ? obj = referenced : obj = owner

if $tree.nil?
$tree = Hash.new { |hash, key| hash[key] = {} }
end
id="p" + obj.object_id.to_s

pitch = obj.automatic_label
area = obj.surface_area.round(1)
areasq = ( obj.framing_area / 100.0 ).round(1)
slope = obj.angle.round(2)
eave_fascia_length = obj.eave_fascia_length

#unless $tree['roofplanes'].has_value?(id)
items = Hash.new()
items['roof_plane']=id
items['pitch']=pitch
items['area']=area
items['areasq']=areasq
items['evesf']=eave_fascia_length
$tree['roofplanes'][id]=items
#end

indx = $tree['roofplanes'].keys.find_index(id)
result = "Roof Plane: # " + indx.to_s + "\n"
result += "Area Footage: " + area.to_s + " sq" +"\n"
result += "Roofing squares: " + areasq.to_s + " sq" +"\n"
result += "Roof Pitch: " + pitch + "\n"
result += "Slope Angle: " + slope.to_s + "°\n"
result += "Fascia Length: # " + eave_fascia_length.to_s
result