2863/CH2/EX2.15/ex2_15.sce


1
2
3
4
5
6
7

//chapter 2
//Etheta=60*Im*cos(pi/2*cos(theta)/sin(theta))/r
printf("\n");
r=500*10^3;
Etheta=10*10^-6;
Im=Etheta*r/60;
printf("the current through the dipole is %gA",Im);