function HR
    fprintf('%s',repmat(['='],1,80))
return