summaryrefslogtreecommitdiff
path: root/1616/CH2/EX2.10/ex2_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '1616/CH2/EX2.10/ex2_10.sce')
-rw-r--r--1616/CH2/EX2.10/ex2_10.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1616/CH2/EX2.10/ex2_10.sce b/1616/CH2/EX2.10/ex2_10.sce
new file mode 100644
index 000000000..e982846dd
--- /dev/null
+++ b/1616/CH2/EX2.10/ex2_10.sce
@@ -0,0 +1,13 @@
+// ex2.10 from the previous problem find impedence at 50cm on either side
+yl=complex(0.05,10);
+cosha=cosh(yl);
+coshb=cosh(-yl);
+sinha=sinh(yl);
+sinhb=sinh(-yl);
+zo=50;
+zl=complex(100,50);
+za=zo*((zl*cosha+zo*sinha)/(zl*sinha+zo*cosha));
+zb=zo*((zl*coshb+zo*sinhb)/(zl*sinhb+zo*coshb));
+disp('impedence at +50cm is= '+string(za)+' ohm');
+disp('impedence at -50cm is= '+string(zb)+' ohm');
+