function c = merge_experiments(cell_array)
	% log = merge_experiments(cell_array)

	c = cell_array{1};
	for i=2:size(cell_array,2)
		c = merge_two(c, cell_array{i});
	end
	
	
function c = merge_two(a, b)
	c = struct();
	c.T = [a.T b.T];
	c.phi_r = [a.phi_r b.phi_r];
	c.phi_l = [a.phi_l b.phi_l];
	c.sm = [a.sm b.sm];