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

namespace Serway.Chapter23
{
	/// <summary>
	/// Example01: The Hydrogen Atom
	/// The electron and proton of a hydrogen atom are
	/// separated (on the average) by a distance of approximately
	/// 5.3 \times 10^{-11} m. Find the magnitudes of the electric 
	/// force and the gravitational force between the two particles.
	/// F_e = 8.2 \times 10^{-8} N
	/// F_g = 3.6 \times 10^{-47} N
	/// </summary>
	public class Example01
	{
		public Example01()
		{
		}
		private string result;
		public string Result
		{
			get{return result;}
		}
		public void Compute()
		{
			L.ElectricCharge qe = new L.ElectricCharge();
			qe.C = -L.Constant.ElementaryCharge;
			L.Mass em = new L.Mass();
			em.kg = Science.Physics.ExperimentData.ElectronMass;

			L.ElectricCharge qp = new L.ElectricCharge();
			qp.C = L.Constant.ElementaryCharge;
			L.Mass pm = new L.Mass();
			pm.kg = Science.Physics.ExperimentData.ProtonMass;
			
			L.Position rp = new L.Position();
			L.Position re = new L.Position();
			re.X = 5.3E-11;

			L.ElectricForce Fe = new L.ElectricForce(qp,rp,qe,re);
			L.Gravitation obj = new L.Gravitation();
			L.Vector f = obj.ForceOnSecondByFirst(pm,rp,em,re);

            result+=Fe.ToString()+"\r\n";
			result+=f.Norm.ToString()+"\r\n";
		}	
	}
}
//-8.19081523673905E-08 +/- 0 i     +0 +/- 0 j     +0 +/- 0 k    (N)
//3.61956175581679E-47