class REAL_32_REF

feature
	
	item: REAL_32
	
	set_item (r: REAL_32)
		do
			item := r
		end

end