; To run this program
;
; IDL> @example.pro
;
; JaeSub Hong, 2003-2005, version 1.5
; Please report any problem or suggestion at jaesub@head.cfa.harvard.edu
; 

range = [0.1,8.0] ; 0.3 - 8.0 keV
frac  = [0.25, 0.33, 0.50, 0.67, 0.75]
nofixerror = 0 ; set 0 to fix error and 1 to not fix error

;---------------------------------------------------------
; example of simple source photons
; to compile the plotting routines
.r ../qdplot

; rainbow color scheme
loadct,39 	

; set the plot window
xr    =[-0.4,0.4]
yr    =[1.5,2.3]
xtick =['0.6','1','2','3','4','5','  6 keV','7'] ; top x-axis
qd_setwin, xr=xr, yr=yr, range=range, xtick=xtick, stu=0.5

; read grid data
file_grid = 'example.rdb' ; use grid.pl to generate it
file_grid = 'test_quantile.rdb' ; use grid.pl to generate it
grid=qd_readgrid(file_grid, comment=comment)

; label grid
align=[1.0,0.5]	  ; label alignment
ori  =[-20,0]	  ; orientation
par  =[0.01,4]	  ; location
xo   =[0.0,0.0]	  ; x offset
yo   =[0.0,-0.05] ; y offset
col = [80,250]	  ; color setting
prefix1= ['','','','','','N!dH!n(x10!u22!n)=','','','','']
prefix2= '!4C!3='
qd_labelgrid, par, grid, comment=comment, $
	prefix1=prefix1, prefix2=prefix2, $
	align=align, ori=ori, col=col, xo=xo, yo=yo

; plot grid
qd_plotgrid, grid, comment=comment, col=col