//Example 10.6, page 387
clc
h=6.6*10^-34//in J-s
v=1*10^10//per sec
ub=9.3*10^-24//in amp-m2
B=(h*v)/(2*ub)
printf("\n The Magentic energy is  %e  Tesla",B)