pro hessi_window, window, date_created ; ; This file is used to construct the hessi windows over a single ; germanium detector. There are 5 materials, Be, Al, Fe, & Ni & C, in each segment, and ; 4 segments. The units of length for each material is mils. ; Here we specify a noshutter window plus a main window with shutter combination. ; date_created = '2-nov-97' z = [4, 13, 26, 28, 6] ;beryllium, aluminum, iron, nickel, carbon window_str={ frac:0.90, db:0.0, da:30.0, df:0.0, dn:0.0, dc:0.0 } window_par=replicate( window_str, 4 ) window_par.frac = [0.90, 0.07, 0.025, 0.005] window_par.db = [fltarr(3), 20.0] window_par.da = [30.0+fltarr(3), 0.0] window = replicate({ type:'noshutter', z: z, par:window_par},3) window_par.db = [20.0+fltarr(4)] window_par.da = [10.0+fltarr(2), fltarr(2)] window(1).type = 'main' window(1).z = z window(1).par = window_par window_par.db = [20.0+fltarr(3), 100.0] window_par.da = [100.0+fltarr(3), 3.0] window(2).type = 'shutter' window(2).z = z window(2).par = window_par end