diff options
Diffstat (limited to '3710/CH10/EX10.5/Ex10_5.sce')
| -rw-r--r-- | 3710/CH10/EX10.5/Ex10_5.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3710/CH10/EX10.5/Ex10_5.sce b/3710/CH10/EX10.5/Ex10_5.sce new file mode 100644 index 000000000..754691e62 --- /dev/null +++ b/3710/CH10/EX10.5/Ex10_5.sce @@ -0,0 +1,15 @@ +//Example 10.5, Page Number 514
+//Polarization Rotation
+clc;
+//For Silica
+V=4 //in Radian / m T
+n=10 //No of turns
+I=30 //Current in Ampere
+ur=1 //Relative permeability
+uo=4*%pi*(10**-7) //Absolute permeability
+
+t=%pi/180
+thetar=uo*n*V*I*t //thetar is the polarization rotation
+
+mprintf("The Amount of Polarization rotation is %f degree\n",thetar);
+//The answer provided in the textbook is wrong
|