function box(opt_box)
ax = gca;

if (nargin == 0)
    if (strcmp(get(ax,'Box'),'off'))
        set(ax,'Box','on');
    else
        set(ax,'Box','off');
    end
elseif (strcmp(opt_box, 'on'))
    set(ax,'Box', 'on');
elseif (strcmp(opt_box, 'off'))
    set(ax,'Box', 'off');
else
    error('Unknown command option.');
end