pro hline,value,linestyle=linestyle

if !x.type eq 1 then xcrange=10.^!x.crange else xcrange=!x.crange

if (not keyword_set(linestyle)) then linestyle=0

plots,[xcrange[0],xcrange[1]],[value,value],linestyle=linestyle

end