FUNCTION loss_rad_chianti, EM, T

	;EM is emission measure in 10^49 cm^-3
	; Radiative loss rate = EM * 1.e49 * 6.e-22 / SQRT(T/1.e5) erg s^-1
	;Cox & Tucker (1969)

	;Calculate and plot radiative loss rate from Chianti
	if n_elements (temperature) eq 0 then begin
		restore,'chianti_rad_loss.sav'
		endif
	result = EM * interpol(loss_rate,temperature,T)	* 1.e30
	result = result * 1.e19

	RETURN, result

END