pro calc_proc_time,beg_proc_time,end_proc_time
;
; *** Calculates the time between two outputs from Unix date command
;
    a1 = strsplit(beg_proc_time,' ',/extract)
    t1 = a1[3]
    h1 = strmid(t1,3,2)
    m1 = strmid(t1,6,2)
    motd1 = h1*60 + m1*1
    
    a2 = strsplit(end_proc_time,' ',/extract)
    t2 = a2[3]
    h2 = strmid(t2,3,2)
    m2 = strmid(t2,6,2)
    motd2 = h2*60 + m2*1
    
    dt = motd2-motd1
    print,'Processed in ' + strcompress(dt) + ' seconds.'

    return
    end