summaryrefslogtreecommitdiff
path: root/728/CH3/EX3.10/Ex3_10.txt
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /728/CH3/EX3.10/Ex3_10.txt
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '728/CH3/EX3.10/Ex3_10.txt')
-rwxr-xr-x728/CH3/EX3.10/Ex3_10.txt26
1 files changed, 26 insertions, 0 deletions
diff --git a/728/CH3/EX3.10/Ex3_10.txt b/728/CH3/EX3.10/Ex3_10.txt
new file mode 100755
index 000000000..eb7d10e35
--- /dev/null
+++ b/728/CH3/EX3.10/Ex3_10.txt
@@ -0,0 +1,26 @@
+//Caption:Calculate the charcterstic impedance & phase velocity
+//Exa:3.10
+clc;
+clear;
+close;
+e=2.718;
+f=1000;//in Hz
+l=10000;//in meters
+Z_sc=(2631+%i*1289);//in ohms
+Z_oc=(221-%i*137);//in ohms
+Z_o=[Z_sc*Z_oc]^0.5;
+Z_mag=[real(Z_o)^2+imag(Z_o)^2]^0.5;
+Z_ang=[atan((imag(Z_o))/real(Z_o))]*180/%pi;
+disp(Z_mag,"Characteristic impedance (in ohms) =");
+disp(Z_ang,"Angle (in degrees) =");
+x=[(Z_oc/Z_sc)^0.5];
+//x=tanh(v*l)
+//As, tanh(t)=[e^t-e^-t]/[e^t+e^-t]
+v=(261+%i*2988)/l;
+a=real(v);
+b=imag(v);
+disp(2*%pi*f/b,"Phase velocity (in meter per sec.) =");
+
+
+
+