function abcd =abcd_mirror(radius_of_curvature)
% abcd matrix of the mirror with given radius of curvature
% it is equivalent to a lens with f=R/2
	abcd = abcd_lens(radius_of_curvature/2);
end