;CP_get_times, indir
;
;INPUTS:
;	indir	the directory where the .fits files are stored
;
;
;
pro CP_get_times, Directory_file=Directory_file

;set directory path delimiter
    if (!version.os_family eq 'unix') then begin
       delim='/'
    endif else begin
       delim='\'
    endelse

if (not keyword_set(Directory_file)) then Directory_file='/a/pippin01/Volumes/u08/lsst/CPanalysis/2005-05-10/ShackHartman/Directory_files.txt'

readcol,Directory_file,Files,format='a'
print,N_elements(Files)


end