using System;
using L=Science.Physics.GeneralPhysics;

namespace Serway.Chapter40
{
	/// <summary>
	/// Example09: The Line Width of Atomic Emissions
	/// Atoms have quantized energy levels similar to those of 
	/// Planck's oscillators, although the energy levels of an 
	/// atom are generally not evenly spaced. When an atom makes 
	/// a transition between states, energy is emitted in the 
	/// form of a photon. Although an excited atom can radiate 
	/// at any time from t = 0 to t = \infinity, 
	/// the average time interval after 
	/// excitation during which an atom radiates is called the 
	/// lifetime \tau. If \tau = 1.0 \times 10^{-8} s, 
	/// use the uncertainty principle to 
	/// compute the line width \Delta f
	/// produced by this finite lifetime. 
	/// </summary>
	public class Example09
	{
		public Example09()
		{
		}
		private string result;
		public string Result
		{
			get{return result;}
		}
		public void Compute()
		{
			L.Time dt = new L.Time();
            dt.s = 1.0E-8;
			L.Energy dE = new L.Energy();
			dE.VariableQ = true;
			L.QuantumPhysics.UncertaintyPrinciple(dt,dE);
			result+=Convert.ToString(dE.J/L.Constant.PlankConstant);
		}
	}
}
//7957747.15459477