pro mkhdr_frm, hdr, hdr_add

;+
; NAME:
;	mkhdr_frm
; PURPOSE:
;	Adds parameters to the fits header
; CATEGORY:
;	camera/idl/frm
; CALLING SEQUENCE:
;	new_hdr = mkhdr_frm(hdr)
; INPUTS:
;   newhdr					the hdr that is having parameters added
;                                               to it
;
;   hdr                                     hdr information to add on
; OPTIONAL INPUT PARAMETERS:
; OUTPUTS:
; OPTIONAL OUTPUT PARAMETERS:
;       newhdr=newhdr                 array[1]; type: structure
;                                               frame header
; INCLUDE:
	@compile_opt.pro
; CALLS:
;	fxaddpar 
; SEE ALSO:
; SIDE EFFECTS:
; RESTRICTIONS:
; PROCEDURE:
; MODIFICATION HISTORY:
;       JUL-2003, Austin Duncan (UCSD/CASS; a5duncan@yahoo.com)
;-

names = tag_names(hdr_add)

for i=0, n_elements(names)-1 do begin
	fxaddpar, hdr, names[i], strjoin(hdr_add.(i), ' ')
endfor

return  &  end