Cacher is the code snippet organizer for pro developers

defsysv,'!HOME',GETENV('HOME')+'/'

defsysv,'!IDL_RBUF_SIZE',5000
device,retain=2

; ---- Use my Progs directory and subdirs
myprogs=expand_path('+/misc/pessto/git_repos/idl',/all_dirs)
!PATH = myprogs+':' + !PATH
; ----
astrolib

defsysv,'!top_color',0b
defsysv,'!top_colorx',0b
defsysv,'!top_colorps',255b
defsysv,'!colorstr',''
defsysv,'!colorstr_ps',''
defsysv,'!colorstr_x',''
deepcolor
!p.background=colordex('white')
!p.color=colordex('black')

defsysv,'!IRAFARCH','macintel'
defsysv,'!IRAFLOGVER','IRAF V2.15.1a February 2011'

defsysv,'!LOCATION','soton'

;Location of SNLS idl directory
defsysv,'!SNPHOT_IDL','/misc/pessto/git_repos/idl/snphot'

;Location of cfhls files directory
defsysv,'!SNLS_CFHLS',!HOME+'cfhls/'

;Location of ptf files directory
defsysv,'!PTF','/misc/pessto/forced_phot_test/'

;Location of ptf light curve files directory
defsysv,'!PTF_LC',!PTF+'phot/phot/'

;Location of lc data files directory
defsysv,'!SNLS_LC',!SNLS_CFHLS+'lc/'

COMMON filter_info,master_filter
;read_filter_file
h=0.7
omega_m=0.3
omega_de=0.7

red,h100=h,omega0=omega_m,omegalambda=omega_de

!EXCEPT=2