diff options
Diffstat (limited to '42/CH7/EX7.2/sadiku_7_2.sce')
-rwxr-xr-x | 42/CH7/EX7.2/sadiku_7_2.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/42/CH7/EX7.2/sadiku_7_2.sce b/42/CH7/EX7.2/sadiku_7_2.sce new file mode 100755 index 000000000..e5c48bdf7 --- /dev/null +++ b/42/CH7/EX7.2/sadiku_7_2.sce @@ -0,0 +1,8 @@ +clear;
+clc;
+a1=acos(0),a2=acos(1),p=5,I=3;
+Hz=I/(4*%pi*p)*(cos(a2)-cos(a1))*[.8 .6 0];
+a2=acos(1),a1=acos(.6),p=4,I=3;
+Hx=I/(4*%pi*p)*(cos(a2)-cos(a1))*[0 0 1];
+H=Hx+Hz;
+disp(H*1000,'H at (0,0,5) in mA ');
\ No newline at end of file |